Typical VB constant error 1

[meldrape]

Greetings, once again, forgive me if this has been answered but the search feature is not available. I have a standalone vbs script to acquire remote computer info. It uses an access database but I want to use a SQL2000 database so I changed the connection string to reflect this. Now I'm getting the famous "arguments are of the wrong type" error so I copied and pasted the entire adovbs.inc file into the script but still get the error. Any helpful thoughts would be appreciated. My add record code is as follows:

Set objRS = CreateObject("ADODB.Recordset")
objRS.CursorType = ? do I need this
objRS.LockType = ? do I need this
objRS.Source = "Computerinfo"
objRS.ActiveConnection = objCon
objRS.Open
objRS.AddNew
objRS("IPAddress")=strComputerName
objRS("ComputerName") = strName
objRS("Model") = strModel
objRS("Vendor") = strVendor
objRS("Serial") = strSerial
objRS("Version") = strVersion
objRS("CPU") = strCPU
objRS("Speed") = strSpeed
etc. etc.
objRS.Update

Any thoughts would be appreciated. Thanks.

 

[tsuji]

Hello meldrape,

To accommodate .addnew and .update, you can set the cursortype opendynamic and locktype lockoptimistic.
[tt]
objRS.CursorType=2 'adOpenDynamic
objRS.LockType=3 'adLockOptimistic
[/tt]
regards - tsuji

 

[meldrape]

Works great. Many thanks for your help!