New database issue

[Rock Ridge Farm (Larry)]

The following has worked for the last couple of months but now has started to fail:

Code Select Expand


nReturn = stockdb.Connect("Microsoft Access Driver (*.mdb)",GetStartPath() + "Stkkepr.mdb","",0);
IF nReturn = 0 {
MessageBox(0,"Failed to open Database","Error");
return;
}
hstmt_insert = stockdb.ExecSQL("INSERT INTO stock (symbol,status,lstrec,shares,name) VALUES('','','',0,'')");
error = stockdb.GetErrorText(hstmt_insert);
IF(Len(error)) {
messagebox(0,error,"INSERT ERROR");
stockdb.FreeSQL(hstmt_insert);
return;
}

It is now failing with an insert error.
I had another program I had posted previously that worked that is also now failing.
Any Idea?

[Steven Picard]

What is the actual error message?