Date

[mclueless]

the date Formats in VB6 n in access are different. i have written an insert query for inserting all details including date into the database but it is not working. i think it is because of this format difference. how do i handle it???

[lotus18]

the date Formats in VB6 n in access are different. i have written an insert query for inserting all details including date into the database but it is not working. i think it is because of this format difference. how do i handle it???

Can you post your sql statement here? Did you check the datatypes of your fields?
Did you enclosed the dates in your sql query with #?

Rey Sean

[shuvo2k6]

the date Formats in VB6 n in access are different. i have written an insert query for inserting all details including date into the database but it is not working. i think it is because of this format difference. how do i handle it???

Hey,
u can take the Date as String, then perform ur other tasks.

[daniel aristidou]

Hey,
u can take the Date as String, then perform ur other tasks.

This is unadvisable.... .

[creative1]

You should format your data before your query in a format that is acceptable in Access something like this:
Format$(txtdate .Text, "m/dd/yy")
Regards

[shuvo2k6]

This is unadvisable.... .

Hi daniel aristidou,
Text1.text is String or other type Data in creative1 ?. Reply me. If u create any mad like comment, u must think before abt that.

Thnks,
shuvo2k6

[creative1]

In my reply I assumed you have entered your data in a textbox that you want to convert. I think you better post what you have in your code. It will be far easy to suggest any thing that will help you.

[VACEPROGRAMER]

Why don't you samply type DATE FORMATS in VB help. And you have what you want

*VACE*

[BradleyS]

please post your insert code...

[shuvo2k6]

In VB6:

Private Sub Command1_Click( )
Text1.Text = Format(Date, "dd mmmm, yyyy")
End Sub

[mclueless]

rs.Open "insert into Invoice_master( Inv_No,Inv_Date ,Inv_Type,Cust_ Code,Salesman_C ode,Due_Date) values(" & Val(txtInvNo.Te xt) & ",'" & txtDate.Text & "','" & txtInvType.Text & "'," & Val(txtCustCode .Text) & "," & Val(txtSaleCode .Text) & ",'" & txtDue.Text & "')", con, 3, 3


This is the insert statement. tell me where to make changes.

[lotus18]

rs.Open "INSERT INTO Invoice_master( Inv_No,Inv_Date ,Inv_Type,Cust_ Code,Salesman_C ode,Due_Date) VALUES " & Val(txtInvNo.Te xt) & ",'" & txtDate.Text & "','" & txtInvType.Text & "'," & Val(txtCustCode .Text) & "," & Val(txtSaleCode .Text) & ",'" & txtDue.Text & "')", con, 3, 3


This is the insert statement. tell me where to make changes.

Hi

Change your codes to
[code=vb]
rs.Open "INSERT INTO Invoice_master( Inv_No,Inv_Date ,Inv_Type,Cust_ Code,Salesman_C ode,Due_Date) VALUES (" & Val(txtInvNo.Te xt) & ",#" & txtDate.Text & "#,'" & txtInvType.Text & "'," & Val(txtCustCode .Text) & "," & Val(txtSaleCode .Text) & ",#" & txtDue.Text & "#)", con, 3, 3
[/code]

Rey Sean

[mclueless]

Hi

Change your codes to
[code=vb]
rs.Open "INSERT INTO Invoice_master( Inv_No,Inv_Date ,Inv_Type,Cust_ Code,Salesman_C ode,Due_Date) VALUES (" & Val(txtInvNo.Te xt) & ",#" & txtDate.Text & "#,'" & txtInvType.Text & "'," & Val(txtCustCode .Text) & "," & Val(txtSaleCode .Text) & ",#" & txtDue.Text & "#)", con, 3, 3
[/code]

Rey Sean

I tried the above query bt I am getting the following error....

Syntax error in date in query expression '# #' .

[lotus18]

I tried the above query bt I am getting the following error....

Syntax error in date in query expression '# #' .

Really?, May I see your sample value in txtDate and txtDue. Are your Inv_Date and Due_Date are Date/Time Datatypes?

Rey Sean

[mclueless]

Really?, May I see your sample value in txtDate and txtDue. Are your Inv_Date and Due_Date are Date/Time Datatypes?

Rey Sean

They are Short Dates....
sample:-3/2/2008