Date Time Picker

Question

3.00/5 (1 vote)

See more:

Dear all,

I faced a problme in insert of date.

strSQL = "INSERT into Bills(docdt,tc,glc _
") values (" & Format$(DTdocdt.Value, "dd/mm/yyyy") & "," & _
CType((xtc), String) & "," & _

But it is inserting 01/01/1900 00:00:00

Kind guide.

I shows that dtdocdt.value in a message box before insert to see the value which show correct date but inserting above date.

Posted 18-Sep-10 21:06pm

Jatinder Gupta

Add a Solution

4 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Sandeep Mewara · Answer 1 · 2010-09-18T21:50:00

Solution 1

mm is for minutes. MM is for months.
Might be thats creating issue while converting... just check.

Posted 18-Sep-10 21:50pm

Sandeep Mewara

Comments

Jatinder Gupta 19-Sep-10 8:18am

Not sir the problem is same again after changes Format(DTdocdt.Value, "dd/MM/yyyy") the date showing 01/01/1900 00:00:00

Sandeep Mewara 19-Sep-10 11:25am

Use CONVERT....

Simon_Whale 20-Sep-10 7:20am

further to Sandeep's CONVERT(VARCHAR(20), @DateVariable, 103)

Jatinder Gupta 20-Sep-10 21:44pm

I'm inserting in that way
strSQL = "INSERT into Bills(docdt,tc,glc" & _
",docno,broker,amount) values (convert(varchar(20),@DTdocdt,103)," & _
CType((xtc), String) & "," & _
CType(custcmb.Items(custcmb.SelectedIndex), ListItem).ID & "," & _
(txtinvoice.Text) & "," & _
CType(cmbbrk.Items(cmbbrk.SelectedIndex), ListItem).ID & "," & _
CType(IIf(txttotal.Text = "", 0, txttotal.Text), String) & ")"

The Error occurs "Must Declare the scalar variable '@DTdocdt' ".

Kindly guide I'm passing write command or make mistake

Toniyo Jackson · Answer 2 · 2010-09-20T00:13:00

Solution 2

Use this format

Format(DTdocdt.Value, "MM/dd/yyyy")

Posted 20-Sep-10 0:13am

Toniyo Jackson

Comments

Jatinder Gupta 20-Sep-10 21:52pm

Not sir the problem is same again after changes Format(DTdocdt.Value, "MM/dd/yyyy") the date shorted in database is 01/01/1900 00:00:00.

If I put a msgbox before that the data showing(09/21/2010) write in msgbox but stored 01/01/1900 00:00:00 in database

Prerak Patel · Answer 3 · 2010-09-23T01:54:00

I think you are very new to SQL and even to VB syntax.

First of all, you should enclose every string or date data in single quotes in SQL.

So even in the query that worked, you should enclose txtinvoice.text also.

"INSERT INTO SALES(docdt,docno) values ('" & Format(DTdocdt.Value, "MM/dd/yyyy") & "','" & (txtinvoice.Text) & "')"

And in switched query, you have to switch the field names too.

"INSERT INTO SALES(docno,docdt) values ('" & txtinvoice.Text & "','" & Format(DTdocdt.Value, "MM/dd/yyyy") & "')"

I think this will help you.

If it solves your problem, mark it as answer.

Toniyo Jackson · Answer 4 · 2010-09-20T19:36:00

Solution 3

use single quotes and double quotes

'" Format(DTdocdt.Value, "MM/dd/yyyy")"'

Posted 20-Sep-10 19:36pm

Toniyo Jackson

Comments

Jatinder Gupta 21-Sep-10 21:17pm

Thanks sir problem solved.

One more thing to I want to ask like if I passed the command like that it ok but I suffel the field and put the data at second it shows commant like as second example Kindly see the error

"INSERT INTO SALES(docdt,docno" & _
") values ('" & Format(DTdocdt.Value, "MM/dd/yyyy") & "'," & _
(txtinvoice.Text) & ")"

"INSERT INTO SALES(docdt,docno" & _
") values (txtinvoice.Text) & "," & _
'" & Format(DTdocdt.Value, "MM/dd/yyyy") & "')"