Hi,
For sure all this happend because of MYODBC.This automation error can
occur when OLE is not able to handled some data/pointers or pointers
to interfaceses which must be transfered to VB,VBA,VBS...etc.
For example : if you wish to transform some char* to UNICODE and in
the new UNICODE data is not exist NULL termination string, this error
occur.This case are happens very frequently in Windows,especially
when OS remain without memory resources.
In fact is an access violation error, but because error is raised
in .dll, VB* doesn't know for what reason this error occur.And in
this case err.description or err.number is no sens(or maybe for bug
trapping).
For sure is not need to restart MYSQL server.Try to reset the client
connection/process.
Hope it's help
Regards,
Gelu
--- Chien, Shih Chiang [EMAIL PROTECTED] wrote:
tks, Michael
I am not sure it's mysql's problem or myODBC351's problem
But, what I am sure is
rs2(data).Value = Now
is working fine in mysql323 + myodbc351
but, err in mysql407 + myodbc351
the err msg in msgbox: Query-based update failed because the row to
update
could not be found.
- Original Message -
From: Michael She [EMAIL PROTECTED]
To: Chien, Shih Chiang [EMAIL PROTECTED]
Cc: jumpmaster [EMAIL PROTECTED];
[EMAIL PROTECTED];
[EMAIL PROTECTED]
Sent: Monday, December 30, 2002 12:35 AM
Subject: Re: ADO Error '800a01fb'
Hi Shih Chiang,
From what I remember, MySQL 3.23 was OK with MyODBC as well.
However,
with 4.06 MyODBC 2.50 AND 3.51 bomb occasionally with this error
message.
At 05:37 PM 12/29/2002 +0800, Chien, Shih Chiang wrote:
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