#VB OLEDB Create Table 建立 DBF 檔案

透過OLEDB 去建立 DBF 檔案

Dim strCn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.\MCST\BACKUP\;Extended Properties=dBASE 5.0"

        Dim strQry As String = "CREATE TABLE " & fName & ".DBF ([part] Char(8), [type] Char(5), " & _
            "[desc] Char(40), [mac] Char(4), [class] Char(5), [sn] Numeric(6), " & _
            "[qq] Char(4), [mark] Char(10), [area] Char(10), [ordno] Char(8), " & _
            "[trndate] Char(8), [delidate] Char(8), [rem] Char(4), [lp] Char(1), " & _
            "[overtime] Char(1))"