recset

9 svar · 302 visningar · startad av depeo 11 okt. 2003

depeoMedlem sedan juni 2003517 inlägg

Trådstart11 okt. 2003 13:00#1

Servern generarar följande felmeddelande:

Error Type:
Server object, ASP 0177 (0x800401F3)
Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at: [url]http://www.microsoft.com/contentredirect.asp.[/url] 
/hemsida/link.asp, line 5

Koden som jag kör är följande:

<%@ Language=VBScript%>
<!-- #INCLUDE FILE="dblink.asp" -->
<% Response.Buffer = True 

Set Connect = Server.CreateObject("ADODB.connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath(db) &" "
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT namn, link, alt FROM lankar"
RecSet.Open SQL, Connect

do until RecSet.eof
response.write("<a href=" & RecSet("link") & ">" & RecSet("texten_som_skall_synas") & "</a>")
RecSet.movenext
loop
Set RecSet = connect.Execute(SQL)

RecSet.Update

RecSet.Close
Connect.Close
Set RecSet = Nothing
Set Connect = Nothing

%>

Tacksam för svar

Tycker jag provat allt här, är rätt nybörjare på ASP kanske ska tilläggas.

Jesper TMedlem sedan nov. 20017 144 inlägg

11 okt. 2003 13:16#2

Vad vill du göra?
Du behöver varken ha med: Set RecSet = connect.Execute(SQL), eller RecSet.Update om du bara skall loopa ut några länkar.
Vill du uppdatera din databas så får du göra på annat vis.
Testa att söka på: "Invalid ProgID"

depeoMedlem sedan juni 2003517 inlägg

11 okt. 2003 13:24#3

Jesper T skrev:

Vad vill du göra?
Du behöver varken ha med: Set RecSet = connect.Execute(SQL), eller RecSet.Update om du bara skall loopa ut några länkar.
Vill du uppdatera din databas så får du göra på annat vis.
Testa att söka på: "Invalid ProgID"

Vill ha alla länkar i databasen istället för att hårdvarukoda dem, så att sidan ska bli lätt administrera.

Den ska altså skriva ut alla länkar som finns i den aktuella tabellen.

cyprysMedlem sedan dec. 20003 563 inlägg

11 okt. 2003 13:27#4

<%@ Language=VBScript%>
<!-- #INCLUDE FILE="dblink.asp" -->
<% Response.Buffer = True 

Dim Connect, RecSet, SQL
Set Connect = Server.CreateObject("ADODB.connection")
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath(db) &" "
Set RecSet = Connect.Execute("SELECT namn, link, alt FROM lankar")

do until RecSet.eof
	response.write("<a href='" & RecSet("link") & "'>" & RecSet("texten_som_skall_synas") & "</a>")
RecSet.movenext
loop

Connect.Close
Set Connect = Nothing

%>

depeoMedlem sedan juni 2003517 inlägg

11 okt. 2003 13:30#5

Nä, det hjälpte inte heller.

solbulleMedlem sedan mars 20015 287 inlägg

11 okt. 2003 14:05#6

response.write("<a href='" & RecSet("link") & "'>" & RecSet("namn") & "</a>")

depeoMedlem sedan juni 2003517 inlägg

11 okt. 2003 14:08#7

Jo det fungerar nu på min XP-server, men inte på Windows 2000.

Varför?

Skrev det i denna tråd för 2 min men vet inte var det inlägget tog vägen?

solbulleMedlem sedan mars 20015 287 inlägg

11 okt. 2003 14:15#8

Testat att starta om servern?

cyprysMedlem sedan dec. 20003 563 inlägg

11 okt. 2003 14:16#9

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/csvr2002/htm/cs_mmc_troubleshooting_nizk.asp

Kan det kanske ha något att göra med konfigueringen av w2k-servern kanske?

depeoMedlem sedan juni 2003517 inlägg

11 okt. 2003 18:13#10

cyprys skrev:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/csvr2002/htm/cs_mmc_troubleshooting_nizk.asp

Kan det kanske ha något att göra med konfigueringen av w2k-servern kanske?

Nej, det är en standardinstalltion av w2k server, har kört igenom senaste windowsupdate och laddat hem nyaste iisfilerna, data och vbscript, detta hjälpte inte heller. mer tips?