By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
459,737 Members | 1,473 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 459,737 IT Pros & Developers. It's quick & easy.

Run time error 3251

P: 15
Good day,
I hope you guys could help me do something about this problem, it seems like I forgot the right codes to use :D

Dim adoRS as new ADODB.Connection
Dim recRS as Recordset


adoRS.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=User;Initial Catalog=Dbase;Data Source=DBase", "user", "Password"
Set recRS = adoRS.Execute("select * from TableName")

But when I try to update the table. It returns an error 3251

Hope you guys could help me out on this problem

TIA
Jul 25 '07 #1
Share this Question
Share on Google+
2 Replies


hariharanmca
100+
P: 1,977
Good day,
I hope you guys could help me do something about this problem, it seems like I forgot the right codes to use :D

Dim adoRS as new ADODB.Connection
Dim recRS as Recordset


adoRS.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=User;Initial Catalog=Dbase;Data Source=DBase", "user", "Password"
Set recRS = adoRS.Execute("select * from TableName")

But when I try to update the table. It returns an error 3251

Hope you guys could help me out on this problem

TIA


Run-time error '3251'

i think this will help you
Jul 25 '07 #2

P: 82
Good day,
I hope you guys could help me do something about this problem, it seems like I forgot the right codes to use :D

Dim adoRS as new ADODB.Connection
Dim recRS as Recordset


adoRS.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=User;Initial Catalog=Dbase;Data Source=DBase", "user", "Password"
Set recRS = adoRS.Execute("select * from TableName")

But when I try to update the table. It returns an error 3251

Hope you guys could help me out on this problem

TIA

Hello kazper -

This could be your problem
Expand|Select|Wrap|Line Numbers
  1. Dim adoRS as new ADODB.Connection
  2. Dim recRS as Recordset
  3.  
Change the latter declaration to
Expand|Select|Wrap|Line Numbers
  1. Dim recRS As ADODB.Recordset
  2.  
I hope this would solve your issue.

Godspeed...
Jul 27 '07 #3

Post your reply

Sign in to post your reply or Sign up for a free account.