21. februar 2002 - 21:24Der er
15 kommentarer og 1 løsning
Kommentar
Hvem kan lave et script som kan tage imod kommentarer? Det eneste der skal udfyldes er 2 felter... et hvor man indtaster sit navn. og et hvor man indtaster sine kommentarer. Når man trykker på [OK] Knappen skal man få en "Tak For Dit Indlæg"
Select Case mode Case "vis" ' DSNLess forbindelse til databasen strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("database.mdb")
Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open strDSN
strSQL = "SELECT * FROM indlæg SORT BY dato" Set rs = myConn.Execute(strSQL)
<TABLE> <% If rs.EOF then %> Der er desværre ingen indlæg! <% Else Do While NOT rs.EOF %> <TR><TD> Navn: </TD> <TD> <%= rs.navn %> </TD></TR> <TR><TD> Kommentar: </TD> <TD> <%= rs.kommentar %><HR><BR> </TD></TR> <% Loop End If %> </TABLE> </body> </html>
<% Case "indsæt"
navn = Request.form("navn") kommentar = Request.form("kommentar") strSQL = "INSERT INTO indlæg navn,kommetar,dato VALUES(navn,kommentar,Now)" Set rs = myConn.Execute(strSQL)
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.