Avatar billede tgm Nybegynder
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 &quot;Former for ophold&quot;</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&nbsp;&nbsp; <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&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="text" name="By" size="20"></p>
  <p align="left">Tlf&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <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&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="checkbox" name="Weekendophold" value="ON"></p>
  <p align="left">Forlænget weekend&nbsp;&nbsp;
  <input type="checkbox" name="Forængetweekend" value="ON"></p>
  <p align="left">Slap a` dage&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="checkbox" name="Slapadage" value="ON"></p>
  <p align="left">Sen weekend&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="checkbox" name="Senweekend" value="ON"></p>
  <p align="left">Golf ophold&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <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">&nbsp;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">&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="reset" value="Anullere" name="Anullere"></p>
</form>

</body>

</html>
Avatar billede janbangm Nybegynder
21. april 2003 - 15:01 #1
Jeg tror du skal prøve i ASP gruppen
Avatar billede tgm Nybegynder
21. april 2003 - 15:04 #2
jeg ved godt det måske er en forkert kategori, men hjælp alligevel!
Avatar billede tgm Nybegynder
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 &quot;Former for ophold&quot;</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&nbsp;&nbsp; <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&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="text" name="By" size="20" tabindex="4"></p>
  <p align="left">Tlf&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <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&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="checkbox" name="Weekendophold" value="ON" tabindex="6"></p>
  <p align="left">Forlænget weekend&nbsp;&nbsp;
  <input type="checkbox" name="Forængetweekend" value="ON" tabindex="7"></p>
  <p align="left">Slap a` dage&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="checkbox" name="Slapadage" value="ON" tabindex="8"></p>
  <p align="left">Sen weekend&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="checkbox" name="Senweekend" value="ON" tabindex="9"></p>
  <p align="left">Golf ophold&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
  <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">&nbsp;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">&nbsp;&nbsp;&nbsp;&nbsp;
  <input type="reset" value="Anullere" name="Anullere" tabindex="14"></p>
</form>

</body>

</html>
Avatar billede sjap Praktikant
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  :-)
Avatar billede terry Ekspert
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
Avatar billede terry Ekspert
21. april 2003 - 17:18 #6
Or maybe even Frontpage
Avatar billede tgm Nybegynder
21. april 2003 - 17:22 #7
Avatar billede terry Ekspert
21. april 2003 - 17:26 #8
tak :o)
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester