SORRY wrong code.. old version :)
change
If rsMeny("ID") <> ID Then
to
If rsMeny("ID") = ID Then
sorry :)
"Christopher Brandsdal" <christopherwbc2i.net> skrev i melding
news:u9VKRDMTDHA.2148TK2MSFTNGP11.phx.gbl...
> I have a problem. I'm making a expanding menu, but I'm having problems
with
> my code..
> Here's the code:
>
> <html>
> <head>
> <title>default.asp</title>
> </head>
>
> <body>
>
> <%
> ' Connection to the database / Datenbankverbindung
> Dim ConnectString, conn
> ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
> Server.MapPath("../../Doents and Settings/All
> Users/Dokumenter/portal.mdb")
> Set conn = Server.CreateObject("ADODB.Connection")
> conn.open ConnectString
> %>
>
> ...
Bookmarks