Dates and Delphi 7 and Access 97 and TADO*

I have also tried using the Parameters.Param... stuff

If you have an example doing it both ways that works, I will add in an extra 125 points.

Which is the better way to do it?

Thanks

and what type is emp_id in database?
if some numeric then you must ommit QuotedStr:
ADOQuery1.SQL.Add('INSERT into mytable (emp_id, birthdate, name) VALUES(10,'
ADOQuery1.SQL.Add(QuotedStr('20011010')+',');
ADOQuery1.SQL.Add(QuotedStr('My name')+')');

or if this is some autoincrement then ommit this field at all.
mo.

Sorry, I didn't copy my example very well. I have the statement as

INSERT into mytable (emp_id....) VALUES (....)

I also tried ommitting the QuotedStr for my integer, but it also doesn't work.

My actual query is very long. So I am running this test query to try to get the date in. I am positive it is the date.

I will try that format that you suggest.

by using Parameters..
ADOQuery1.SQL.Text := 'INSERT into mytable (emp_id, birthdate, name) VALUES (:emp_id, :birthdate, :name)';
with ADOQuery1.Parameters do begin
  ParamByName('emp_id').Value := '10';
  ParamByName('birthdate').Value := '20011010';
  ParamByName('name').Value := 'My name';
end;
ADOQuery1.ExecSQL;

wbr, mo.

Switching to the YYYYMMDD still doesn't help.

WormsWorms is frustrated.

I can insert an integer and a string. I just can't insert anything with a date.

The field is a DateTime field in Access 97 if that matters

with ADOQuery1 do begin
    Close;
    SQL.Clear;
    SQL.Add('INSERT INTO table1 (field,intfield,datefield) VALUES (:FIELD, :INTFIELD, :DATEFIELD)');
    Parameters.ParamByName('FIELD').Value := QuotedStr(edit1.text);
    Parameters.ParamByName('INTFIELD').Value := '10';
    Parameters.ParamByName('DATEFIELD').Value := '20021010';
    ExecSQL;
  end;


This is exactly what I have.

sorry, the above works perfect without the date stuff, as soon as I put the date stuff in it dies with that same error.

if emp_id is integer then use

with ADOQuery1.Parameters do begin
 ParamByName('emp_id').Value := 10;

optionally, if problem remains, you can explicitly set parameter data type (I thin you need it for date type only):
ParamByName('birthdate').DataType := ftDate;
ParamByName('birthdate').Value := '20011010';

benefits of using parmeters - you  you get better readable code (no such QuotedStr etc.)
mo.

then try to set parameter datatype to ftDateTime
mo.

I now get this error:
---------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EOleException with message 'Application uses a value of the wrong type for the current operation'. Process stopped. Use Step or Run to continue.
---------------------------
OK   Help  
---------------------------

When I use the following code:

with ADOQuery1 do begin
    Close;
    SQL.Clear;
    SQL.Add('INSERT INTO table1 (field,intfield,datefield) VALUES (:FIELD, :INTFIELD, :DATEFIELD)');
    Parameters.ParamByName('FIELD').Value := QuotedStr(edit1.text);
    Parameters.ParamByName('INTFIELD').Value := '10';
    Parameters.ParamByName('DATEFIELD').DataType := ftDate;
    Parameters.ParamByName('DATEFIELD').Value := '20021010';
    ExecSQL;
  end;


I am not understanding why this doesn't work. I have tried all kinds of variations on this to no avail.
I appreciate your helping mocarts. Any more ideas?

ftDateTime results in the same error as above.

grrrrrrrrrrrrrrrrrrr

Hi mo, don't waste your time. See:
https://www.experts-exchange.com/questions/20549398/MS-Access-and-Delphi.html

Regards, Geo

What is the issue geobul?

Do you know the answer?
I can give you points if you want. I really don't care.

There, you got your points.

Now, can you help me with this?

I don't care about points. I haven't said that I should get any points. It's a matter of ... (you name it, I wont). You asked a question and received so many good examples. I don't think the experts here would like to be used that way. I take it as incorrect behaviour.

Yah. Whatever.

mocarts, I will give you some points cuz you helped lots, even if we didnt' get it to work.


WormsWorms

appendix,

the parametertype of the dateparameter is ftString

meikl ;-)

btw. i used access2000,
hope this doesn't matter ;-)

WormsWorms:
This old question needs to be finalized -- accept an answer, split points, or get a refund.  For information on your options, please click here-> http:/help/closing.jsp#1 
EXPERTS:
Post your closing recommendations!  No comment means you don't care.