JEG TAR` DEN LIGE ENGANG TIL:
Denne asp`er kalder jeg for findefrem.asp
Med den kan jeg søge i databasen og få udskrevet søgeresultatet
med et link til den enkelte bruger. Spørgsmålet er nu, hvorledes kan
jeg få sendsvar.asp (se indholdet af strLink nedenfor), til at
"overtage" lige præcis det brugerID, som der klikkes på således, at et
svar kun går til denne modtager ?
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("bruger.mdb")
Conn.Open DSN
strSQL = "select * from brugere where navn= '" & request.form("navn") &
"' AND tekst= '" & request.form("tekst") & "' AND type= '" &
request.form("type") & "'"
Set rs = Conn.Execute(strSQL)
'Løber det hele igennem.
If Not (rs.BOF Or rs.EOF) Then
Do While Not rs.EOF
strnavn=rs("navn")
strLink = "<a href='sendsvar.asp?id=" & rs("UserId") & "'>" & strnavn &
"</a>"
Udskriver resultatet med link.
Response.Write "<li>" & strLink & "</li>" & ". " & rs("type") & ". " &
rs("tekst") & " . " & rs("mere data") & ". " & rs("mere data") &
"<hr><br>"
rs.MoveNext
Loop
Else
Response.Write "Bla Bla Bla Bla"
End If
'Er dette mon rigtigt ?: Session("UserID") =
Request.Querystring("UserID")
' Hvorledes gør jeg det aktuelle UserID tilgængeligt i den næste asp`er
Conn.Close
Set Conn = Nothing
%>
</body>
</html>
------------------------
sendsvar ser således ud:
Først formularen i en lidt forkortet udgave.
<form action="sendsvar.asp" method="POST">
<table border="0" bgcolor="#ffffff" >
<textarea name="svartekst" rows="8" cols="31"></textarea>
<p><input type="submit" value="Send indholdet">
<input type="reset" value="Slet indholdet">
</form>
<%
' Endnu en mulighed jeg har prøvet: strUserID =
Trim(Request.UserID("UserID"))
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("styr.mdb")
Conn.Open DSN
'Også en afprøvet metode:request.querystring("PostID")
'Og endnu en:Session("PostID") = Request.Querystring("UserID")
'En mere:Response.Write Session("UserID")
'Er det her der skal stå noget, for at fange det konkrete brugerID fra
findefrem.asp ?
Conn.Execute("SELECT * FROM brugere WHERE UserID = ('"&
Request.Querystring("UserID") &"')")
'Jeg ved godt der er noget "mismacth" mellem datatypes. Det er den
fejlmelding jeg får når jeg
'kører filerne.Det er dog nok ikke det der er hovedproblemet eller.. ?
Conn.Execute("INSERT INTO postbox (komtar) VALUES('"&
request.form("svartekst") & "')")
Conn.Close
Set Conn = Nothing
%>
<hr>
</center>
</body>
</html>
Hvis du fangede hvad problemet er og kender svaret, ville det være fedt
hvis du gav "ord" fra dig.
Det er muligt at der er nogle enkelte syntaksfejl i ovenstående. Hvis
der er det, så se bort fra det.De stammer så fra kopieringen til denne
tekstfil. Det er ikke det der er problemet. Det hele fungerer fint.
Problemet er et metodeproblem. Og jeg er jo ikke nogen høg til det her
(endnu).
Steen Blir Ved Stædig
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP ???
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials