Tjenixen allihop!

Det är så här att jag får denna följande felmeddelande :
<info>
Feltyp:
Körningsfel i Microsoft VBScript (0x800A01A8)
Objekt krävs.: ''
/Links/top5.asp, line 18
</info>
som jag inte kan tyda... denna kodsnutt har funkar i min förra burk
så jag vet vad som kan ha gått snett

<code>
<%
stmSQL = "SELECT Top 5 id, url, beskrivning FROM tblAddLink ORDER BY id DESC"

Set tblTemp = objConn.Execute(stmSQL) '<b>rad 18</b>

i = 1
Do Until tblTemp.EOF
varUrl = tblTemp("url")
varBeskrivning = tblTemp("beskrivning")

Response.write i & ". " & varBeskrivning & "<br>"

tblTemp.MoveNext
i = i + 1
Loop
%>

</code>

Kan nån snälla HELPA denna gosse?????

Tacksam för all Hljäp!

Har du öppnat databasen?

/Micke

Är objConn skapat någonstans?

jo det har jag!

yes!

Ja har skapat kopplingen i en separat fil som jag senare inkluderar in
<code>
Set objConn = Server.Createobject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
Server.MapPath("links.mdb")
</code>

vad menar den med <b>Objekt krävs.: ''</b>

Prova att skriva om din db koppling till denna istället.

Set objConn = Server.Createobject("ADODB.Connection")
objConn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("links.mdb")

Oftast så brukar det betyda att den inte har hittat något.
Kolla att allt är rätt stavat och släng även in en IF sats som kollar om tblTemp .EOF, dvs att du har fått poster tillbaka.

T ex:

IF tblTemp.EOF THEN
Reposne.write "Ingen träff"
ELSE
' Loopa ut dina poster
END IF

/Anna-Karin

Håller med Cougarina, du bör hantera returen från databasen.

Det kan hända att poster saknas vid läsning och andra trevliga och mindre trevliga saker som genererar felkoder vilka du på ett riktigt sätt bör ta hand om.

Alltså, direkt efter öppna databsen bör du ha felhantering
Vid anrop med SQL bör du efter anropet då du förväntar dig få ett antal poster hantera om det inte kom några rader samt om databsen fått fel, tex låst, felaktig, diskproblem mm.
När man infogar, uppdaterar och raderar poster bör man ta hänsyn till att andra användare är inne i samma databas varför postlåsningar, dubbletter och post saknas måste tas om hand.

Detta kräver en hel del test och därför är det rekomendera att du bygger en egen funktion för databasanrop som du alltid använder och slipper gör samma kod med test varje gång.

Här har MS varit så snälla att man åtminstone får felkoder från dem men man måste själv ta fram felhantering för databashantering.

Felet betyder att variabeln objConn är inte satt. Om du inkluderar koden som öppnar anslutningen. Kontrollera sökväg till den inkluderade filen och tagarna är korrekta.

jätte tack för hjälpen.... ska på en gång testa förslagen

meeen...

får jag bara fråga vem är det som har löst denna inlägg... Inte jag iallafall, för jag måste ju se om det verkligen funkar eller inte innan jag markerar det som löst... det spökar lite här verkar det som!

<b>Alltså, direkt efter öppna databsen bör du ha felhantering</b> --- > Hur kan jag bäst felhantera??? Kan du snälla visa mig nån exempel?

Thanks

Enklaste modellen saxat från Pelles Grundkurs i ADO

<code>
Public Function StartConnection(DatabaseType As dbDatabaseType) As Boolean
' Input: DataBaseType
' 1 = SQL Server
' 2 = Accessdatabas (default)

' Retur: StartConnection
' True = Ok
' False = Något fel

Select Case DatabaseType

Case 1: ConStr = "Provider=SQLOLEDB.1;Persist Security Info=False;" & _
"User ID=sa;Initial Catalog=Northwind;" & _
"Data Source=pelle"
Case Else: ConStr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\Biblio.mdb;" & _
"Persist Security Info=False"
End Select

On Local Error Resume Next
Set Con = CreateObject("adodb.connection")
Con.Open ConStr

If Err Then
StartConnection = False
Else
StartConnection = True
End If

End Function

</code>