hvor er jeg eller Breadcrum

Noget i denne stil:

<%
breadcrumb = ""
breadcrumbId = Request.QueryString("id")  ' Det id du er på til at starte med

While Not breadcrumbId = -1  ' Eller med den værdi som passer til netop din tabel
    sql = "SELECT menuNavn, parentId FROM dinMenuTabel WHERE id=" & breadcrumbId
    Set rs = Conn.Execute(sql)

    If breadcrumb <> "" Then
        breadcrumb = " - " & breadcrumb
    End If

    breadcrumb = rs("menuNavn") & breadcrumb

    breadcrumbId = rs("parentId")
Loop

Response.Write breadcrumb
%>

Har lige ændret den til at passe til min db

breadcrumb = ""
breadcrumbId = Request.QueryString("ID")

While Not breadcrumbId = -1
    sql = "SELECT FolderName, Parent FROM GCat WHERE ID=" & breadcrumbId
    Set rs = Connect.Execute(sql)

    If breadcrumb <> "" Then
        breadcrumb = " - " & breadcrumb
    End If

    breadcrumb = rs("menuNavn") & breadcrumb

    breadcrumbId = rs("parentId")
Loop

Response.Write breadcrumb


Den giver dog en fejl i linie:

Loop

loop with out do

Ret:

While Not breadcrumbId = -1

- til:

Do While Not breadcrumbId = -1

breadcrumb = ""
breadcrumbId = Request.QueryString("ID")

If breadcrumbId <> "" Then
Else
    breadcrumbId = 0
end If

Do While Not breadcrumbId = -1
    sql = "SELECT FolderName,Parent FROM GCat WHERE ID=" & breadcrumbId
    Set rs = Connect.Execute(sql)

    If breadcrumb <> "" Then
        breadcrumb = " - " & breadcrumb
    End If

    breadcrumb = rs("FolderName") & breadcrumb

    breadcrumbId = rs("Parent")
Loop

Response.Write breadcrumb


men får fejlen:

fejl '80020009'
Undtagelse opstod.

/galleri.asp, linje 43

breadcrumb = rs("FolderName") & breadcrumb

Hvuklen type er dit FolderName-felt i din GCat-tabel?

text

er det ikke fordi den spørger efter et id der er 0

Det er nok vildt overkill i forhold til hvor meget tekst du i realiteten har i dine menunavne. Og så er det iøvrigt årsagen til at du får den fejl i dette tilfælde:

http://www.aspfaq.com/show.asp?id=2421

Prøv at lave den om til en VARCHAR(20). Jeg gætter på at det er langt nok med 20 tegn.

nu er det ikke en MySql eller en MSSql men en Access og det længste navn er Sommer

Ok, for hurtig til at antage der.

Prøv at bytte om på rækkefølgen:

sql = "SELECT Parent, FolderName FROM GCat WHERE ID=" & breadcrumbId

SELECT Parent,FolderName FROM GCat WHERE ID=63SELECT Parent,FolderName FROM GCat WHERE ID=0
ADODB.Field fejl '800a0bcd'

Enten er BOF eller EOF sand, eller den aktuelle post er blevet slettet. Den anmodede handling kræver en aktuel post.

/galleri.asp, linje 41

jeg har jo ikke noget ID der er 0

Do While Not breadcrumbId = 0

så virker det, smid et svar :)

Svar :^)