Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
ADO Error. Need Help!
Message
General information
Forum:
Visual FoxPro
Category:
CodeMine
Title:
ADO Error. Need Help!
Miscellaneous
Thread ID:
00623885
Message ID:
00623885
Views:
42
I'm trying to add a record using ADO. When I run the following code, I
get the error:


"Multiple-step operation generated errors. Check eash status value..."


I already checked the data types - they match. So what's wrong here?


oRecord.AddNew()
oRecord.Fields("Id").Value = PADL(cRecId, 9, "0")
oRecord.Fields("BatchId").Value = .nBatchId
oRecord.Fields("TranDate").Value = .txtTransDate.Value
oRecord.Fields("TranHour").Value = TRANSFORM(.txtTransHours.Value)
oRecord.Fields("TranMin").Value = TRANSFORM(.txtTransMinutes.Value)
oRecord.Fields("ClientId").Value = .cboClients.GetSelectedId()
oRecord.Fields("ProgTitl").Value = .cboShows.GetSelectedId()
oRecord.Fields("StatName").Value = .cboStations.GetSelectedId()
oRecord.Fields("BkPhone").Value = ALLTRIM(.txtAreaCode.Value) + " " + ALLTRIM(.txtPhone.Value)
oRecord.Fields("BasOrdr").Value = .txtOrders.Value
oRecord.Fields("CallAct").Value = .txtCalls.Value
oRecord.Fields("OrdLeads").Value = .txtLeads.Value
oRecord.Fields("Upsell").Value = .txtUp1.Value
oRecord.Fields("Upsell2").Value = .txtUp2.Value
oRecord.Fields("Upsell3").Value = .txtUp3.Value
oRecord.Fields("Upsell4").Value = .txtUp4.Value
oRecord.Fields("Upsell5").Value = .txtUp5.Value
oRecord.Fields("Upsell6").Value = .txtUp6.Value
oRecord.Fields("Upsell7").Value = .txtUp7.Value
oRecord.Fields("Upsell8").Value = .txtUp8.Value
oRecord.Update()





.
Everything makes sense in someone's mind
public class SystemCrasher :ICrashable
In addition, an integer field is not for irrational people
Next
Reply
Map
View

Click here to load this message in the networking platform