VBscript Error 800a01a8 on Connection.Close
From: Peter Gruendler (usenet8_at_hnet.at)
Date: 06/23/04
- Next message: appiez_at_bierquick.nl: "Problem: Insert one single record in a access DB using DB"
- Previous message: nmcdermaid: "Re: Provider cannot found"
- Next in thread: Val Mazur: "Re: VBscript Error 800a01a8 on Connection.Close"
- Reply: Val Mazur: "Re: VBscript Error 800a01a8 on Connection.Close"
- Messages sorted by: [ date ] [ thread ]
Date: Wed, 23 Jun 2004 09:09:56 +0200
I'm getting a weird error from the last line in code snippet[1] below:
"Objekt erforderlich: 'Provider=Microsoft.J'".
The connection is operable, as can be seen in the tracing output[2].
I have to do the conn.close, because in the next part of the code I have
to open the connectin again. This is neccessary, because the server will
open connections with adModeShareDenyExclusive, no matter what I set in
Connection.Mode before .Open.
* Why can't I close the connection? *
peter
[1]
[ldconn is already open]
| Set rs = Server.CreateObject("ADODB.Recordset")
| rs.Open sql, ldConn, 3, 3
| if rs.recordcount > 0 then
| ' Es gibt was zum Darstellen
|
| ' in Session-Variablen schreiben
| Session("zjournalk") = rs.Fields("zitJournal")
| Session("zVolume") = rs.Fields("zitVolume")
| Session("zJahr") = rs.Fields("zitJahr")
| Session("zSeiten") = rs.Fields("zitSeiten")
| Session("zAutoren") = rs.Fields("zitAutoren")
| Session("zTitel") = rs.Fields("zitTitel")
| Session("zKeywords") = rs.Fields("zitKeywords")
|
| if tracing then response.write(ldconn & "<br><br>")
| ldConn.Close
[2]
| SQL: #SELECT * FROM ldZitat WHERE zitKey=11#
|
| Provider=Microsoft.Jet.OLEDB.4.0;Password="";
| User ID=Admin;Data Source=F:\hnet\glivec\database\lit.mdb;
| Mode=Share Deny Read|Share Deny Write;Extended Properties="";
| Jet OLEDB:System database="";Jet OLEDB:Registry Path="";
| Jet OLEDB:Database Password="";Jet OLEDB:Engine Type=5;
| Jet OLEDB:Database Locking Mode=0;
| Jet OLEDB:Global Partial Bulk Ops=2;
| Jet OLEDB:Global Bulk Transactions=1;
| Jet OLEDB:New Database Password="";
| Jet OLEDB:Create System Database=False;
| Jet OLEDB:Encrypt Database=False;
| Jet OLEDB:Don't Copy Locale on Compact=False;
| Jet OLEDB:Compact Without Replica Repair=False;
| Jet OLEDB:SFP=False
|
| Laufzeitfehler in Microsoft VBScript- Fehler '800a01a8'
|
| Objekt erforderlich: 'Provider=Microsoft.J'
|
| /glivec/litdb/admin/zitatbearbeitenstep3.asp, line 78
- Next message: appiez_at_bierquick.nl: "Problem: Insert one single record in a access DB using DB"
- Previous message: nmcdermaid: "Re: Provider cannot found"
- Next in thread: Val Mazur: "Re: VBscript Error 800a01a8 on Connection.Close"
- Reply: Val Mazur: "Re: VBscript Error 800a01a8 on Connection.Close"
- Messages sorted by: [ date ] [ thread ]
Relevant Pages
|
|