Hvordan får jeg lavet så mine bruger kan skrive en kommentar
Hej alle jer eksperter :-)Jeg er ikke nogen ørn til hjemmesider, men har alligevel fået en bikset sammen og vil nu gerne have nogen tilføjelser, jeg ved dog ikke hvordan.
Hvordan får jeg lavet så mine bruger kan skrive til databasen og det at der ved bliver vist på siden?
Jeg vil gerne at det bliver vist som
Kommentar(0) hvis der ingen kommentar er og at det er på ordet kommentar man trykker for at skrive en kommentar og også der man trykker, hvis man vil læse kommentaren der er skrevet. Hvis der så er skrevet en kommentar så ser det således ud
Kommentar(1)
Jeg håber det giver mening.
Min database er lavet i Access
Min ”Blog” tabel indeholder:
id | dato | overskrift | billede | indhold
Den fungere som den skal, nu vil jeg dig gerne have mine læsere skal kunne skrive en kommentar og har derfor lavet en tabel som ser således ud og ligger i samme db som Blog
Min ”Kommentar” tabel indeholder:
ID | BlogID | Dato | Kommentar
Sådan ser ”det” ud der bruges til at skrive min Blog nu.
<%
Session.LCID = 1030
%>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DataSource = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("min_databasse.mdb") & " ;"
Conn.Open DataSource
SQL_blog = "SELECT TOP 25 * FROM blog ORDER BY id DESC"
Set RS = Conn.Execute(SQL_blog)
IF RS.EOF THEN
Response.Write "der er ingen data"
ELSE
WHILE NOT RS.EOF
Dim strblog
strblog=rs("indhold")
if strblog <> "" then
strblog=Replace(strblog,vbCrLf,"<br/>")
else
strblog = ""
end if
%>
<h4><%=RS("overskrift")%></h4><%=RS("billede")%>
<FONT SIZE="1"><%=RS("dato")%></font>
<br><br>
<%=strblog%>
<br><br>
<%
RS.MoveNext
WEND
END IF
RS.Close
Conn.close
Set Conn = Nothing
%>
Siden kan ses på
www.catarinas.dk
Mvh
Catarina
