hvis bestemt tilføjelse istedet for alle...!
Haloha eksperter...!Jeg har en side der viser alle de annoncer der er oprettet i min database (SQL)
jeg vil gerne gøre sådan, at den på en anden side, kun viser det den bestemte person har tilføjet (den man er logget ind som)
asp koden til den side der viser ALLE tilføjelserne ser således ud:
<%
Dim Alder
DIM Koen
Dim Omraade
Dim Kategori
Dim Conn, Rec
If Request.ServerVariables("CONTENT_LENGTH") <> 0 Then
Omraade = request.form("Omraade")
Koen = request.form("Koen")
Alder = request.form("Alder")
Kategori = request.form("Kategori")
else
Omraade = null
Koen = null
Alder = 0
Kategori = null
end if
if not isnumeric(Alder) Then Alder = 0
If len(Omraade) < 1 Then omraade = Null
If len(Koen) < 1 Then Koen = Null
If len(Kategori) < 1 Then Kategori = Null
Set Conn = CreateObject("ADODB.Connection")
conn.Connectionstring = ConnectStr
conn.open
Set MyCom = CreateObject("ADODB.Command")
MyCom.ActiveConnection = conn
MyCom.CommandText = "frj_annonce_soeg"
MyCom.CommandType = adCmdStoredProc
MyCom.Parameters.Append (MyCom.CreateParameter("Omraade",advarchar,adParamInput,50,Omraade))
MyCom.Parameters.Append (MyCom.CreateParameter("Alder",adInteger,adParamInput,0,Alder))
MyCom.Parameters.Append (MyCom.CreateParameter("Koen",advarchar,adParamInput,50,Koen))
MyCom.Parameters.Append (MyCom.CreateParameter("Kategori",advarchar,adParamInput,50,Kategori))
set rec = mycom.execute
%>
________________________________________________________
og det der viser ALLE tilføjelserne ser således ud:
<table border="1" width=800 bordercolor="#C0C0C0" cellspacing="0" cellpadding="2" style="border-collapse: collapse">
<tr>
<td width="200" height="18" valign="top" bgcolor="#E0E0E0">
<font class="10" size="1" face="Verdana"><b>Titel</b></font></td>
<td width="200" height="18" valign="top" bgcolor="#E0E0E0">
<font class="10" size="1" face="Verdana"><b>Kategori</b></font></td>
<td width="50" height="18" valign="top" bgcolor="#E0E0E0">
<font class="10" size="1" face="Verdana"><b>Alder</b></font></td>
<td width="75" height="18" valign="top" bgcolor="#E0E0E0">
<font class="10" size="1" face="Verdana"><b>Køn</b></font></td>
<td width="260" height="18" valign="top" bgcolor="#E0E0E0">
<font class="10" size="1" face="Verdana"><b>Annoncetekst</b></font></td>
<td width="150" height="18" valign="top" bgcolor="#E0E0E0"><font class="10"><b>
<font size="1" face="Verdana">Område</font></b></font></td>
</tr>
<% If Rec.RecordCount > 0 Then
Do While Not Rec.EOF %><font face="Verdana">
<tr>
<td width="200" height="18" valign="top" bgcolor="#FFffff"><font face="Verdana" size="1" class="10"><% Response.Write(Rec("Titel")) %></font></td>
<td width="200" height="18" valign="top" bgcolor="#FFFFFF"><font face="Verdana" size="1" class="10"><% Response.Write(Rec("Kategori")) %></font></td>
<td width="50" height="18" valign="top" bgcolor="#FFFFFF"><font face="Verdana" size="1" class="10"><% Response.Write(Rec("Alder")) %></font></td>
<td width="75" height="18" valign="top" bgcolor="#FFFFFF"><font face="Verdana" size="1" class="10"><% Response.Write(Rec("Koen")) %></font></td>
<td width="260" height="18" valign="top" bgcolor="#FFFFFF"><font face="Verdana" size="1" class="10"><% Response.Write(Rec("Annoncetekst")) %></font></td>
<td width="150" height="18" valign="top" bgcolor="#FFFFFF"><font face="Verdana" size="1" class="10"><% Response.Write(Rec("Omraade")) %></font></td>
</tr>
<% Rec.Movenext
loop
End If %> </font></font>
</table>
________________________________________________________
Jeg mangler lidt hjælp her da jeg ikke ved hvordan jeg kun skal vise de tilføjelser der er oprettet af den man er logget ind som.. hva ska du bruge af informationer til at hjælpe mig?
