Re: ADO and Oracle OLEDB 8.1.7.2.0
From: Niall Litchfield <n-litchfield_at_audit-commission.gov.uk>
Date: Sat, 21 Jul 2001 21:28:43 GMT
Message-ID: <3b443603$0$3759$ed9e5944_at_reading.news.pipex.net>
Date: Sat, 21 Jul 2001 21:28:43 GMT
Message-ID: <3b443603$0$3759$ed9e5944_at_reading.news.pipex.net>
I'm doing this from memory but IIRC then CursorType = adStatic means that the recordset is not updateable.
Also doesn't
Dim arrFields(0) declare an array with no entries. I thought it should read Dim arrFields(1) and then it is the element count that incremenets from zero.
You might also get good help in the vb newsgroups.
-- Niall Litchfield Oracle DBA Audit Commission UK "Volkhard Vogeler" <VolkhardV_at_Vogeler.com> wrote in message news:9hvh5t$qmn$1_at_ork.backup.noris.net...Received on Sat Jul 21 2001 - 23:28:43 CEST
> Hello,
>
> i want to run this VB-procedure:
>
> Private Sub Command1_Click()
> Dim arrFields(0) As String
> Dim arrValues(0)
> Dim objConn As ADODB.Connection
> Dim objCmd As ADODB.Command
> Dim objRS As ADODB.Recordset
> Dim i As Integer
>
> arrFields(0) = "Name"
>
> arrValues(0) = "200"
>
> Set objConn = CreateObject("adodb.connection")
> objConn.Open gOleConnection
> Set objCmd = CreateObject("ADODB.Command")
> objCmd.ActiveConnection = objConn
> objCmd.CommandType = 1
> objCmd.Properties("IRowsetChange") = True
> objCmd.Properties("Updatability") = 7
> objCmd.Properties("Server data on insert") = True
>
> Set objRS = CreateObject("adodb.recordset")
> objRS.CursorLocation = 2
> objRS.CursorType = adOpenStatic
> objRS.LockType = 3
> objRS.Open "select Name from testvvv", objConn
>
> objRS.AddNew arrFields, arrValues
>
> MsgBox "fertig"
> End Sub
>
> After starting the runtime error 3265 is comming (Can´t find objekt with
> this name or ordinal) at the "objRS.AddNew..."-Line!
>
> can anyone help?
>
> best regards
>
> Volkhard
>
>
>
>