Læs Mail..
Jeg har lavet et mailsystem, jeg mangler bare read mail siden.. det skal være såden readmail.asp?id=12 og så hvis ikke mail er til en skal der stå "Denne mail er ikke til dig...!"<%
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("community.mdb")
strSQL = "SELECT * FROM Mail WHERE Til = '" & Session("brugernavn") & "'"
Set rs = myConn.Execute(strSQL)
Do until rs.EOF
Response.Write "Til:<br>"
Response.Write rs("Til") & "<br>Fra:<br> " & rs("Fra") & "<br>Emne:<br>" & rs("Emne") & "<br>Besked:<br>" & rs("Besked") & ""
Response.Write "<br>"
rs.movenext
loop
rs.close
set rs = nothing
myConn.close
set myConn = nothing
%>
.. såden ser min mailbox fil ud! Jeg skal have såden noget "if mailmodtager = session("brugernavn")" og så hvis ikke den er til ham skal der stå Du kan ikke læse andres post eller lign.. Håber du kan forstå hvor jeg vil hen.. Hvis ikke kan jeg forklare det bedre...!
