close
sdfsdf sddsf fggg dfg dfgfg
Delete TablesPublic Function Delete_Reserve_Data_Tables()Dim mySQL As StringDim tempMonth As String'Drop trace tables For i = 1 To 12 If i < 10 Then tempMonth = "0" & i Else tempMonth = "" & i End If mySQL = "Drop Table [Reserve " & tempMonth & " Current];" ' Run SQL Statment DoCmd.SetWarnings False DoCmd.RunSQL mySQL DoCmd.SetWarnings True Next i End Function .msgcontent .wsharing ul li { text-indent: 0; } 分享 Facebook Plurk YAHOO!
好站連結:http://tw.myblog.yahoo.com/wythe405624386
全站熱搜