Jag försöker göra så att jag ska ha lite info om mina filmer jag har på köpvideo och har 4 fält i min databas, det ena är namn, sen kommer, genre, recension, regi. nu så anropar jag först ena rowen i tabellen och visar innehållet i den. Men hur gör man om man vill att varje film ska bli en länk och när man trycker på den ska en liten standard sida skrivas med alla fält?
Lättast är nog om du lägger in allt i en loop, och sen gör en standardlänk med namnet i adressfältet till ett dokument som ser olikt ut beroende på vilket namn du skickade med...en lite mer praktiskt syn:
En loop...RS = ditt recordset:
<%
Do While NOT RS.EOF
'här lägger du länken!
%>
<a href=standarddokument.asp?namn=<%=RS("namn")%>>
<%
RS.MoveNext
Loop
%>
...sen hämtar du ned variabeln i adressfältet på ditt andra dokument:
<%
namn = Request.Querystring("namn")
%>
Så!... nu ligger variabeln du skickade med i namn... Och så hämtar vi resten av infott:
<%
SQL = "select * from tabell where namn = " & namn
Set RS2 = Databas.Execute(SQL)
%>
...nu är det bara att hämta vilket fält du vill i RS2.
Är detta vad du sökte eller är jag helt ute och cycklar? ... notera att jag gjorde denna kod på rak arm så det kan förekomma fel...
------------------
MVH / Vide
Min hemsida:vide.ods.org
Lägg till ett räknar fält som du kallar för id. Plocka ut id och namnet på filmen gör en länk i stilen visafilm.asp?id="&id&" I visafilm.asp så plockar du ner id och gör en selectsats SELECT * FROM filmer WHERE id="&id&"
Hejsan, nu har jag följande rader på min index.asp sida..
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver(*.mdb)};dbq=d:\inetpub\wwwroot\video\video.mdb"
SQLStmt = "SELECT * FROM video"
Set RS = Connection.Execute(SQLStmt)
%>
<% Do until RS.EOF %>
<br>
<a href="film.asp?namn=<%=RS("id")%>"><%=RS("namn")%></a>
<%
RS.MoveNext
Loop
RS.Close
Connection.Close
%>
Nu får jag upp alla filer jag har i namn fältet i min databas, men hur fan ska jag göra för att å med mig det på nästa sida, prövade det ni skrev innan men det funderade inte.
jag har id, namn, regi, resc i min databas som fält. På första sidan ska jag ju bara visa namnet och sen när man trycker på den ska det komma upp på den nya sidan som jag angett (film.asp), jag förstår att det är något att jag måste ange RS2, någonstanns på film.asp men jag får det inte att fungera..på den sidan ska jag sedan visa namn, regi och resc...SNÄLLA hjälp, mycket tacksam för hjälp
...antingen kan du lägga in allt i Sessioner på första sidan... eller så skickar du med namn-variabeln till nästa sida och hämtar resten av datat där... på andra sidan skriver du:
SQL = "select * from tabell where namn = " & Request.Querystring("namn")
Set RS = Databas.Execute(SQL)
Du behöver alltså inget nytt recordset på den nya sidan... nu hämtade jag datat utifrån namnet som du skickar med från förra sidan med det går ju lika bra (eller snarare bättre) med ID.
------------------
MVH / Vide
Min hemsida:vide.ods.org
Nu har jag fan mig prövat allt, försökt med session och inte något har fungerat..rycker mig ihåret lite till...Finns det någon som kan skriva exakt vad som jag har gjort fel och vad som ska bytas ut ör att det ska fungera..SNÄLLA...Jag är villigt att betala lite för det...Som det är nu radar han upp alla filmer, men han sparar inte något så det blir alltid första filmens fakta som kommer upp...
Här är första sidan som man kommer till
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=d:\inetpub\wwwroot\filmer\filmer.mdb"
SQLStmt = "SELECT * FROM filmer"
Set RS = Connection.Execute(SQLStmt)
%>
<html>
<head>
<title>Filmlista</title>
<% Do until RS.EOF %>
<br>
<a href="filmer.asp?namn=<%=RS("namn")%>"><%=RS("namn")%></a>
<%
RS.MoveNext
Loop
RS.Close
Connection.Close
%>
</body>
</html>
Här är andra..
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=d:\inetpub\wwwroot\filmer\filmer.mdb"
SQLStmt = "SELECT \* FROM filmer"
Set RS = Connection.Execute(SQLStmt)
SQL = "select \* from filmer"
Set RS2 = Connection.Execute(SQLStmt)
Om någon kunde ändra på dessa filer så att det fungerar..eller något i den stilen...Jag har nog rört ihop det med rs och rs2 osv för jag har ju 3 fält som ska visas, namn, regi, resc ...Hjälp..**snyftar väldigt mycket**
Jag har gjort likadant fast jag får följande felmeddelande:
Feltyp:
ADODB.Field (0x80020009)
Antingen är BOF eller EOF satt till True, eller så har aktuell post raderats. Den begärda åtgärden kräver en aktuell post.
mall1.asp
Dim Id
Id = Request.Querystring("Id")
strSQL = "SELECT * FROM Foretag"
strSQL = strSQL & " where Foretag = '" & Id & "'"
Set objRS = Connection.Execute(strSQL)
