Chiang,
I can't seem to pinpoint where the problem lies, but I don't think the
.value should be there...you may want to try this:
If Not rs2.EOF Then
rs2(data) = Now
rs2.Update
End If
Why go through all the trouble of creating a recordset to update a value?
It adds quite abit of overhead...you can use the connection object to
accomplish the same. Try this:
strSQL = DRIVER={MySQL ODBC 3.51
Driver};SERVER=localhost;DATABASE=test;USER=root;PASSWORD=root;OPTION=35;
Set Cn1 = CreateObject(ADODB.Connection)
Cn1.Open strSQL
strSQL1 = UPDATE mytable SET data = ' Now() ' WHERE pkey =
1
Cn1.Execute(strSQL1)
Of course, by changing the strSQL1 statement, you can Add and Delete records
from the database also.
HTH,
Kurt
-Original Message-
From: Chien, Shih Chiang [mailto:[EMAIL PROTECTED]]
Sent: Sunday, December 29, 2002 10:37 AM
To: jumpmaster; Michael She; [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Re: ADO Error '800a01fb'
Dear ALL.
I have the similar problem...
mysql 3.23 + myodbc 3.51 = OK
mysql 4.07 + myodbc 3.51 = Error
the code list is :
-
strSQL = DRIVER={MySQL ODBC 3.51
Driver};SERVER=localhost;DATABASE=test;USER=root;PASSWORD=root;OPTION=35;
Set Cn1 = CreateObject(ADODB.Connection)
Cn1.Open strSQL
strSQL1 = select * from mytable where pkey = 1
Set rs2 = CreateObject(ADODB.Recordset)
rs2.Open strSQL1, Cn1, 1, 3
If Not rs2.EOF Then
rs2(data).Value = Now
rs2.Update ' Error Line Reported.
##
End If
rs2.Close
Cn1.Close
Set rs2 = Nothing
Set Cn1 = Nothing
-
pls see the attached file for more error msg... tks.
Chiang
- Original Message -
From: jumpmaster [EMAIL PROTECTED]
To: Michael She [EMAIL PROTECTED]; [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Sent: Sunday, December 29, 2002 7:39 AM
Subject: RE: ADO Error '800a01fb'
Michael,
My guess (and this is *only a guess*) -- for some reason one of the
objects
is not being created; maybe the recordset object. I am not sure where you
are getting that error number from (presumably in you browser) as you do
not
state it. i suggest that you check your webserver logs if you have access
to them. They might have an extended error message which will pinpoint
your
problem.
Also, you can try to 'trap' the error. I found this tid-bit on the M$
site...
On error resume next
..
..
..
Your problem code goes here
..
..
..
if err.number 0 then
Response.Write err.description BR err.source BR
err.clear
end if
Here is the link where I found it:
http://support.microsoft.com/default.aspx?scid=kb;en-us;299981#7
One last note...the reason I think it is your recordset object is because
of
your query...You use single quotes in the wrong place. Your strSQL
variable
should be defined as follows:
strSQL = SELECT * FROM IMAGES WHERE ID = ' ID '
Or - if ID is numeric then:
strSQL = SELECT * FROM IMAGES WHERE ID = ID
HTH,
Kurt
-Original Message-
From: Michael She [mailto:[EMAIL PROTECTED]]
Sent: Saturday, December 28, 2002 6:57 AM
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: ADO Error '800a01fb'
Hi all,
I'm getting this error with MyODBC v2.50 and v3.51. I'm running MySQL
v4.06:
Microsoft VBScript runtime error '800a01fb'
An exception occurred: 'open'
/mshe/gallery/picture.asp, line 45
The code for that area is:
strConn = DSN=binaryio;
Set objConn = Server.CreateObject(ADODB.Connection)
objConn.open strConn
set rs = server.createobject(adodb.recordset)
strSQL = SELECT * FROM IMAGES WHERE `ID` = ID
rs.open strSQL, objConn, 3,1,1
Nothing out of the ordinary... anyone know why I'm getting this error?
Thanks!
--
Michael She : [EMAIL PROTECTED]
Mobile : (519) 589-7309
WWW Homepage : http://www.binaryio.com/
-
Before posting, please check:
http://www.mysql.com/products/myodbc/manual_toc.html (the manual)
http://lists.mysql.com/(the list archive)
To unsubscribe, e-mail [EMAIL PROTECTED]
To unsubscribe from Yahoo! Groups version, e-mail
[EMAIL PROTECTED]
-
Before posting, please check:
http://www.mysql.com/products/myodbc/manual_toc.html (the manual)
http://lists.mysql.com/(the list archive)
To unsubscribe, e-mail [EMAIL PROTECTED]
To unsubscribe from Yahoo! Groups version, e-mail
[EMAIL PROTECTED]
-
Before posting, please check:
http://www.mysql.com/manual.php (the manual)
http://lists.mysql.com
