Jet-problem
nån som vet varför jag får



kod:--------------------------------------------------------------------------------
Feltyp:
Microsoft JET Database Engine (0x80004005)
Odefinierat fel
/inc/conn/connstr.asp, line 6
--------------------------------------------------------------------------------

trots att jag har uppdaterat Jet till SP8

Min connstr.asp är

kod:--------------------------------------------------------------------------------
<%
'' Skapa koppling till databasen
Function System_Main()
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= "& server.MapPath("databasens namn.mdb")
Set System_Main = Conn
End Function
%>
--------------------------------------------------------------------------------

och jag kallar på den med:

kod:--------------------------------------------------------------------------------
<!-- #include virtual="inc/conn/connstr.asp" -->
<%
''Set conn = Server.CreateObject("ADODB.Connection")
connstr = System_Main()
conn.Open connstr
%>

Jag skulle skriva det så här:

kod:--------------------------------------------------------------------------------
<code>
<%
'' Skapa koppling till databasen
Function OpenMainConnection()
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= "& server.MapPath("databasens namn.mdb")
Set OpenMainConnection = Conn
End Function
%>
</code>
--------------------------------------------------------------------------------

kod:--------------------------------------------------------------------------------
<code>
<!-- #include virtual="inc/conn/connstr.asp" -->
<%
Dim rs
Dim conn
Set conn = OpenMainConnection()

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "SELECT TabellNamn.* FROM TabellNamn", conn

Do Until rs.EOF

rs.MoveNext
Loop

rs.Close
Set rs = Nothing

conn.Close
Set conn = Nothing
%>
</code>
--------------------------------------------------------------------------------


Du kan ju se om det hjälper.

Jag löste det genom att installera om IIS-en :-)

men tack ändå