20 sidste skrevne indlæg

Kode 

A HREF="mailto:<%=RStemp("email")%>"><IMG SRC="pictures/MAIL_1.gif" TITLE="<%=RStemp("email")%>" BORDER="0"></A>
<% 
END IF
ELSE
%>
<IMG SRC="pictures/MAIL_2.gif" TITLE="Have not added any e-mail.">
<% END IF%>
</TD>

<TD WIDTH="37" ALIGN="center" VALIGN="top">
<%
IF NOT RStemp("icqnummer") = "" THEN
IF RStemp("icqshow") = "no" THEN
%>
<IMG SRC="pictures/ICQ_3.gif" TITLE="He is hiding it from you."></A>
<% ELSE %>
<A HREF="http://public.icq.com/public/panels/respondpanel/links/add.html?<%=RStemp("icqnummer")%>" TARGET="ICQ"><IMG SRC="pictures/ICQ_1.gif" TITLE="Add <%=RStemp("icqnummer")%> to my ICQ list." BORDER="0"></A>
<% END IF %>

<% ELSE %>
<IMG SRC="pictures/ICQ_2.gif" TITLE="Have not added or does not use ICQ.">
<% END IF%>
</TD>
</TR>

<FORM ACTION="command.asp?do=mess&dir=medlem" NAME="mess" METHOD="post">
<INPUT TYPE="hidden" NAME="msg_to" VALUE="<%=Request.QueryString("user")%>">
</TABLE>
<%
SQL = "SELECT * FROM TABEL_MED_EMNER WHERE FORFATTER ='"& Request.QueryString("user") &"' ORDER BY id DESC LIMIT 20"

Set rs = Conn.Execute(SQL)

Do While Not rs.EOF

'Her skal din html-kode være, fx
%>
<table>
<tr>
<td>Brugernavn</td>
<td>Oprettet den</td>
</tr>
<tr>
<td>ThaiazZ</td>
<td>10-01-2006</td>
</tr>
</table>
<%
RS.MoveNext
Loop
rs.close
set rs = nothing
%>
<% IF session("inloggad") = "ja" AND Request.QueryString("user") <> session("username") THEN %>

<INPUT TYPE="text" CLASS="text" NAME="subject" STYLE="width: 150;" VALUE="Subject" size="20"><BR>
<TEXTAREA CLASS="text" STYLE="width: 150; height: 40;" NAME="messet" rows="1" cols="20">Your message</TEXTAREA>
<% IF session("admin") = "super" OR session("admin") = "yes" THEN %>
<INPUT TYPE="checkbox" NAME="send_as_admin" VALUE="1"> <B>Send as Admin?</B>
<% END IF %>
<INPUT TYPE="image" SRC="pictures/knappar/skicka.gif" ALT="" OnClick="return validate();">

<% END IF %>

</TD>
</TR>

</FORM>

<TR>
<FORM ACTION="medlem.asp?user=<%=Request.QueryString("user")%>" NAME="bas" METHOD=POST>
<TD WIDTH="374"><FONT SIZE="1">

<% IF session("admin") = "yes" OR session("admin") = "super" THEN %>



<IMG SRC="pictures/inv.gif"> <SELECT CLASS="text" STYLE="width: 200;" NAME="gourl">
<OPTION SELECTED>Admin menu</OPTION>

Prøv lige det her! Du skal lige rette koden til, så den passer til din database og tabel!

Kode 

'Her skal din html-kode være, fx
%>
<table>
<tr>
<td>Brugernavn</td>
<td>Oprettet den</td>
</tr>
<tr>
<td>ThaiazZ</td>
<td>10-01-2006</td>
</tr>
</table>

Skal der stå mit navn ? denne er jo den fil man bruger til alle brugere

Det ved jeg! Men du skal RETTE den til. Altså du skriver den rigtige tabel navn og så skriver du overskrift der hvor dit navn står, fx <%=rs("overskrift")%>. Er det et tagwall eller hvad er det, som bruger skriver og der skal vises de seneste 20 indlæg af? Det vil hjælpe hvis jeg fik af vide hvilke felter tabellen indeholdte!

**********
F. Mahmood

Det ved jeg! Men du skal RETTE den til. Altså du skriver den rigtige tabel navn og så skriver du overskrift der hvor dit navn står, fx <%=rs("overskrift")%>. Er det et tagwall eller hvad er det, som bruger skriver og der skal vises de seneste 20 indlæg af? Det vil hjælpe hvis jeg fik af vide hvilke felter tabellen indeholdte!

**********
F. Mahmood

Jeg har rettet det med tabelnavnet men er stadig i tvivl om hvad "forfatter" skal ændres til

Det skal være de sidste 20 indlæg af den bruger man skriver ja

Forresten kan de her hjælpe, det er tabellerne:
http://img374.imageshack.us/my.php?image=16wt.jpg
http://img374.imageshack.us/my.php?image=20ny.jpg
http://img489.imageshack.us/my.php?image=38bp.jpg

og så se her, det er efter jeg prøvede at uploade den
der højre klikked jeg på vis kilde og se hva den kom med (kun en meget meget meget lille del

Kode 

 

<FORM ACTION="command.asp?do=mess&dir=medlem" NAME="mess" METHOD="post">
<INPUT TYPE="hidden" NAME="msg_to" VALUE="ThiazZ">
</TABLE>



</TD>
</TR>

</FORM>

<TR>
<FORM ACTION="medlem.asp?user=ThiazZ" NAME="bas" METHOD=POST>
<TD WIDTH="374"><FONT SIZE="1">

Det er hva jeg ku finde af det jeg laved.. og man ku ikk se nogen forandring i profilen overhovedet

Den del jeg uploadet ser sådan her ud:

Kode 

SQL = "SELECT * FROM Forum_topic WHERE FORFATTER ='"& Request.QueryString("user") &"' ORDER BY id DESC LIMIT 20"

Set rs = Conn.Execute(SQL)

Do While Not rs.EOF

'Her skal din html-kode være, fx
%>
<table>
<tr>
<td>Username</td>
<td>Created on:</td>
</tr>
<tr>
<td>ThaiazZ</td>
<td>11-01-2006</td>
</tr>
</table>
<%
RS.MoveNext
Loop
rs.close
set rs = nothing
%>
<% IF session("inloggad") = "ja" AND Request.QueryString("user") <> session("username") THEN %>

Tabellerne hedder:

Forum_svar
Forum_topic

Hehe, jeg kan ikke bruge navne til ret meget. Fortæl hvad de to bruges til og hvilke felter de har!

**********
F. Mahmood