21. april 2003 - 14:37
Der er
7 kommentarer og
1 løsning
Hvorfor virker det ikke?
<html>
<head>
<meta http-equiv="Content-Language" content="da">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>New Page 1</title>
</head>
<body background="bag.gif">
<p align="center"><font size="5">Bestil Ophold her</font></p>
<p align="left"><font size="4">Her kan i bestille jeres ophold over internettet,
hvis i vil vide hvad weekend opholdene indeholder så gå til "Former for ophold"</font></p>
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveDatabase" SuggestedExt="asp" S-DataConnection="Database1" S-RecordSource="kundenr" U-Database-URL="fpdb/kundrereg..mdb" S-Form-Fields="Golfophold Senweekend Postnr Weekendophold By Bestillingsdato Adresse Slapadage Tlf Forængetweekend Navn Kommentar" S-Form-DBFields="Golf Sen Postnr weekend\ ophold By Bestillings\ dato Adresse Slap\ a\ dage Tlf Forlænget Navn Evt\ kommentar" --><p align="left">
Navn <input type="text" name="Navn" size="20"></p>
<p align="left">Adresse <input type="text" name="Adresse" size="20"></p>
<p align="left">Postnr <input type="text" name="Postnr" size="5"></p>
<p align="left">By
<input type="text" name="By" size="20"></p>
<p align="left">Tlf
<input type="text" name="Tlf" size="20"></p>
<p align="left">Vi vil gerne bestille et af de nedenstående ophold</p>
<p align="left">Weekend ophold
<input type="checkbox" name="Weekendophold" value="ON"></p>
<p align="left">Forlænget weekend
<input type="checkbox" name="Forængetweekend" value="ON"></p>
<p align="left">Slap a` dage
<input type="checkbox" name="Slapadage" value="ON"></p>
<p align="left">Sen weekend
<input type="checkbox" name="Senweekend" value="ON"></p>
<p align="left">Golf ophold
<input type="checkbox" name="Golfophold" value="ON"></p>
<p align="left">Bestillings dato
<input type="text" name="Bestillingsdato" size="20"> (gerne også klokkeslet
ved ankoms)</p>
<p align="left"> Eventuelle kommentarer om ophold ( spm. om ophold,
oplysning om mad allergi, m.m.) </p>
<p align="left"><textarea rows="8" name="Kommentar" cols="39"></textarea></p>
<p align="left">Der vil blive tilsendt jer en ordreberkæftelse inden de næste
par dage, for at oplyse om bestillingen.</p>
<p align="left"><input type="submit" value="Submit" name="submit">
<input type="reset" value="Anullere" name="Anullere"></p>
</form>
</body>
</html>
21. april 2003 - 15:17
#3
ved ikke om dette siger noget mere
<%
' FP_ASP ASP Automatically generated by a Frontpage Component. Do not Edit.
On Error Resume Next
Session("FP_OldCodePage") = Session.CodePage
Session("FP_OldLCID") = Session.LCID
Session.CodePage = 1252
Session.LCID = 1030
Err.Clear
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, "Cannot create connection"
Set fp_rs = Server.CreateObject("ADODB.Recordset")
FP_DumpError strErrorUrl, "Cannot create record set"
fp_conn.Open Application("Database1_ConnectionString")
FP_DumpError strErrorUrl, "Cannot open database"
fp_rs.Open "kundenr", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable
FP_DumpError strErrorUrl, "Cannot open record set"
fp_rs.AddNew
FP_DumpError strErrorUrl, "Cannot add new record set to the database"
Dim arFormFields0(12)
Dim arFormDBFields0(12)
Dim arFormValues0(12)
arFormFields0(0) = "Golfophold"
arFormDBFields0(0) = "Golf"
arFormValues0(0) = Request("Golfophold")
arFormFields0(1) = "Senweekend"
arFormDBFields0(1) = "Sen"
arFormValues0(1) = Request("Senweekend")
arFormFields0(2) = "Weekendophold"
arFormDBFields0(2) = "weekend ophold"
arFormValues0(2) = Request("Weekendophold")
arFormFields0(3) = "Postnr"
arFormDBFields0(3) = "Postnr"
arFormValues0(3) = Request("Postnr")
arFormFields0(4) = "Bestillingsdato"
arFormDBFields0(4) = "Bestillings dato"
arFormValues0(4) = Request("Bestillingsdato")
arFormFields0(5) = "By"
arFormDBFields0(5) = "By"
arFormValues0(5) = Request("By")
arFormFields0(6) = "Adresse"
arFormDBFields0(6) = "Adresse"
arFormValues0(6) = Request("Adresse")
arFormFields0(7) = "Slapadage"
arFormDBFields0(7) = "Slap a dage"
arFormValues0(7) = Request("Slapadage")
arFormFields0(8) = "Forængetweekend"
arFormDBFields0(8) = "Forlænget"
arFormValues0(8) = Request("Forængetweekend")
arFormFields0(9) = "Tlf"
arFormDBFields0(9) = "Tlf"
arFormValues0(9) = Request("Tlf")
arFormFields0(10) = "Navn"
arFormDBFields0(10) = "Navn"
arFormValues0(10) = Request("Navn")
arFormFields0(11) = "Kommentar"
arFormDBFields0(11) = "Evt kommentar"
arFormValues0(11) = Request("Kommentar")
FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0
If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Browser_type"
End If
If Request.ServerVariables("REMOTE_HOST") <> "" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Remote_computer_name"
End If
FP_SaveFieldToDB fp_rs, Now, "Timestamp"
If Request.ServerVariables("REMOTE_USER") <> "" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "User_name"
End If
fp_rs.Update
FP_DumpError strErrorUrl, "Cannot update the database"
fp_rs.Close
fp_conn.Close
FP_FormConfirmation "text/html; charset=windows-1252",_
"Form Confirmation",_
"Thank you for submitting the following information:",_
"bestil%20her.asp",_
"Return to the form."
End If
End If
Session.CodePage = Session("FP_OldCodePage")
Session.LCID = Session("FP_OldLCID")
%>
<html>
<head>
<meta http-equiv="Content-Language" content="da">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>New Page 1</title>
</head>
<body background="bag.gif">
<p align="center"><font size="5">Bestil Ophold her</font></p>
<p align="left"><font size="4">Her kan i bestille jeres ophold over internettet,
hvis i vil vide hvad weekend opholdene indeholder så gå til "Former for ophold"</font></p>
<form method="POST" action="bestil%20her.asp" webbot-action="--WEBBOT-SELF--">
<!--webbot bot="SaveDatabase" SuggestedExt="asp" S-DataConnection="Database1" S-RecordSource="kundenr" U-Database-URL="fpdb/kundrereg..mdb" S-Builtin-Fields="HTTP_USER_AGENT REMOTE_HOST Timestamp REMOTE_USER" S-Builtin-DBFields="Browser_type Remote_computer_name Timestamp User_name" S-Form-Fields="Golfophold Senweekend Weekendophold Postnr Bestillingsdato By Adresse Slapadage Forængetweekend Tlf Navn Kommentar" S-Form-DBFields="Golf Sen weekend\ ophold Postnr Bestillings\ dato By Adresse Slap\ a\ dage Forlænget Tlf Navn Evt\ kommentar" U-ASP-Include-Url="_fpclass/fpdbform.inc" startspan --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="0"><!--#include file="_fpclass/fpdbform.inc"--><!--webbot bot="SaveDatabase" i-checksum="40548" endspan --><p align="left">
Navn <input type="text" name="Navn" size="20" tabindex="1"></p>
<p align="left">Adresse
<input type="text" name="Adresse" size="20" tabindex="2"></p>
<p align="left">Postnr <input type="text" name="Postnr" size="5" tabindex="3"></p>
<p align="left">By
<input type="text" name="By" size="20" tabindex="4"></p>
<p align="left">Tlf
<input type="text" name="Tlf" size="20" tabindex="5"></p>
<p align="left">Vi vil gerne bestille et af de nedenstående ophold</p>
<p align="left">Weekend ophold
<input type="checkbox" name="Weekendophold" value="ON" tabindex="6"></p>
<p align="left">Forlænget weekend
<input type="checkbox" name="Forængetweekend" value="ON" tabindex="7"></p>
<p align="left">Slap a` dage
<input type="checkbox" name="Slapadage" value="ON" tabindex="8"></p>
<p align="left">Sen weekend
<input type="checkbox" name="Senweekend" value="ON" tabindex="9"></p>
<p align="left">Golf ophold
<input type="checkbox" name="Golfophold" value="ON" tabindex="10"></p>
<p align="left">Bestillings dato
<input type="text" name="Bestillingsdato" size="20" tabindex="11"> (gerne også
klokkeslet ved ankomst)</p>
<p align="left"> Eventuelle kommentarer om ophold ( spm. om ophold,
oplysning om mad allergi, m.m.) </p>
<p align="left"><textarea rows="8" name="Kommentar" cols="39" tabindex="12"></textarea></p>
<p align="left">Der vil blive tilsendt jer en ordreberkæftelse inden de næste
par dage, for at oplyse om bestillingen.</p>
<p align="left">
<input type="submit" value="Submit" name="submit" tabindex="13">
<input type="reset" value="Anullere" name="Anullere" tabindex="14"></p>
</form>
</body>
</html>
21. april 2003 - 16:03
#4
jeg vil give janbangm ret. Det her fuldstændigt uforståeligt. Hvis der findes nogen her, der kan lidt ASP, så tror jeg også de kigger derovre. Så jeg tror afgjort at dine chancer vil være betydeligt større der.
Desuden tror jeg det vil være en god ide, hvis du kan være lidt mere konkret med hvad problemet er.
Blot en "Access-atlets" tanker :-)
21. april 2003 - 17:18
#5
please move this to ASP programming it has almost NOTHING to do with Access, and you have a better chance of getting an answer