HJÆLP - linieskift virker ikke i form
hej hvorfor kommer der ikke linie skift når man laver et linie skift i denne form ?<%
\' FP_ASP ASP genereret automatisk af en FrontPage-komponent. Undlad at redigere.
On Error Resume Next
strErrorUrl = \"\"
If Request.ServerVariables(\"REQUEST_METHOD\") = \"POST\" Then
If Request.Form(\"VTI-GROUP\") = \"0\" Then
Err.Clear
Set fp_conn = Server.CreateObject(\"ADODB.Connection\")
FP_DumpError strErrorUrl, \"Der kan ikke oprettes forbindelse.\"
Set fp_rs = Server.CreateObject(\"ADODB.Recordset\")
FP_DumpError strErrorUrl, \"Postsæt kan ikke åbnes.\"
fp_conn.Open Application(\"besked_ConnectionString\")
FP_DumpError strErrorUrl, \"Databasen kan ikke åbnes.\"
fp_rs.Open \"Resultater\", fp_conn, 1, 3, 2 \' adOpenKeySet, adLockOptimistic, adCmdTable
FP_DumpError strErrorUrl, \"Postsæt kan ikke åbnes.\"
fp_rs.AddNew
FP_DumpError strErrorUrl, \"Der kan ikke føjes nye poster til databasen.\"
Dim arFormFields0(2)
Dim arFormDBFields0(2)
arFormFields0(0) = \"besked\"
arFormDBFields0(0) = \"besked\"
arFormFields0(1) = \"navn\"
arFormDBFields0(1) = \"navn\"
FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0
If Request.ServerVariables(\"REMOTE_HOST\") <> \"\" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables(\"REMOTE_HOST\"), \"Navn_på_fjerncomputer\"
End If
If Request.ServerVariables(\"HTTP_USER_AGENT\") <> \"\" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables(\"HTTP_USER_AGENT\"), \"Web-browsertype\"
End If
FP_SaveFieldToDB fp_rs, Now, \"Tidsstempel\"
If Request.ServerVariables(\"REMOTE_USER\") <> \"\" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables(\"REMOTE_USER\"), \"Brugernavn\"
End If
fp_rs.Update
FP_DumpError strErrorUrl, \"Databasen kan ikke opdateres.\"
fp_rs.Close
fp_conn.Close
Response.Redirect \"r-b-k.asp\"
End If
End If
%>
<html>
<head>
<meta http-equiv=\"Content-Language\" content=\"da\">
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<meta name=\"GENERATOR\" content=\"Microsoft FrontPage 4.0\">
<meta name=\"ProgId\" content=\"FrontPage.Editor.Document\">
<title>navn</title>
</head>
<body>
<form method=\"POST\" name=\"besked\" action=\"--WEBBOT-SELF--\">
<!--webbot bot=\"SaveDatabase\" startspan SuggestedExt=\"asp\"
U-ASP-Include-Url=\"../_fpclass/fpdbform.inc\" S-DataConnection=\"besked\"
S-RecordSource=\"Resultater\" U-Database-URL=\"besked.mdb\"
U-Confirmation-Url=\"r-b-k.asp\"
S-Builtin-Fields=\"REMOTE_HOST HTTP_USER_AGENT Timestamp REMOTE_USER\"
S-Builtin-DBFields=\"Navn_på_fjerncomputer Web-browsertype Tidsstempel Brugernavn\"
S-Form-Fields=\"besked navn\" S-Form-DBFields=\"besked navn\" --><input TYPE=\"hidden\" NAME=\"VTI-GROUP\" VALUE=\"0\"><!--#include file=\"../_fpclass/fpdbform.inc\"--><!--webbot
bot=\"SaveDatabase\" endspan -->
<div align=\"center\">
<center>
<table border=\"3\" width=\"500\" bordercolorlight=\"#000080\" bordercolordark=\"#000080\" bordercolor=\"#000080\" cellspacing=\"1\">
<tr>
<td width=\"100%\" bgcolor=\"#000080\" bordercolorlight=\"#000080\" bordercolordark=\"#000080\">
<p align=\"center\"><font color=\"#FFFFFF\"><b>Velkommen </b></font></p>
</td>
</tr>
<tr>
<td width=\"100%\" bordercolorlight=\"#000080\" bordercolordark=\"#000080\">
<table border=\"0\" width=\"100%\">
<tr>
<td width=\"10%\"><font color=\"#000080\">navn :</font></td>
<td width=\"90%\"><input type=\"text\" name=\"navn\" size=\"50\"></td>
</tr>
<tr>
<td width=\"10%\" valign=\"top\"><font color=\"#000080\">Tekst:</font></td>
<td width=\"90%\"><textarea rows=\"6\" name=\"besked\" cols=\"42\"></textarea></td>
</tr>
<tr>
<td width=\"10%\"></td>
<td width=\"90%\">
<input type=\"submit\" value=\"Send besked\" name=\"send\"><input type=\"reset\" value=\"fortryd\" name=\"fortryd\"></td>
</tr>
</table>
</td>
</tr>
</table>
</center>
</div>
</form>
</body>
</html>
