Dim TabName As String
TabName = txt_invoiceno.Text
db.Execute ("CREATE TABLE " & TabName & "" _
& "Invoice_No Text(20)," _
& " Supplier_Name Text(20)," _
& " Purchase_Date Date," _
& " Delivery_Date Date," _
& " Material_Type Text(20)," _
& " Material_Name Text(20)," _
& "Order_Qty Number(DOUBLE)," _
& "Price_Per_Unit Number(DOUBLE)," _
& "Total_Amount Number(DOUBLE)," _
& "Received_Qty Number(DOUBLE)," _
& "Qty_Instock Number(DOUBLE)")
I want to create table in the existing database at runtime through which is named as the data entered in the text box of my form.
When I run this code, this gives me an error in create table statement.
Please let me know how to come out of this problem and execute the statement successfully.

New Topic/Question
Reply



MultiQuote



|