Darren DICK
d.dick at uws.edu.au
Tue Feb 3 19:49:00 CST 2004
Hi Charlotte
Many thanks for the response
Sorry but I am a real luddite
What does that mean ?
CommandType gives me nothing in the help
(Rarely ever does though)
Darren
----- Original Message -----
From: "Charlotte Foust" <cfoust at infostatsystems.com>
To: "Access Developers discussion and problem solving" <accessd at databaseadvisors.com>
Sent: Wednesday, February 04, 2004 12:39 PM
Subject: RE: [AccessD] A2K: Can't update (ADO) Recordset
> Try specifying the CommandType for the Open.
>
> Charlotte Foust
>
> -----Original Message-----
> From: Darren DICK [mailto:d.dick at uws.edu.au]
> Sent: Tuesday, February 03, 2004 5:10 PM
> To: AccessD List
> Subject: [AccessD] A2K: Can't update (ADO) Recordset
>
>
> Hello all
>
> Can anyone tell me why I get the following Error message when I try and
> update the following record set?
> =================================================
> Error Number 3251
> Current Recordset does not support updating.
> This may be a limitation of the provider, or of the
> selected locktype =================================================
>
> Code...
> Dim con As Object
> Dim rs As Object
> Dim sel_SQL As String
>
> Set con = Application.CurrentProject.Connection
>
> Set rs = CreateObject("ADODB.Recordset")
>
>
> sel_SQL = "SELECT tblMyTable.*, tblMyTable.FieldToBeUpdated FROM
> tblMyTable" _
> & "WHERE (((tblMyTable.FieldToBeUpdated ) Is Not Null));
>
> rs.Open sel_SQL, con, 1 '<====Error line is here somewhere me thinks
>
> With rs
> While Not .EOF
> !FieldToBeUpdated = -1
> .MoveNext
> Wend
> End With
>
>
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com