/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Et bedre forsøg på et spørgsmål. Access og~
Fra : Steen Stædig


Dato : 15-08-01 14:18

Der prøves lige en gang til:

Denne asp`er kalder jeg for findefrem.asp
Med den kan der søges i databasen og udskrives søgeresultat
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)
'Gennemløber hele indholdet
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 link m.m.
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 hele virker fint bortset fra. . .Det er
ikke det der er problemet. Problemet er et metodeproblem. Og jeg
er jo ikke nogen høg til det her (endnu).


Steen majet 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

 
 
Søg
Reklame
Statistik
Spørgsmål : 177557
Tips : 31968
Nyheder : 719565
Indlæg : 6408868
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste