Søg
Avatar billede neoo Nybegynder
28. december 2003 - 14:00 Der er 20 kommentarer og
1 løsning

knap virker ikke ?

hej til alle.


jeg sider og laver en site, men på en af siderne fungere knappen ikke . (det gjorde den før jeg skfitet designet ud)

er der nogen der har oplevet det før ?
koden for knappen ser sådan ud:
<input type="submit" name="Action" value="Opret billet" style="font-weight: 700">
Avatar billede Jman Praktikant
28. december 2003 - 14:03 #1
hvad får du af fejl ?
Avatar billede neoo Nybegynder
28. december 2003 - 14:06 #2
jeg får ikke nogen fejl, men knappen fungere hellere ikke som før, den insætter ikke noget databasen, og mine javascripts virker hellere ikke :(
Avatar billede eagleeye Praktikant
28. december 2003 - 14:10 #3
Har du disabled javascript i din browser?
Eller bliver der kaldt en validator i dit form tag?
Avatar billede Jman Praktikant
28. december 2003 - 14:10 #4
Kan det skyldes at din </form> ikke er der mere, eller er på den forkerte side af submit-knappen ?
hvordan ser koden ud ?
Avatar billede neoo Nybegynder
28. december 2003 - 14:24 #5
superior  jeg trorre du ret, det er noget med formen men jeg kan ikke komme ud af det :(
Avatar billede neoo Nybegynder
28. december 2003 - 14:25 #6
koden ser sådan ud


<%
if session("login") = "" Then
Response.redirect("log in.asp")
end if
%>


<%
Response.expires = 0
Response.expiresabsolute = Now() - 1
Response.addHeader "pragma", "no-cache"
Response.addHeader "cache-control", "private"
Response.CacheControl = "no-cache"
%>
<!--#include file="db.asp"-->

<%
response.buffer = true

'get action
a=request.form("a")

'get fields from form

x_Id = Request.Form("x_Id")
x_dato = Request.Form("x_dato")
x_total=Request.Form("x_total")
x_Maaned = Request.Form("x_Maaned")
x_navn = Request.Form("x_navn")
x_adresse = Request.Form("x_adresse")
x_postnr = Request.Form("x_postnr")
x_city = Request.Form("x_city")
x_Telefon = Request.Form("x_Telefon")
x_Mobiltelefon = Request.Form("x_Mobiltelefon")
x_email = Request.Form("x_email")
x_Deltager = Request.Form("x_Deltager")
x_Tekst = Request.Form("x_Tekst")
x_afrejse = Request.Form("x_afrejse")
x_ankomst = Request.Form("x_ankomst")
x_afrejsedato = Request.Form("x_afrejsedato")
x_hjemrejsedato = Request.Form("x_hjemrejsedato")
x_Destairlines = Request.Form("x_Destairlines")
x_flightnr = Request.Form("x_flightnr")
x_Betbetingelser = Request.Form("x_Betbetingelser")
x_Betsenest = Request.Form("x_Betsenest")
x_Antal = Request.Form("x_Antal")
x_AntalBarn = Request.Form("x_AntalBarn")
x_Skat = Request.Form("x_Skat")
x_AntalInfant = Request.Form("x_AntalInfant")
x_HandlingFee = Request.Form("x_HandlingFee")
x_Voksen = Request.Form("x_Voksen")
x_Barn = Request.Form("x_Barn")
x_Skatbarn = Request.Form("x_Skatbarn")
x_Total = Request.Form("x_Total")
x_Handlingfeebarn = Request.Form("x_Handlingfeebarn")
x_Totalbarn = Request.Form("x_Totalbarn")
x_Infant = Request.Form("x_Infant")
x_medarbejder = Request.Form("x_medarbejder")
x_Skatinfant = Request.Form("x_Skatinfant")
x_Handlingfeeinfant = Request.Form("x_Handlingfeeinfant")
x_Totalinfant = Request.Form("x_Totalinfant")
x_KF8bspris = Request.Form("x_KF8bspris")
x_Billetnummer = Request.Form("x_Billetnummer")
x_Salgspris = Request.Form("x_Salgspris")
x_Totalalle = Request.Form("x_Totalalle")
x_Commision = Request.Form("x_Commision")
x_TotalAgent = Request.Form("x_TotalAgent")
x_Provision = Request.Form("x_Provision")
x_AntalVoksenSalg = Request.Form("x_AntalVoksenSalg")
x_AntalBarnSalg = Request.Form("x_AntalBarnSalg")
x_AntalInfantSalg = Request.Form("x_AntalInfantSalg")
x_PrisVoksenSalg = Request.Form("x_PrisVoksenSalg")
x_PrisBarnSalg = Request.Form("x_PrisBarnSalg")
x_PrisInfantSalg = Request.Form("x_PrisInfantSalg")
x_SkatVoksenSalg = Request.Form("x_SkatVoksenSalg")
x_SkatBarnSalg = Request.Form("x_SkatBarnSalg")
x_SkatInfantSalg = Request.Form("x_SkatInfantSalg")

x_TotalSalgVoksen = Request.Form("x_TotalSalgVoksen")
x_TotalSalgBarn = Request.Form("x_TotalSalgBarn")
x_TotalSalgInfant = Request.Form("x_TotalSalgInfant")
x_TotalSalg = Request.Form("x_TotalSalg")
x_Profit = Request.Form("x_Profit")
x_PrisTyrkietVoksen = Request.Form("x_PrisTyrkietVoksen")
x_PrisTyrkietBarn = Request.Form("x_PrisTyrkietBarn")
x_PrisTyrkietInfant = Request.Form("x_PrisTyrkietInfant")
x_Depositium = Request.Form("x_Depositium")
x_Restbelob = Request.Form("x_Restbelob")
x_afrejse1 = Request.Form("x_afrejse1")
x_ankomst1 = Request.Form("x_ankomst1")
x_flightnr1 = Request.Form("x_flightnr1")
x_afrejsedato1 = Request.Form("x_afrejsedato1")
x_depart = Request.Form("x_depart")
x_depart1 = Request.Form("x_depart1")
x_arrival = Request.Form("x_arrival")
x_arrival1 = Request.Form("x_arrival1")
x_forsikring = Request.Form("x_forsikring")




' Open Connection to the database
set conn = Server.CreateObject("ADODB.Connection")
conn.Open xDb_Conn_Str

Select Case a
    Case "A": ' Add

        ' Open record
        strsql = "SELECT * FROM [OpretBooking] WHERE 0 = 1"

        set rs = Server.CreateObject("ADODB.Recordset")
        rs.Open strsql, conn, 1, 2

        rs.AddNew

       
tmpFld = x_dato
If IsDate(tmpFld) Then
    rs("dato") = cDate(tmpFld)
Else
    rs("dato") = Null
End If
tmpFld = Trim(x_Maaned)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Maaned") = tmpFld

tmpFld = Trim(x_Betbetingelser)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Betbetingelser") = tmpFld

tmpFld = Trim(x_navn)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("navn") = tmpFld

tmpFld = Trim(x_dato)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Dato") = tmpFld

tmpFld = Trim(x_adresse)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("adresse") = tmpFld

tmpFld = x_postnr
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("postnr") = cLng(tmpFld)
tmpFld = Trim(x_city)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("city") = tmpFld
tmpFld = x_Telefon
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Telefon") = cLng(tmpFld)
tmpFld = x_Profit
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Profit") = cLng(tmpFld)
tmpFld = Trim(x_email)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("email") = tmpFld
tmpFld = Trim(x_Deltager)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Deltager") = tmpFld
tmpFld = Trim(x_Tekst)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Tekst") = tmpFld

tmpFld = Trim(x_afrejse)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("afrejse") = tmpFld
tmpFld = Trim(x_afrejse1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("afrejse1") = tmpFld

tmpFld = Trim(x_ankomst)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("ankomst") = tmpFld

tmpFld = Trim(x_ankomst1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("ankomst1") = tmpFld


tmpFld = x_afrejsedato
If IsDate(tmpFld) Then
    rs("afrejsedato") = cDate(tmpFld)
Else
    rs("afrejsedato") = Null
End If

tmpFld = x_hjemrejsedato
If IsDate(tmpFld) Then
    rs("hjemrejsedato") = cDate(tmpFld)
Else
    rs("hjemrejsedato") = Null
End If
tmpFld = Trim(x_Destairlines)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Destairlines") = tmpFld

tmpFld = Trim(x_depart)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("depart") = tmpFld

tmpFld = Trim(x_depart1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("depart1") = tmpFld

tmpFld = Trim(x_arrival1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("arrival1") = tmpFld



tmpFld = Trim(x_arrival)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("arrival") = tmpFld


tmpFld = Trim(x_flightnr)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("flightnr") = tmpFld

tmpFld = Trim(x_flightnr1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("flightnr1") = tmpFld


tmpFld = x_Betsenest
If IsDate(tmpFld) Then
    rs("Betsenest") = cDate(tmpFld)
Else
    rs("Betsenest") = Null
End If




TotalFld=0
tmpFld = x_voksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Voksen") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_Antal
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Antal") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)

tmpFld = x_skat
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skat") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")


tmpFld = x_Handlingfee
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfee") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")

tmpFld = x_PrisTyrkietVoksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietVoksen") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")*("0,92")



rs("Total") = TotalFld



TotalFld=0
tmpFld = x_Barn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Barn") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalBarn") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)

tmpFld = x_Skatbarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatbarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalbarn")


tmpFld = x_Handlingfeebarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeebarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalbarn")

tmpFld = x_PrisTyrkietBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietBarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalBarn")*("0,92")




rs("Totalbarn") = TotalFld



TotalFld=0
tmpFld = x_Infant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Infant") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalInfant") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)


tmpFld = x_Skatinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalinfant")

tmpFld = x_Handlingfeeinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeeinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalinfant")

tmpFld = x_PrisTyrkietInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietInfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalInfant")*("0,92")

rs("Totalinfant") = TotalFld



TotalFld=0
tmpFld = x_voksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("voksen") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antal")

tmpFld = x_skat
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skat") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antal")

tmpFld = x_handlingfee
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("handlingfee") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antal")

tmpFld = x_Barn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Barn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarn")


tmpFld = x_Skatbarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatbarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarn")


tmpFld = x_Handlingfeebarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeebarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarn")



tmpFld = x_Infant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Infant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfant")


tmpFld = x_Skatinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfant")


tmpFld = x_Handlingfeeinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeeinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfant")

tmpFld = x_PrisTyrkietVoksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietVoksen") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")*("0,92")


tmpFld = x_PrisTyrkietBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietBarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalBarn")*("0,92")


tmpFld = x_PrisTyrkietInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietInfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalInfant")*("0,92")




rs("Totalalle") = TotalFld


TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalVoksenSalg") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)


tmpFld = x_skatvoksensalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatvoksensalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalVoksenSalg")

tmpFld = x_Provision
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Provision") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)



rs("TotalSalgVoksen") = TotalFld



TotalFld=0
tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalBarnSalg") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)

tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalbarnSalg")


rs("TotalSalgbarn") = TotalFld



TotalFld=0
tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalInfantSalg") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalInfantSalg")

rs("TotalSalginfant") = TotalFld



TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_skatVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skatVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)*rs("antalinfantSalg")


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")

rs("TotalSalg") = TotalFld


TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_skatVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skatVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)*rs("antalinfantSalg")


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")

tmpFld = x_Depositium
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Depositium") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)


rs("Restbelob") = TotalFld



tmpFld = Trim(x_medarbejder)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("medarbejder") = tmpFld

tmpFld = x_Totalalle
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Totalalle") = cDbl(tmpFld)



tmpFld = Trim(x_Billetnummer)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Billetnummer") = tmpFld
tmpFld = x_Salgspris
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Salgspris") = cDbl(tmpFld)


TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_skatVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skatVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")

tmpFld = x_Provision
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Provision") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)


tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")

tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")

tmpFld = x_voksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("voksen") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antal")

tmpFld = x_PrisTyrkietVoksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietVoksen") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("Antal")*("0,92")


tmpFld = x_skat
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skat") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antal")

tmpFld = x_handlingfee
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("handlingfee") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antal")

tmpFld = x_Barn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Barn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalbarn")

tmpFld = x_PrisTyrkietBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietBarn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalBarn")*("0,92")


tmpFld = x_Skatbarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatbarn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalbarn")


tmpFld = x_Handlingfeebarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeebarn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalbarn")



tmpFld = x_Infant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Infant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalinfant")


tmpFld = x_PrisTyrkietInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietInfant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalInfant")*("0,92")

tmpFld = x_Skatinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatinfant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalinfant")


tmpFld = x_Handlingfeeinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeeinfant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalinfant")



rs("provision") = TotalFld




        rs.Update
        rs.Close
        Set rs = Nothing
        conn.Close
        Set conn = Nothing
        Response.Clear
        Response.Redirect "OpretBookingview.asp"
End Select
%>
<!--#include file="include.asp"-->


<html>
<head><title>Opret booking</title>
<script language="JavaScript" src="calendar2.js"></script>
<script>
function pro(f){
x_Totalalle = (f.x_Totalalle.value!="")?+f.x_Totalalle.value:0;
x_total = (f.x_total.value!="")?+f.x_total.value:0;
f.x_Profit.value = x_total-x_Totalalle;
}
</script>

<script type="text/javascript">
function udregn(f){
x_AVSalg = (f.x_AntalVoksenSalg.value!="")?+f.x_AntalVoksenSalg.value:0;
x_PVSalg = (!isNaN(f.x_PrisVoksenSalg.value))?+f.x_PrisVoksenSalg.value:0;
x_ABSalg = (f.x_AntalBarnSalg.value!="")?+f.x_AntalBarnSalg.value:0;
x_PBSalg = (!isNaN(f.x_PrisBarnSalg.value))?+f.x_PrisBarnSalg.value:0;
x_AISalg = (f.x_AntalInfantSalg.value!="")?+f.x_AntalInfantSalg.value:0;
x_PISalg = (!isNaN(f.x_PrisInfantSalg.value))?+f.x_PrisInfantSalg.value:0;
x_SVSalg = (!isNaN(f.x_SkatVoksenSalg.value))?+f.x_SkatVoksenSalg.value:0; 
x_SBSalg = (!isNaN(f.x_SkatBarnSalg.value))?+f.x_SkatBarnSalg.value:0;
x_SISalg = (!isNaN(f.x_SkatInfantSalg.value))?+f.x_SkatInfantSalg.value:0;
x_Fos= (!isNaN(f.x_forsikring.value))?+f.x_forsikring.value:0;
x_Dep= (!isNaN(f.x_Depositium.value))?+f.x_Depositium.value:0;
f.x_total.value = x_PVSalg*x_AVSalg+x_PBSalg*x_ABSalg+x_PISalg*x_AISalg;
f.x_restbelob.value = x_PVSalg*x_AVSalg+x_PBSalg*x_ABSalg+x_PISalg*x_AISalg+x_SVSalg*x_AVSalg+x_SBSalg*x_ABSalg+x_SISalg*x_AISalg+x_Fos-x_Dep;

}
</script>





</head>
<body>

<p>&nbsp;</p>


<table width="100%" border="0" cellspacing="0" cellpadding="10"><tr>
    <td bgcolor="#FFFFFF">
    <form name="online" method="post" action="">
<input type="hidden" name="a" value="A" style="font-weight: 700">
       
<table border="0" width="652" height="624" bgcolor="#336699" id="table13" style="border-collapse: collapse">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="6" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="0" cellspacing="0" width="450" border="0" id="table22">
            <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <td bgcolor="#4682B4" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="5" cellspacing="1" width="100%" border="0" id="table23">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><th bgcolor="#DBEAF5">
            <p align="left"><font face="tahoma, verdana" size="2">Kunde
            Oplysninger</font></tr>
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <td bgcolor="#ffffff" valign="top" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
       
<table border="1" width="653" height="106" bgcolor="#FFFFFF" id="table24" style="border-collapse: collapse">
  <tr>
    <td width="104" height="28" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">Navn</font></b></td>
    <td width="186" height="28" bgcolor="#FFFFFF" colspan="2">
    <font size="1" face="Verdana">
    <input name="x_navn" value="<%= x_navn %>" size=28 maxlength=50></font></td>
    <td width="182" height="28" bgcolor="#FFFFFF">
    &nbsp;</td>
    <td width="132" height="28" bgcolor="#FFFFFF">
    <p align="center">
    <input name="x_dato" size="11" value="<% =day(now) %>/<% =month(now) %>/<% =year(now) %>" style="font-weight: 700; border-style: outset; border-width: 1px"></td>
  </tr>
  <tr>
    <td width="104" height="24"><b><font face="Verdana" size="1" color="#336699">
                            Adresse</font></b></td>
    <td width="186" height="24" colspan="2"><font face="Arial" size="-1">
                            <input size="28" name="x_adresse" value="<%= x_adresse %>"></font></td>
    <td width="182" height="24">&nbsp;</td>
    <td width="132" height="24"></td>

   
   
  </tr>
  <tr>
    <td width="104" height="23"><b><font face="Verdana" size="1" color="#336699">
                            Postnr. &amp; by</font></b></td>
    <td width="64" height="23"><font face="Arial" size="-1">
                            <input size="8" name="x_postnr" value="<%= x_postnr %>"></font></td>
    <td width="113" height="23"><font face="Arial" size="-1">
                            <input size="15" name="x_city" value="<%= x_city %>"></font></td>
    <td width="182" height="23">&nbsp;</td>
    <td width="132" height="23">&nbsp;</td>
  </tr>
  <tr>
    <td width="104" height="12"><b><font face="Verdana" size="1" color="#336699">
                            Telefon</font></b></td>
    <td width="186" height="12" colspan="2"><font face="Arial" size="-1">
                            <input size="28" name="x_Telefon" value="<%= x_Telefon %>"></font></td>
    <td width="182" height="12">&nbsp;</td>
    <td width="132" height="12">&nbsp;</td>
  </tr>
  <tr>
    <td width="104" height="6">
    <b>
    <font face="Verdana" size="1" color="#336699">Email</font></b></td>
    <td width="186" height="6" colspan="2"><font face="Arial" size="-1">
                            <input size="28" name="x_email" value="<%= x_email %>"></font></td>
    <td width="182" height="6">&nbsp;</td>
    <td width="132" height="6">&nbsp;</td>
  </tr>
  <tr>
    <td width="104" height="5"><b><font size="1" face="Verdana" color="#336699">Deltager liste</font></b></td>
    <td width="186" height="5" colspan="2"><font size="1" face="Verdana">
    <textarea cols=22 rows=3 name="x_Deltager"><%= x_Deltager %></textarea></font></td>
    <td width="182" height="5">&nbsp;</td>
    <td width="132" height="5">&nbsp;</td>
  </tr>
</table>
       
        </td>
        </tr>

   
        </table>
        </td></tr></table>

    </td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="6" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">&nbsp;</td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">

        <table cellpadding="0" cellspacing="0" width="450" border="0" id="table14">
            <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <td bgcolor="#4682B4" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="5" cellspacing="1" width="100%" border="0" id="table15">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><th bgcolor="#DBEAF5">
            <p align="left">
            <font face="tahoma, verdana" size="2">Booking</font></tr>
        <form name="online">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <td bgcolor="#ffffff" valign="top" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
       
<table border="0" width="652" height="106" bgcolor="#336699" id="table16" style="border-collapse: collapse">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Fra</font></b></td>
    <td width="104" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Til</font></b></td>
    <td width="78" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font size="1" face="Verdana">Flight</font></b></td>
    <td width="179" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Dato</font></b></td>
    <td width="87" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Depart</font></b></td>
    <td width="83" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Arrival</font></b></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_afrejse">
    <option selected><%= x_afrejse %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="104" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_ankomst">
    <option><%= x_ankomst %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="78" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_flightnr" value="<%= x_flightnr %>" size=10 maxlength=50></font></td>
    <td width="179" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
  <table cellpadding="0" cellspacing="0" border="0" width="178" id="table17">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
          <font size="1">
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <form name="online">   
           
<input name="x_afrejsedato" value="<%= x_afrejsedato %>" size="20" maxlength="10">&nbsp; </font></td>
    <td align="right" width="30" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
<p align="left">
            &nbsp;&nbsp;
            <a href="java script:cal1.popup();" style="color: #0000aa; text-decoration: none; font-family: Tahoma, Verdana; font-size: 11px">
            <img src="images/cal.gif" width="16" height="16" border="0" alt="Click Here to Pick up the date"></a><br></td>
  </tr>
  </table>
     
    </td>
    <td width="87" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_depart" value="<%= x_depart %>" size="10"></font></td>
    <td width="83" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_arrival" value="<%= x_arrival %>" size="7"></font></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_afrejse1">
    <option selected><%= x_afrejse1 %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="104" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_ankomst1">
    <option selected><%= x_ankomst1 %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="78" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_flightnr1" value="<%= x_flightnr1 %>" size=10 maxlength=50></font></td>
    <td width="179" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
  <table cellpadding="0" cellspacing="0" border="0" width="179" id="table18">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="156" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <p align="left">
    <font face="Arial, Helvetica" size="1">

              <input name="x_hjemrejsedato"  value="<%=x_hjemrejsedato%>"></font></td>
   

    <td style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <a href="java script:cal2.popup();" style="color: #0000aa; text-decoration: none; font-family: Tahoma, Verdana; font-size: 11px">
                <img src="images/cal.gif" width="16" height="16" border="0" alt="Click Here to Pick up the date"></a></td>
   

  </tr>
  </table>
                </td></td>
    <td width="87" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_depart1" value="<%= x_depart1 %>" size="10"></font></td>
    <td width="83" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_arrival1" value="<%= x_arrival1 %>" size="7"></font></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Antal Voksne</font> </b> </td>
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_AntalVoksenSalg" onchange="udregn(this.form);">
    <option value="1">1</option>
    <option value="2">2</option>
    <option value="3">3</option>
    <option value="4">4</option>
    <option value="5">5</option>
    <option value="6">6</option>
    <option value="7">7</option>
    <option value="8">8</option>
    <option value="9">9</option>
    <option value="10">10</option>
    <option value="11">11</option>
    <option value="12">12</option>
    <option value="13">13</option>
    <option value="14">14</option>
    <option value="15">15</option>
    <option value="16">16</option>
    </select></td>
    <td width="78" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Antal børn</font></b></td>
    <td width="179" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_AntalBarnSalg" onchange="udregn(this.form);">
    <option selected value="0">0</option>
    <option value="1">1</option>
    <option value="2">2</option>
    <option value="3">3</option>
    <option value="4">4</option>
    <option value="5">5</option>
    <option value="6">6</option>
    <option value="7">7</option>
    <option value="8">8</option>
    <option value="9">9</option>
    <option value="10">10</option>
    <option value="11">11</option>
    <option value="12">12</option>
    <option value="13">13</option>
    <option value="14">14</option>
    <option value="15">15</option>
    <option value="16">16</option>
    </select></td>
    <td width="87" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Antal Infant</font></b></td>
    <td width="83" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_AntalInfantSalg" onchange="udregn(this.form);">
    <option selected value="0">0</option>
    <option value="1">1</option>
    <option value="2">2</option>
    <option value="3">3</option>
    <option value="4">4</option>
    <option value="5">5</option>
    <option value="6">6</option>
    <option value="7">7</option>
    <option value="8">8</option>
    <option value="9">9</option>
    <option value="10">10</option>
    <option value="11">11</option>
    <option value="12">12</option>
    <option value="13">13</option>
    <option value="14">14</option>
    <option value="15">15</option>
    <option value="16">16</option>
    </select></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <font face="Verdana" size="1"><b>Billet nr.</b></font></td>
    <td width="104" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_Billetnummer" value="<%= x_Billetnummer %>" size="13"></font></td>
    <td width="78" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <font face="Verdana" size="1"><b>Airlines</b></font></td>
    <td width="179" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_Destairlines" value="<%= x_Destairlines %>" size=13 maxlength=50></font></td>
    <td width="87" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Betaling</font></b></td>
    <td width="83" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_Betbetingelser" value="Kontant" size="10"></font></td>
  </tr>
</table>
       
        </td>
        </tr>
        </form>


   
        </script>
        </table>
        </td></tr></table>

            </td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">&nbsp;</td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="215" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">

        <table cellpadding="0" cellspacing="0" width="450" border="0" id="table28">
            <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <td bgcolor="#4682B4" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="5" cellspacing="1" width="100%" border="0" id="table29">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><th bgcolor="#DBEAF5">
            <p align="left"><font face="tahoma, verdana" size="2">Betaling
            </font></tr>
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <td bgcolor="#ffffff" valign="top" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
       
<table border="1" width="651" height="124" bgcolor="#FFFFFF" id="table30" style="border-collapse: collapse">
  <tr>
    <td width="92" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">
    Pris voksne </font></b></td>

    <td width="121" height="24">
    <input name="x_PrisVoksenSalg" onchange="udregn(this.form);" size="12" value="<%= x_PrisVoksenSalg %>"></td>
    <td width="93" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">
    Pris børn</font></b></td>
    <td width="80" height="24">
<input name="x_PrisBarnSalg" onchange="udregn(this.form);" size="11" value="<%= x_PrisBarnSalg %>"></td>
    <td width="82" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">
    Pris Influent</font></b></td>
    <td width="150" height="24" colspan="2">
<input name="x_PrisInfantSalg" onchange="udregn(this.form);" size="7" value="<%= x_PrisInfantSalg %>"></td>
  </tr>
  <tr>
    <td width="92" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">Skatter </font></b></td>
    <td width="121" height="24"><font color="#336699" face="Verdana" size="1">
    <input name="x_SkatVoksenSalg" onchange="udregn(this.form);"  value="<%= x_SkatVoksenSalg %>" size="12 " maxlength=50></font></td>
    <td width="93" height="24">&nbsp;</td>
    <td width="80" height="24"><font color="#336699" face="Verdana" size="1">
    <input name="x_SkatBarnSalg" onchange="udregn(this.form);" value="<%= x_SkatBarnSalg %>" size=11 maxlength=50></font></td>
    <td width="82" height="24">&nbsp;</td>
    <td width="150" height="24" colspan="2"><font color="#336699" size="1" face="Verdana">
    <input name="x_SkatInfantSalg" onchange="udregn(this.form);" value="<%= x_SkatInfantSalg %>" size=7 maxlength=50></font></td>
  </tr>
  <tr>
    <td width="92" height="38"><b><font face="Verdana" size="1" color="#336699">Depositum</font></b></td>
    <td width="121" height="38"><font face="Verdana" size="1">
    <input name="x_Depositium" onchange="udregn(this.form);" value="<%= x_Depositium %>" size="12" maxlength="50"></font></td>
    <td width="93" height="38"><b><font size="1" face="Verdana" color="#336699">
    Betales senest</font></b></td>
    <td width="80" height="38"><font face="Verdana" size="1">
    <input name="x_Betsenest" value="<%= x_Betsenest %>" size="11"></font></td>
    <td width="82" height="38"><b><font face="Verdana" size="1" color="#336699">
    Restbeløb</font></b></td>
    <td width="75" height="38"><font size="1" face="Verdana">
    <input name="x_restbelob" value="<%= x_restbelob %>" size="7"></font></td>
    <td width="75" height="38">&nbsp;</td>
  </tr>
  <tr>
    <td width="92" height="26"><b><font size="1" face="Verdana" color="#336699">Købs pris</font></b></td>
    <td width="121" height="26"><b>&nbsp;</b><input name="x_Totalalle0" onchange="pro(this.form);" size="13"></td>
    <td width="93" height="26"><b><font face="Verdana" size="1">
    &nbsp;</font></b><input name="x_total0" size="10" value="<%=x_total %>"></td>
    <td width="80" height="26"><b>&nbsp;</b><input name="x_Profit0" size="8" value="<%=x_Profit %>"></td>
    <td width="82" height="26"><b><font face="Verdana" size="1" color="#336699">Forsikring</font></b></td>
    <td width="150" height="26" colspan="2"><font size="1" face="Verdana">
    <input name="x_forsikring" onchange="udregn(this.form);" value="<%= x_forsikring %>" size="7"></font></td>
  </tr>
</table>
       
        </td>
        </tr>

        <script language="JavaScript">
   
            var cal1 = new calendar2(document.forms['online'].elements['x_afrejsedato']);
            cal1.year_scroll = true;
            cal1.time_comp = false;
            var cal2 = new calendar2(document.forms['online'].elements['x_hjemrejsedato']);
            cal2.year_scroll = false;
            cal2.time_comp = false;
   
        </script>
        </table>
        </td></tr></table>


        <p>
<input type="submit" name="Action" value="Opret billet" style="font-weight: 700"></td>
  </tr>
</table>
       

    <p>&nbsp;</p>
</body>
</html>
<!--#include file="footer.asp"-->
Avatar billede neoo Nybegynder
28. december 2003 - 14:26 #7
er der nogen der kan se fejlen ? jeg trorre det er form tagsne jeg har blandet sammen
Avatar billede eagleeye Praktikant
28. december 2003 - 14:29 #8
Ja som superior skrev lige før mangler du et </form> tag prøv at skrive det lige efter din submit knap

<input type="submit" name="Action" value="Opret billet" style="font-weight: 700"></form></td>
Avatar billede eagleeye Praktikant
28. december 2003 - 14:33 #9
En anden ting som kan drille i IE er når ikke skriver noget action og filen er en default.asp fil så kan den ikke gennemskue filnavn:

<form name="online" method="post" action="">


Er de samme fil den skal loade bruger jeg at skrive action="<%=Request.ServerVariables("SECRIPT_NAME")%>" fordi den så automatisk udfylder filnavnet og så skulle det virker i alle browsere :

<form name="online" method="post" action="<%=Request.ServerVariables("SECRIPT_NAME")%>">
Avatar billede neoo Nybegynder
28. december 2003 - 14:33 #10
det hjlæper ikke :(
Avatar billede eagleeye Praktikant
28. december 2003 - 14:34 #11
hov sådan her:
<form name="online" method="post" action="<%=Request.ServerVariables("SCRIPT_NAME")%>">
Avatar billede eagleeye Praktikant
28. december 2003 - 14:37 #12
Der midt i kode sker en masse underlige ting:

    <input name="x_Betbetingelser" value="Kontant" size="10"></font></td>
  </tr>
</table>
       
        </td>
        </tr>
        </form>


   
        </script>
        </table>
        </td></tr></table>

            </td>




Der skal tagen </form> fjernes og den </script> høre heller ikke hjemme prøv:


    <input name="x_Betbetingelser" value="Kontant" size="10"></font></td>
  </tr>
</table>
       
        </td>
        </tr>

        </table>
        </td></tr></table>

            </td>
Avatar billede eagleeye Praktikant
28. december 2003 - 14:40 #13
ok, det er næsten nede i bunden og ikke midt i
Avatar billede neoo Nybegynder
28. december 2003 - 14:48 #14
super tusssind takkk for hjælpen :):):) men kan du ikke svare så kan du få nogle poin
Avatar billede eagleeye Praktikant
28. december 2003 - 14:56 #15
ok,
men hvad med superior han har jo også svaret rigtig på spørgsmålet??
Avatar billede neoo Nybegynder
28. december 2003 - 16:28 #16
jo, taker også ham, og han skal selvføllige svar så han også kan få nogle point

superior kan du ikke ligge et svar :)
Avatar billede neoo Nybegynder
28. december 2003 - 16:29 #17
men noget sjovt, mine javascript på formen som lavede nogle regnstykker virker ikke ?

den færdig kode ser nu sådan ud :
<%
if session("login") = "" Then
Response.redirect("log in.asp")
end if
%>


<%
Response.expires = 0
Response.expiresabsolute = Now() - 1
Response.addHeader "pragma", "no-cache"
Response.addHeader "cache-control", "private"
Response.CacheControl = "no-cache"
%>
<!--#include file="db.asp"-->

<%
response.buffer = true

'get action
a=request.form("a")

'get fields from form

x_Id = Request.Form("x_Id")
x_dato = Request.Form("x_dato")
x_total=Request.Form("x_total")
x_Maaned = Request.Form("x_Maaned")
x_navn = Request.Form("x_navn")
x_adresse = Request.Form("x_adresse")
x_postnr = Request.Form("x_postnr")
x_city = Request.Form("x_city")
x_Telefon = Request.Form("x_Telefon")
x_Mobiltelefon = Request.Form("x_Mobiltelefon")
x_email = Request.Form("x_email")
x_Deltager = Request.Form("x_Deltager")
x_Tekst = Request.Form("x_Tekst")
x_afrejse = Request.Form("x_afrejse")
x_ankomst = Request.Form("x_ankomst")
x_afrejsedato = Request.Form("x_afrejsedato")
x_hjemrejsedato = Request.Form("x_hjemrejsedato")
x_Destairlines = Request.Form("x_Destairlines")
x_flightnr = Request.Form("x_flightnr")
x_Betbetingelser = Request.Form("x_Betbetingelser")
x_Betsenest = Request.Form("x_Betsenest")
x_Antal = Request.Form("x_Antal")
x_AntalBarn = Request.Form("x_AntalBarn")
x_Skat = Request.Form("x_Skat")
x_AntalInfant = Request.Form("x_AntalInfant")
x_HandlingFee = Request.Form("x_HandlingFee")
x_Voksen = Request.Form("x_Voksen")
x_Barn = Request.Form("x_Barn")
x_Skatbarn = Request.Form("x_Skatbarn")
x_Total = Request.Form("x_Total")
x_Handlingfeebarn = Request.Form("x_Handlingfeebarn")
x_Totalbarn = Request.Form("x_Totalbarn")
x_Infant = Request.Form("x_Infant")
x_medarbejder = Request.Form("x_medarbejder")
x_Skatinfant = Request.Form("x_Skatinfant")
x_Handlingfeeinfant = Request.Form("x_Handlingfeeinfant")
x_Totalinfant = Request.Form("x_Totalinfant")
x_KF8bspris = Request.Form("x_KF8bspris")
x_Billetnummer = Request.Form("x_Billetnummer")
x_Salgspris = Request.Form("x_Salgspris")
x_Totalalle = Request.Form("x_Totalalle")
x_Commision = Request.Form("x_Commision")
x_TotalAgent = Request.Form("x_TotalAgent")
x_Provision = Request.Form("x_Provision")
x_AntalVoksenSalg = Request.Form("x_AntalVoksenSalg")
x_AntalBarnSalg = Request.Form("x_AntalBarnSalg")
x_AntalInfantSalg = Request.Form("x_AntalInfantSalg")
x_PrisVoksenSalg = Request.Form("x_PrisVoksenSalg")
x_PrisBarnSalg = Request.Form("x_PrisBarnSalg")
x_PrisInfantSalg = Request.Form("x_PrisInfantSalg")
x_SkatVoksenSalg = Request.Form("x_SkatVoksenSalg")
x_SkatBarnSalg = Request.Form("x_SkatBarnSalg")
x_SkatInfantSalg = Request.Form("x_SkatInfantSalg")

x_TotalSalgVoksen = Request.Form("x_TotalSalgVoksen")
x_TotalSalgBarn = Request.Form("x_TotalSalgBarn")
x_TotalSalgInfant = Request.Form("x_TotalSalgInfant")
x_TotalSalg = Request.Form("x_TotalSalg")
x_Profit = Request.Form("x_Profit")
x_PrisTyrkietVoksen = Request.Form("x_PrisTyrkietVoksen")
x_PrisTyrkietBarn = Request.Form("x_PrisTyrkietBarn")
x_PrisTyrkietInfant = Request.Form("x_PrisTyrkietInfant")
x_Depositium = Request.Form("x_Depositium")
x_Restbelob = Request.Form("x_Restbelob")
x_afrejse1 = Request.Form("x_afrejse1")
x_ankomst1 = Request.Form("x_ankomst1")
x_flightnr1 = Request.Form("x_flightnr1")
x_afrejsedato1 = Request.Form("x_afrejsedato1")
x_depart = Request.Form("x_depart")
x_depart1 = Request.Form("x_depart1")
x_arrival = Request.Form("x_arrival")
x_arrival1 = Request.Form("x_arrival1")
x_forsikring = Request.Form("x_forsikring")




' Open Connection to the database
set conn = Server.CreateObject("ADODB.Connection")
conn.Open xDb_Conn_Str

Select Case a
    Case "A": ' Add

        ' Open record
        strsql = "SELECT * FROM [OpretBooking] WHERE 0 = 1"

        set rs = Server.CreateObject("ADODB.Recordset")
        rs.Open strsql, conn, 1, 2

        rs.AddNew

       
tmpFld = x_dato
If IsDate(tmpFld) Then
    rs("dato") = cDate(tmpFld)
Else
    rs("dato") = Null
End If
tmpFld = Trim(x_Maaned)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Maaned") = tmpFld

tmpFld = Trim(x_Betbetingelser)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Betbetingelser") = tmpFld

tmpFld = Trim(x_navn)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("navn") = tmpFld

tmpFld = Trim(x_dato)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Dato") = tmpFld

tmpFld = Trim(x_adresse)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("adresse") = tmpFld

tmpFld = x_postnr
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("postnr") = cLng(tmpFld)
tmpFld = Trim(x_city)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("city") = tmpFld
tmpFld = x_Telefon
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Telefon") = cLng(tmpFld)
tmpFld = x_Profit
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Profit") = cLng(tmpFld)
tmpFld = Trim(x_email)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("email") = tmpFld
tmpFld = Trim(x_Deltager)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Deltager") = tmpFld
tmpFld = Trim(x_Tekst)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Tekst") = tmpFld

tmpFld = Trim(x_afrejse)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("afrejse") = tmpFld
tmpFld = Trim(x_afrejse1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("afrejse1") = tmpFld

tmpFld = Trim(x_ankomst)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("ankomst") = tmpFld

tmpFld = Trim(x_ankomst1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("ankomst1") = tmpFld


tmpFld = x_afrejsedato
If IsDate(tmpFld) Then
    rs("afrejsedato") = cDate(tmpFld)
Else
    rs("afrejsedato") = Null
End If

tmpFld = x_hjemrejsedato
If IsDate(tmpFld) Then
    rs("hjemrejsedato") = cDate(tmpFld)
Else
    rs("hjemrejsedato") = Null
End If
tmpFld = Trim(x_Destairlines)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Destairlines") = tmpFld

tmpFld = Trim(x_depart)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("depart") = tmpFld

tmpFld = Trim(x_depart1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("depart1") = tmpFld

tmpFld = Trim(x_arrival1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("arrival1") = tmpFld



tmpFld = Trim(x_arrival)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("arrival") = tmpFld


tmpFld = Trim(x_flightnr)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("flightnr") = tmpFld

tmpFld = Trim(x_flightnr1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("flightnr1") = tmpFld


tmpFld = x_Betsenest
If IsDate(tmpFld) Then
    rs("Betsenest") = cDate(tmpFld)
Else
    rs("Betsenest") = Null
End If




TotalFld=0
tmpFld = x_voksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Voksen") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_Antal
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Antal") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)

tmpFld = x_skat
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skat") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")


tmpFld = x_Handlingfee
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfee") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")

tmpFld = x_PrisTyrkietVoksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietVoksen") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")*("0,92")



rs("Total") = TotalFld



TotalFld=0
tmpFld = x_Barn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Barn") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalBarn") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)

tmpFld = x_Skatbarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatbarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalbarn")


tmpFld = x_Handlingfeebarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeebarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalbarn")

tmpFld = x_PrisTyrkietBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietBarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalBarn")*("0,92")




rs("Totalbarn") = TotalFld



TotalFld=0
tmpFld = x_Infant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Infant") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalInfant") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)


tmpFld = x_Skatinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalinfant")

tmpFld = x_Handlingfeeinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeeinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalinfant")

tmpFld = x_PrisTyrkietInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietInfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalInfant")*("0,92")

rs("Totalinfant") = TotalFld



TotalFld=0
tmpFld = x_voksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("voksen") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antal")

tmpFld = x_skat
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skat") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antal")

tmpFld = x_handlingfee
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("handlingfee") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antal")

tmpFld = x_Barn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Barn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarn")


tmpFld = x_Skatbarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatbarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarn")


tmpFld = x_Handlingfeebarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeebarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarn")



tmpFld = x_Infant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Infant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfant")


tmpFld = x_Skatinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfant")


tmpFld = x_Handlingfeeinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeeinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfant")

tmpFld = x_PrisTyrkietVoksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietVoksen") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")*("0,92")


tmpFld = x_PrisTyrkietBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietBarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalBarn")*("0,92")


tmpFld = x_PrisTyrkietInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietInfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalInfant")*("0,92")




rs("Totalalle") = TotalFld


TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalVoksenSalg") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)


tmpFld = x_skatvoksensalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatvoksensalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalVoksenSalg")

tmpFld = x_Provision
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Provision") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)



rs("TotalSalgVoksen") = TotalFld



TotalFld=0
tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalBarnSalg") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)

tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalbarnSalg")


rs("TotalSalgbarn") = TotalFld



TotalFld=0
tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalInfantSalg") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalInfantSalg")

rs("TotalSalginfant") = TotalFld



TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_skatVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skatVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)*rs("antalinfantSalg")


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")

rs("TotalSalg") = TotalFld


TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_skatVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skatVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)*rs("antalinfantSalg")


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")

tmpFld = x_Depositium
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Depositium") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)


rs("Restbelob") = TotalFld



tmpFld = Trim(x_medarbejder)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("medarbejder") = tmpFld

tmpFld = x_Totalalle
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Totalalle") = cDbl(tmpFld)



tmpFld = Trim(x_Billetnummer)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Billetnummer") = tmpFld
tmpFld = x_Salgspris
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Salgspris") = cDbl(tmpFld)


TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_skatVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skatVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")

tmpFld = x_Provision
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Provision") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)


tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")

tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")

tmpFld = x_voksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("voksen") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antal")

tmpFld = x_PrisTyrkietVoksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietVoksen") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("Antal")*("0,92")


tmpFld = x_skat
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skat") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antal")

tmpFld = x_handlingfee
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("handlingfee") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antal")

tmpFld = x_Barn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Barn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalbarn")

tmpFld = x_PrisTyrkietBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietBarn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalBarn")*("0,92")


tmpFld = x_Skatbarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatbarn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalbarn")


tmpFld = x_Handlingfeebarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeebarn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalbarn")



tmpFld = x_Infant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Infant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalinfant")


tmpFld = x_PrisTyrkietInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietInfant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalInfant")*("0,92")

tmpFld = x_Skatinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatinfant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalinfant")


tmpFld = x_Handlingfeeinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeeinfant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalinfant")



rs("provision") = TotalFld




        rs.Update
        rs.Close
        Set rs = Nothing
        conn.Close
        Set conn = Nothing
        Response.Clear
        Response.Redirect "OpretBookingview.asp"
End Select
%>
<!--#include file="include.asp"-->


<html>
<head><title>Opret booking</title>
<script language="JavaScript" src="calendar2.js"></script>
<script>
function pro(f){
x_Totalalle = (f.x_Totalalle.value!="")?+f.x_Totalalle.value:0;
x_total = (f.x_total.value!="")?+f.x_total.value:0;
f.x_Profit.value = x_total-x_Totalalle;
}
</script>

<script type="text/javascript">
function udregn(f){
x_AVSalg = (f.x_AntalVoksenSalg.value!="")?+f.x_AntalVoksenSalg.value:0;
x_PVSalg = (!isNaN(f.x_PrisVoksenSalg.value))?+f.x_PrisVoksenSalg.value:0;
x_ABSalg = (f.x_AntalBarnSalg.value!="")?+f.x_AntalBarnSalg.value:0;
x_PBSalg = (!isNaN(f.x_PrisBarnSalg.value))?+f.x_PrisBarnSalg.value:0;
x_AISalg = (f.x_AntalInfantSalg.value!="")?+f.x_AntalInfantSalg.value:0;
x_PISalg = (!isNaN(f.x_PrisInfantSalg.value))?+f.x_PrisInfantSalg.value:0;
x_SVSalg = (!isNaN(f.x_SkatVoksenSalg.value))?+f.x_SkatVoksenSalg.value:0; 
x_SBSalg = (!isNaN(f.x_SkatBarnSalg.value))?+f.x_SkatBarnSalg.value:0;
x_SISalg = (!isNaN(f.x_SkatInfantSalg.value))?+f.x_SkatInfantSalg.value:0;
x_Fos= (!isNaN(f.x_forsikring.value))?+f.x_forsikring.value:0;
x_Dep= (!isNaN(f.x_Depositium.value))?+f.x_Depositium.value:0;
f.x_total.value = x_PVSalg*x_AVSalg+x_PBSalg*x_ABSalg+x_PISalg*x_AISalg;
f.x_restbelob.value = x_PVSalg*x_AVSalg+x_PBSalg*x_ABSalg+x_PISalg*x_AISalg+x_SVSalg*x_AVSalg+x_SBSalg*x_ABSalg+x_SISalg*x_AISalg+x_Fos-x_Dep;

}
</script>





</head>
<body>

<table border="0" width="652" height="624" bgcolor="#336699" id="table31" style="border-collapse: collapse">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="6" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="0" cellspacing="0" width="450" border="0" id="table32">
            <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <td bgcolor="#4682B4" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="5" cellspacing="1" width="100%" border="0" id="table33">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><th bgcolor="#DBEAF5">
            <p align="left"><font face="tahoma, verdana" size="2">Kunde
            Oplysninger</font></tr>
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <td bgcolor="#ffffff" valign="top" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
       
<table border="1" width="653" height="106" bgcolor="#FFFFFF" id="table34" style="border-collapse: collapse">
  <tr>
    <td width="104" height="28" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">Navn</font></b></td>
    <td width="186" height="28" bgcolor="#FFFFFF" colspan="2">
    <font size="1" face="Verdana">
    <input name="x_navn" value="<%= x_navn %>" size=28 maxlength=50></font></td>
    <td width="182" height="28" bgcolor="#FFFFFF">
    &nbsp;</td>
    <td width="132" height="28" bgcolor="#FFFFFF">
    <p align="center">
    <input name="x_dato" size="11" value="<% =day(now) %>/<% =month(now) %>/<% =year(now) %>" style="font-weight: 700; border-style: outset; border-width: 1px"></td>
  </tr>
  <tr>
    <td width="104" height="24"><b><font face="Verdana" size="1" color="#336699">
                            Adresse</font></b></td>
    <td width="186" height="24" colspan="2"><font face="Arial" size="-1">
                            <input size="28" name="x_adresse" value="<%= x_adresse %>"></font></td>
    <td width="182" height="24">&nbsp;</td>
    <td width="132" height="24"></td>

   
   
  </tr>
  <tr>
    <td width="104" height="23"><b><font face="Verdana" size="1" color="#336699">
                            Postnr. &amp; by</font></b></td>
    <td width="64" height="23"><font face="Arial" size="-1">
                            <input size="8" name="x_postnr" value="<%= x_postnr %>"></font></td>
    <td width="113" height="23"><font face="Arial" size="-1">
                            <input size="15" name="x_city" value="<%= x_city %>"></font></td>
    <td width="182" height="23">&nbsp;</td>
    <td width="132" height="23">&nbsp;</td>
  </tr>
  <tr>
    <td width="104" height="12"><b><font face="Verdana" size="1" color="#336699">
                            Telefon</font></b></td>
    <td width="186" height="12" colspan="2"><font face="Arial" size="-1">
                            <input size="28" name="x_Telefon" value="<%= x_Telefon %>"></font></td>
    <td width="182" height="12">&nbsp;</td>
    <td width="132" height="12">&nbsp;</td>
  </tr>
  <tr>
    <td width="104" height="6">
    <b>
    <font face="Verdana" size="1" color="#336699">Email</font></b></td>
    <td width="186" height="6" colspan="2"><font face="Arial" size="-1">
                            <input size="28" name="x_email" value="<%= x_email %>"></font></td>
    <td width="182" height="6">&nbsp;</td>
    <td width="132" height="6">&nbsp;</td>
  </tr>
  <tr>
    <td width="104" height="5"><b><font size="1" face="Verdana" color="#336699">Deltager liste</font></b></td>
    <td width="186" height="5" colspan="2"><font size="1" face="Verdana">
    <textarea cols=22 rows=3 name="x_Deltager"><%= x_Deltager %></textarea></font></td>
    <td width="182" height="5">&nbsp;</td>
    <td width="132" height="5">&nbsp;</td>
  </tr>
</table>
       
        </td>
        </tr>

   
        </table>
        </td></tr></table>

    </td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="6" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">&nbsp;</td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">

        <table cellpadding="0" cellspacing="0" width="450" border="0" id="table35">
            <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <td bgcolor="#4682B4" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="5" cellspacing="1" width="100%" border="0" id="table36">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><th bgcolor="#DBEAF5">
            <p align="left">
            <font face="tahoma, verdana" size="2">Booking</font></tr>
        <form name="online">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <td bgcolor="#ffffff" valign="top" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
       
<table border="0" width="652" height="106" bgcolor="#336699" id="table37" style="border-collapse: collapse">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Fra</font></b></td>
    <td width="104" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Til</font></b></td>
    <td width="78" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font size="1" face="Verdana">Flight</font></b></td>
    <td width="179" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Dato</font></b></td>
    <td width="87" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Depart</font></b></td>
    <td width="83" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Arrival</font></b></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_afrejse">
    <option selected><%= x_afrejse %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="104" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_ankomst">
    <option><%= x_ankomst %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="78" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_flightnr" value="<%= x_flightnr %>" size=10 maxlength=50></font></td>
    <td width="179" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
  <table cellpadding="0" cellspacing="0" border="0" width="178" id="table38">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
          <font size="1">
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <form name="online">   
           
<input name="x_afrejsedato" value="<%= x_afrejsedato %>" size="20" maxlength="10">&nbsp; </font></td>
    <td align="right" width="30" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
<p align="left">
            &nbsp;&nbsp;
            <a href="java script:cal1.popup();" style="color: #0000aa; text-decoration: none; font-family: Tahoma, Verdana; font-size: 11px">
            <img src="images/cal.gif" width="16" height="16" border="0" alt="Click Here to Pick up the date"></a><br></td>
  </tr>
  </table>
     
    </td>
    <td width="87" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_depart" value="<%= x_depart %>" size="10"></font></td>
    <td width="83" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_arrival" value="<%= x_arrival %>" size="7"></font></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_afrejse1">
    <option selected><%= x_afrejse1 %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="104" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_ankomst1">
    <option selected><%= x_ankomst1 %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="78" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_flightnr1" value="<%= x_flightnr1 %>" size=10 maxlength=50></font></td>
    <td width="179" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
  <table cellpadding="0" cellspacing="0" border="0" width="179" id="table39">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="156" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <p align="left">
    <font face="Arial, Helvetica" size="1">

              <input name="x_hjemrejsedato"  value="<%=x_hjemrejsedato%>"></font></td>
   

    <td style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <a href="java script:cal2.popup();" style="color: #0000aa; text-decoration: none; font-family: Tahoma, Verdana; font-size: 11px">
                <img src="images/cal.gif" width="16" height="16" border="0" alt="Click Here to Pick up the date"></a></td>
   

  </tr>
  </table>
                </td></td>
    <td width="87" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_depart1" value="<%= x_depart1 %>" size="10"></font></td>
    <td width="83" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_arrival1" value="<%= x_arrival1 %>" size="7"></font></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Antal Voksne</font> </b> </td>
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_AntalVoksenSalg" onchange="udregn(this.form);">
    <option value="1">1</option>
    <option value="2">2</option>
    <option value="3">3</option>
    <option value="4">4</option>
    <option value="5">5</option>
    <option value="6">6</option>
    <option value="7">7</option>
    <option value="8">8</option>
    <option value="9">9</option>
    <option value="10">10</option>
    <option value="11">11</option>
    <option value="12">12</option>
    <option value="13">13</option>
    <option value="14">14</option>
    <option value="15">15</option>
    <option value="16">16</option>
    </select></td>
    <td width="78" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Antal børn</font></b></td>
    <td width="179" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_AntalBarnSalg" onchange="udregn(this.form);">
    <option selected value="0">0</option>
    <option value="1">1</option>
    <option value="2">2</option>
    <option value="3">3</option>
    <option value="4">4</option>
    <option value="5">5</option>
    <option value="6">6</option>
    <option value="7">7</option>
    <option value="8">8</option>
    <option value="9">9</option>
    <option value="10">10</option>
    <option value="11">11</option>
    <option value="12">12</option>
    <option value="13">13</option>
    <option value="14">14</option>
    <option value="15">15</option>
    <option value="16">16</option>
    </select></td>
    <td width="87" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Antal Infant</font></b></td>
    <td width="83" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_AntalInfantSalg" onchange="udregn(this.form);">
    <option selected value="0">0</option>
    <option value="1">1</option>
    <option value="2">2</option>
    <option value="3">3</option>
    <option value="4">4</option>
    <option value="5">5</option>
    <option value="6">6</option>
    <option value="7">7</option>
    <option value="8">8</option>
    <option value="9">9</option>
    <option value="10">10</option>
    <option value="11">11</option>
    <option value="12">12</option>
    <option value="13">13</option>
    <option value="14">14</option>
    <option value="15">15</option>
    <option value="16">16</option>
    </select></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <font face="Verdana" size="1"><b>Billet nr.</b></font></td>
    <td width="104" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_Billetnummer" value="<%= x_Billetnummer %>" size="13"></font></td>
    <td width="78" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <font face="Verdana" size="1"><b>Airlines</b></font></td>
    <td width="179" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_Destairlines" value="<%= x_Destairlines %>" size=13 maxlength=50></font></td>
    <td width="87" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Betaling</font></b></td>
    <td width="83" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_Betbetingelser" value="Kontant" size="10"></font></td>
  </tr>
</table>
       
        </td>
        </tr>
        </form>


   
        </script>
        </table>
        </td></tr></table>

            </td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">&nbsp;</td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="215" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">

        <table cellpadding="0" cellspacing="0" width="450" border="0" id="table40">
            <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <td bgcolor="#4682B4" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="5" cellspacing="1" width="100%" border="0" id="table41">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><th bgcolor="#DBEAF5">
            <p align="left"><font face="tahoma, verdana" size="2">Betaling
            </font></tr>
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <td bgcolor="#ffffff" valign="top" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
       
<table border="1" width="651" height="124" bgcolor="#FFFFFF" id="table42" style="border-collapse: collapse">
  <tr>
    <td width="92" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">
    Pris voksne </font></b></td>

    <td width="121" height="24">
    <input name="x_PrisVoksenSalg" onchange="udregn(this.form);" size="12" value="<%= x_PrisVoksenSalg %>"></td>
    <td width="93" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">
    Pris børn</font></b></td>
    <td width="80" height="24">
<input name="x_PrisBarnSalg" onchange="udregn(this.form);" size="11" value="<%= x_PrisBarnSalg %>"></td>
    <td width="82" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">
    Pris Influent</font></b></td>
    <td width="150" height="24" colspan="2">
<input name="x_PrisInfantSalg" onchange="udregn(this.form);" size="7" value="<%= x_PrisInfantSalg %>"></td>
  </tr>
  <tr>
    <td width="92" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">Skatter </font></b></td>
    <td width="121" height="24"><font color="#336699" face="Verdana" size="1">
    <input name="x_SkatVoksenSalg" onchange="udregn(this.form);"  value="<%= x_SkatVoksenSalg %>" size="12 " maxlength=50></font></td>
    <td width="93" height="24">&nbsp;</td>
    <td width="80" height="24"><font color="#336699" face="Verdana" size="1">
    <input name="x_SkatBarnSalg" onchange="udregn(this.form);" value="<%= x_SkatBarnSalg %>" size=11 maxlength=50></font></td>
    <td width="82" height="24">&nbsp;</td>
    <td width="150" height="24" colspan="2"><font color="#336699" size="1" face="Verdana">
    <input name="x_SkatInfantSalg" onchange="udregn(this.form);" value="<%= x_SkatInfantSalg %>" size=7 maxlength=50></font></td>
  </tr>
  <tr>
    <td width="92" height="38"><b><font face="Verdana" size="1" color="#336699">Depositum</font></b></td>
    <td width="121" height="38"><font face="Verdana" size="1">
    <input name="x_Depositium" onchange="udregn(this.form);" value="<%= x_Depositium %>" size="12" maxlength="50"></font></td>
    <td width="93" height="38"><b><font size="1" face="Verdana" color="#336699">
    Betales senest</font></b></td>
    <td width="80" height="38"><font face="Verdana" size="1">
    <input name="x_Betsenest" value="<%= x_Betsenest %>" size="11"></font></td>
    <td width="82" height="38"><b><font face="Verdana" size="1" color="#336699">
    Restbeløb</font></b></td>
    <td width="75" height="38"><font size="1" face="Verdana">
    <input name="x_restbelob" value="<%= x_restbelob %>" size="7"></font></td>
    <td width="75" height="38">&nbsp;</td>
  </tr>
  <tr>
    <td width="92" height="26"><b><font size="1" face="Verdana" color="#336699">Købs pris</font></b></td>
    <td width="121" height="26"><b>&nbsp;</b><input name="x_Totalalle0" onchange="pro(this.form);" size="13"></td>
    <td width="93" height="26"><b><font face="Verdana" size="1">
    &nbsp;</font></b><input name="x_total0" size="10" value="<%=x_total %>"></td>
    <td width="80" height="26"><b>&nbsp;</b><input name="x_Profit0" size="8" value="<%=x_Profit %>"></td>
    <td width="82" height="26"><b><font face="Verdana" size="1" color="#336699">Forsikring</font></b></td>
    <td width="150" height="26" colspan="2"><font size="1" face="Verdana">
    <input name="x_forsikring" onchange="udregn(this.form);" value="<%= x_forsikring %>" size="7"></font></td>
  </tr>
</table>
       
        </td>
        </tr>

        <script language="JavaScript">
   
            var cal1 = new calendar2(document.forms['online'].elements['x_afrejsedato']);
            cal1.year_scroll = true;
            cal1.time_comp = false;
            var cal2 = new calendar2(document.forms['online'].elements['x_hjemrejsedato']);
            cal2.year_scroll = false;
            cal2.time_comp = false;
   
        </script>
        </table>
        </td></tr></table>


        <p>
<input type="submit" name="Action" value="Opret billet" style="font-weight: 700"></td>
  </tr>
</table>
       



    <form name="online" method="post" action="">
<input type="hidden" name="a" value="A" style="font-weight: 700">
       

   
</body>
</html>
<!--#include file="footer.asp"-->
Avatar billede neoo Nybegynder
28. december 2003 - 16:29 #18
men formne igen :(
Avatar billede neoo Nybegynder
28. december 2003 - 16:33 #19
sorry... den ser sådan ud:


<%
if session("login") = "" Then
Response.redirect("login.asp")
end if
%>


<%
Response.expires = 0
Response.expiresabsolute = Now() - 1
Response.addHeader "pragma", "no-cache"
Response.addHeader "cache-control", "private"
Response.CacheControl = "no-cache"
%>
<!--#include file="db.asp"-->

<%
response.buffer = true

'get action
a=request.form("a")

'get fields from form

x_Id = Request.Form("x_Id")
x_dato = Request.Form("x_dato")
x_total=Request.Form("x_total")
x_Maaned = Request.Form("x_Maaned")
x_navn = Request.Form("x_navn")
x_adresse = Request.Form("x_adresse")
x_postnr = Request.Form("x_postnr")
x_city = Request.Form("x_city")
x_Telefon = Request.Form("x_Telefon")
x_Mobiltelefon = Request.Form("x_Mobiltelefon")
x_email = Request.Form("x_email")
x_Deltager = Request.Form("x_Deltager")
x_Tekst = Request.Form("x_Tekst")
x_afrejse = Request.Form("x_afrejse")
x_ankomst = Request.Form("x_ankomst")
x_afrejsedato = Request.Form("x_afrejsedato")
x_hjemrejsedato = Request.Form("x_hjemrejsedato")
x_Destairlines = Request.Form("x_Destairlines")
x_flightnr = Request.Form("x_flightnr")
x_Betbetingelser = Request.Form("x_Betbetingelser")
x_Betsenest = Request.Form("x_Betsenest")
x_Antal = Request.Form("x_Antal")
x_AntalBarn = Request.Form("x_AntalBarn")
x_Skat = Request.Form("x_Skat")
x_AntalInfant = Request.Form("x_AntalInfant")
x_HandlingFee = Request.Form("x_HandlingFee")
x_Voksen = Request.Form("x_Voksen")
x_Barn = Request.Form("x_Barn")
x_Skatbarn = Request.Form("x_Skatbarn")
x_Total = Request.Form("x_Total")
x_Handlingfeebarn = Request.Form("x_Handlingfeebarn")
x_Totalbarn = Request.Form("x_Totalbarn")
x_Infant = Request.Form("x_Infant")
x_medarbejder = Request.Form("x_medarbejder")
x_Skatinfant = Request.Form("x_Skatinfant")
x_Handlingfeeinfant = Request.Form("x_Handlingfeeinfant")
x_Totalinfant = Request.Form("x_Totalinfant")
x_KF8bspris = Request.Form("x_KF8bspris")
x_Billetnummer = Request.Form("x_Billetnummer")
x_Salgspris = Request.Form("x_Salgspris")
x_Totalalle = Request.Form("x_Totalalle")
x_Commision = Request.Form("x_Commision")
x_TotalAgent = Request.Form("x_TotalAgent")
x_Provision = Request.Form("x_Provision")
x_AntalVoksenSalg = Request.Form("x_AntalVoksenSalg")
x_AntalBarnSalg = Request.Form("x_AntalBarnSalg")
x_AntalInfantSalg = Request.Form("x_AntalInfantSalg")
x_PrisVoksenSalg = Request.Form("x_PrisVoksenSalg")
x_PrisBarnSalg = Request.Form("x_PrisBarnSalg")
x_PrisInfantSalg = Request.Form("x_PrisInfantSalg")
x_SkatVoksenSalg = Request.Form("x_SkatVoksenSalg")
x_SkatBarnSalg = Request.Form("x_SkatBarnSalg")
x_SkatInfantSalg = Request.Form("x_SkatInfantSalg")

x_TotalSalgVoksen = Request.Form("x_TotalSalgVoksen")
x_TotalSalgBarn = Request.Form("x_TotalSalgBarn")
x_TotalSalgInfant = Request.Form("x_TotalSalgInfant")
x_TotalSalg = Request.Form("x_TotalSalg")
x_Profit = Request.Form("x_Profit")
x_PrisTyrkietVoksen = Request.Form("x_PrisTyrkietVoksen")
x_PrisTyrkietBarn = Request.Form("x_PrisTyrkietBarn")
x_PrisTyrkietInfant = Request.Form("x_PrisTyrkietInfant")
x_Depositium = Request.Form("x_Depositium")
x_Restbelob = Request.Form("x_Restbelob")
x_afrejse1 = Request.Form("x_afrejse1")
x_ankomst1 = Request.Form("x_ankomst1")
x_flightnr1 = Request.Form("x_flightnr1")
x_afrejsedato1 = Request.Form("x_afrejsedato1")
x_depart = Request.Form("x_depart")
x_depart1 = Request.Form("x_depart1")
x_arrival = Request.Form("x_arrival")
x_arrival1 = Request.Form("x_arrival1")
x_forsikring = Request.Form("x_forsikring")




' Open Connection to the database
set conn = Server.CreateObject("ADODB.Connection")
conn.Open xDb_Conn_Str

Select Case a
    Case "A": ' Add

        ' Open record
        strsql = "SELECT * FROM [OpretBooking] WHERE 0 = 1"

        set rs = Server.CreateObject("ADODB.Recordset")
        rs.Open strsql, conn, 1, 2

        rs.AddNew

       
tmpFld = x_dato
If IsDate(tmpFld) Then
    rs("dato") = cDate(tmpFld)
Else
    rs("dato") = Null
End If
tmpFld = Trim(x_Maaned)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Maaned") = tmpFld

tmpFld = Trim(x_Betbetingelser)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Betbetingelser") = tmpFld

tmpFld = Trim(x_navn)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("navn") = tmpFld

tmpFld = Trim(x_dato)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Dato") = tmpFld

tmpFld = Trim(x_adresse)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("adresse") = tmpFld

tmpFld = x_postnr
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("postnr") = cLng(tmpFld)
tmpFld = Trim(x_city)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("city") = tmpFld
tmpFld = x_Telefon
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Telefon") = cLng(tmpFld)
tmpFld = x_Profit
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Profit") = cLng(tmpFld)
tmpFld = Trim(x_email)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("email") = tmpFld
tmpFld = Trim(x_Deltager)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Deltager") = tmpFld
tmpFld = Trim(x_Tekst)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Tekst") = tmpFld

tmpFld = Trim(x_afrejse)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("afrejse") = tmpFld
tmpFld = Trim(x_afrejse1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("afrejse1") = tmpFld

tmpFld = Trim(x_ankomst)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("ankomst") = tmpFld

tmpFld = Trim(x_ankomst1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("ankomst1") = tmpFld


tmpFld = x_afrejsedato
If IsDate(tmpFld) Then
    rs("afrejsedato") = cDate(tmpFld)
Else
    rs("afrejsedato") = Null
End If

tmpFld = x_hjemrejsedato
If IsDate(tmpFld) Then
    rs("hjemrejsedato") = cDate(tmpFld)
Else
    rs("hjemrejsedato") = Null
End If
tmpFld = Trim(x_Destairlines)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Destairlines") = tmpFld

tmpFld = Trim(x_depart)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("depart") = tmpFld

tmpFld = Trim(x_depart1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("depart1") = tmpFld

tmpFld = Trim(x_arrival1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("arrival1") = tmpFld



tmpFld = Trim(x_arrival)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("arrival") = tmpFld


tmpFld = Trim(x_flightnr)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("flightnr") = tmpFld

tmpFld = Trim(x_flightnr1)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("flightnr1") = tmpFld


tmpFld = x_Betsenest
If IsDate(tmpFld) Then
    rs("Betsenest") = cDate(tmpFld)
Else
    rs("Betsenest") = Null
End If




TotalFld=0
tmpFld = x_voksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Voksen") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_Antal
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Antal") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)

tmpFld = x_skat
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skat") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")


tmpFld = x_Handlingfee
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfee") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")

tmpFld = x_PrisTyrkietVoksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietVoksen") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")*("0,92")



rs("Total") = TotalFld



TotalFld=0
tmpFld = x_Barn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Barn") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalBarn") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)

tmpFld = x_Skatbarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatbarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalbarn")


tmpFld = x_Handlingfeebarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeebarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalbarn")

tmpFld = x_PrisTyrkietBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietBarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalBarn")*("0,92")




rs("Totalbarn") = TotalFld



TotalFld=0
tmpFld = x_Infant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Infant") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalInfant") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)


tmpFld = x_Skatinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalinfant")

tmpFld = x_Handlingfeeinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeeinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antalinfant")

tmpFld = x_PrisTyrkietInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietInfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalInfant")*("0,92")

rs("Totalinfant") = TotalFld



TotalFld=0
tmpFld = x_voksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("voksen") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antal")

tmpFld = x_skat
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skat") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antal")

tmpFld = x_handlingfee
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("handlingfee") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antal")

tmpFld = x_Barn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Barn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarn")


tmpFld = x_Skatbarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatbarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarn")


tmpFld = x_Handlingfeebarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeebarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarn")



tmpFld = x_Infant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Infant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfant")


tmpFld = x_Skatinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfant")


tmpFld = x_Handlingfeeinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeeinfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfant")

tmpFld = x_PrisTyrkietVoksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietVoksen") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("Antal")*("0,92")


tmpFld = x_PrisTyrkietBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietBarn") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalBarn")*("0,92")


tmpFld = x_PrisTyrkietInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietInfant") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalInfant")*("0,92")




rs("Totalalle") = TotalFld


TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalVoksenSalg") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)


tmpFld = x_skatvoksensalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatvoksensalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalVoksenSalg")

tmpFld = x_Provision
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Provision") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)



rs("TotalSalgVoksen") = TotalFld



TotalFld=0
tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalBarnSalg") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)

tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalbarnSalg")


rs("TotalSalgbarn") = TotalFld



TotalFld=0
tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)

tmpFld = x_AntalInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("AntalInfantSalg") = cLng(tmpFld)
TotalFld=TotalFld*cDbl(tmpFld)


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("AntalInfantSalg")

rs("TotalSalginfant") = TotalFld



TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_skatVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skatVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)*rs("antalinfantSalg")


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")

rs("TotalSalg") = TotalFld


TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_skatVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skatVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cDbl(tmpFld)*rs("antalinfantSalg")


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")

tmpFld = x_Depositium
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Depositium") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)


rs("Restbelob") = TotalFld



tmpFld = Trim(x_medarbejder)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("medarbejder") = tmpFld

tmpFld = x_Totalalle
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Totalalle") = cDbl(tmpFld)



tmpFld = Trim(x_Billetnummer)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Billetnummer") = tmpFld
tmpFld = x_Salgspris
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Salgspris") = cDbl(tmpFld)


TotalFld=0
tmpFld = x_PrisVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")


tmpFld = x_skatVoksenSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skatVoksenSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalVoksenSalg")

tmpFld = x_Provision
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Provision") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)


tmpFld = x_PrisBarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisBarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")


tmpFld = x_SkatbarnSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatbarnSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalbarnSalg")

tmpFld = x_PrisInfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisInfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")


tmpFld = x_SkatinfantSalg
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("SkatinfantSalg") = cDbl(tmpFld)
TotalFld=TotalFld+cLng(tmpFld)*rs("antalinfantSalg")

tmpFld = x_voksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("voksen") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antal")

tmpFld = x_PrisTyrkietVoksen
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietVoksen") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("Antal")*("0,92")


tmpFld = x_skat
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("skat") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antal")

tmpFld = x_handlingfee
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("handlingfee") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antal")

tmpFld = x_Barn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Barn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalbarn")

tmpFld = x_PrisTyrkietBarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietBarn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalBarn")*("0,92")


tmpFld = x_Skatbarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatbarn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalbarn")


tmpFld = x_Handlingfeebarn
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeebarn") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalbarn")



tmpFld = x_Infant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Infant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalinfant")


tmpFld = x_PrisTyrkietInfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("PrisTyrkietInfant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalInfant")*("0,92")

tmpFld = x_Skatinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Skatinfant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalinfant")


tmpFld = x_Handlingfeeinfant
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("Handlingfeeinfant") = cDbl(tmpFld)
TotalFld=TotalFld-cLng(tmpFld)*rs("antalinfant")



rs("provision") = TotalFld




        rs.Update
        rs.Close
        Set rs = Nothing
        conn.Close
        Set conn = Nothing
        Response.Clear
        Response.Redirect "OpretBookingprocces.asp"
End Select
%>
<!--#include file="include.asp"-->

</script>
<html>
<head><title>Opret booking</title>
<script language="JavaScript" src="calendar2.js"></script>

<script>
function pro(f){
x_Totalalle = (f.x_Totalalle.value!="")?+f.x_Totalalle.value:0;
x_total = (f.x_total.value!="")?+f.x_total.value:0;
f.x_Profit.value = x_total-x_Totalalle;
}
</script>

<script type="text/javascript">
function udregn(f){
x_AVSalg = (f.x_AntalVoksenSalg.value!="")?+f.x_AntalVoksenSalg.value:0;
x_PVSalg = (!isNaN(f.x_PrisVoksenSalg.value))?+f.x_PrisVoksenSalg.value:0;
x_ABSalg = (f.x_AntalBarnSalg.value!="")?+f.x_AntalBarnSalg.value:0;
x_PBSalg = (!isNaN(f.x_PrisBarnSalg.value))?+f.x_PrisBarnSalg.value:0;
x_AISalg = (f.x_AntalInfantSalg.value!="")?+f.x_AntalInfantSalg.value:0;
x_PISalg = (!isNaN(f.x_PrisInfantSalg.value))?+f.x_PrisInfantSalg.value:0;
x_SVSalg = (!isNaN(f.x_SkatVoksenSalg.value))?+f.x_SkatVoksenSalg.value:0; 
x_SBSalg = (!isNaN(f.x_SkatBarnSalg.value))?+f.x_SkatBarnSalg.value:0;
x_SISalg = (!isNaN(f.x_SkatInfantSalg.value))?+f.x_SkatInfantSalg.value:0;
x_Fos= (!isNaN(f.x_forsikring.value))?+f.x_forsikring.value:0;
x_Dep= (!isNaN(f.x_Depositium.value))?+f.x_Depositium.value:0;
f.x_total.value = x_PVSalg*x_AVSalg+x_PBSalg*x_ABSalg+x_PISalg*x_AISalg;
f.x_restbelob.value = x_PVSalg*x_AVSalg+x_PBSalg*x_ABSalg+x_PISalg*x_AISalg+x_SVSalg*x_AVSalg+x_SBSalg*x_ABSalg+x_SISalg*x_AISalg+x_Fos-x_Dep;

}
</script>





</head>
<body>
<p>&nbsp;</p>


<form name="online" method="post" action="<%=Request.ServerVariables("SCRIPT_NAME")%>">
<form onSubmit="return EW_checkMyForm(this);"  action="OpretBookingadd.asp" method="post">
<input type="hidden" name="a" value="A" style="font-weight: 700">

<table border="0" width="652" height="624" bgcolor="#336699" id="table13" style="border-collapse: collapse">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="6" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="0" cellspacing="0" width="450" border="0" id="table22">
            <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <td bgcolor="#4682B4" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="5" cellspacing="1" width="100%" border="0" id="table23">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><th bgcolor="#DBEAF5">
            <p align="left"><font face="tahoma, verdana" size="2">Kunde
            Oplysninger</font></tr>
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <td bgcolor="#ffffff" valign="top" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
       
<table border="1" width="653" height="106" bgcolor="#FFFFFF" id="table24" style="border-collapse: collapse">
  <tr>
    <td width="104" height="28" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">Navn</font></b></td>
    <td width="186" height="28" bgcolor="#FFFFFF" colspan="2">
    <font size="1" face="Verdana">
    <input name="x_navn" value="<%= x_navn %>" size=28 maxlength=50></font></td>
    <td width="182" height="28" bgcolor="#FFFFFF">
    &nbsp;</td>
    <td width="132" height="28" bgcolor="#FFFFFF">
    <p align="center">
    <input name="x_dato" size="11" value="<% =day(now) %>/<% =month(now) %>/<% =year(now) %>" style="font-weight: 700; border-style: outset; border-width: 1px"></td>
  </tr>
  <tr>
    <td width="104" height="24"><b><font face="Verdana" size="1" color="#336699">
                            Adresse</font></b></td>
    <td width="186" height="24" colspan="2"><font face="Arial" size="-1">
                            <input size="28" name="x_adresse" value="<%= x_adresse %>"></font></td>
    <td width="182" height="24">&nbsp;</td>
    <td width="132" height="24"></td>

   
   
  </tr>
  <tr>
    <td width="104" height="23"><b><font face="Verdana" size="1" color="#336699">
                            Postnr. &amp; by</font></b></td>
    <td width="64" height="23"><font face="Arial" size="-1">
                            <input size="8" name="x_postnr" value="<%= x_postnr %>"></font></td>
    <td width="113" height="23"><font face="Arial" size="-1">
                            <input size="15" name="x_city" value="<%= x_city %>"></font></td>
    <td width="182" height="23">&nbsp;</td>
    <td width="132" height="23">&nbsp;</td>
  </tr>
  <tr>
    <td width="104" height="12"><b><font face="Verdana" size="1" color="#336699">
                            Telefon</font></b></td>
    <td width="186" height="12" colspan="2"><font face="Arial" size="-1">
                            <input size="28" name="x_Telefon" value="<%= x_Telefon %>"></font></td>
    <td width="182" height="12">&nbsp;</td>
    <td width="132" height="12">&nbsp;</td>
  </tr>
  <tr>
    <td width="104" height="6">
    <b>
    <font face="Verdana" size="1" color="#336699">Email</font></b></td>
    <td width="186" height="6" colspan="2"><font face="Arial" size="-1">
                            <input size="28" name="x_email" value="<%= x_email %>"></font></td>
    <td width="182" height="6">&nbsp;</td>
    <td width="132" height="6">&nbsp;</td>
  </tr>
  <tr>
    <td width="104" height="5"><b><font size="1" face="Verdana" color="#336699">Deltager liste</font></b></td>
    <td width="186" height="5" colspan="2"><font size="1" face="Verdana">
    <textarea cols=22 rows=3 name="x_Deltager"><%= x_Deltager %></textarea></font></td>
    <td width="182" height="5">&nbsp;</td>
    <td width="132" height="5">&nbsp;</td>
  </tr>
</table>
       
        </td>
        </tr>

   
        </table>
        </td></tr></table>

    </td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="6" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">&nbsp;</td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">

        <table cellpadding="0" cellspacing="0" width="450" border="0" id="table14">
            <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <td bgcolor="#4682B4" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="5" cellspacing="1" width="100%" border="0" id="table15">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><th bgcolor="#DBEAF5">
            <p align="left">
            <font face="tahoma, verdana" size="2">Booking</font></tr>
   
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <td bgcolor="#ffffff" valign="top" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
       
<table border="0" width="652" height="106" bgcolor="#336699" id="table16" style="border-collapse: collapse">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Fra</font></b></td>
    <td width="104" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Til</font></b></td>
    <td width="78" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font size="1" face="Verdana">Flight</font></b></td>
    <td width="179" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Dato</font></b></td>
    <td width="87" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Depart</font></b></td>
    <td width="83" height="28" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <b>
    <font face="Verdana" size="1">Arrival</font></b></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_afrejse">
    <option selected><%= x_afrejse %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="104" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_ankomst">
    <option><%= x_ankomst %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="78" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_flightnr" value="<%= x_flightnr %>" size=10 maxlength=50></font></td>
    <td width="179" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
  <table cellpadding="0" cellspacing="0" border="0" width="178" id="table17">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
          <font size="1">
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
            <p>
             
           
<input name="x_afrejsedato" value="<%= x_afrejsedato %>" size="20" maxlength="10">&nbsp; </font></td>
    <td align="right" width="30" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
<p align="left">
            &nbsp;&nbsp;
            <a href="java script:cal1.popup();" style="color: #0000aa; text-decoration: none; font-family: Tahoma, Verdana; font-size: 11px">
            <img src="images/cal.gif" width="16" height="16" border="0" alt="Click Here to Pick up the date"></a><br></td>
  </tr>
  </table>
     
    </td>
    <td width="87" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_depart" value="<%= x_depart %>" size="10"></font></td>
    <td width="83" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_arrival" value="<%= x_arrival %>" size="7"></font></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_afrejse1">
    <option selected><%= x_afrejse1 %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="104" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_ankomst1">
    <option selected><%= x_ankomst1 %></option>
    <option>Copenhagen</option>
    <option>Ankara</option>
    <option>Stockholm</option>
    </select></td>
    <td width="78" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_flightnr1" value="<%= x_flightnr1 %>" size=10 maxlength=50></font></td>
    <td width="179" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
  <table cellpadding="0" cellspacing="0" border="0" width="179" id="table18">
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="156" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <p align="left">
    <font face="Arial, Helvetica" size="1">

              <input name="x_hjemrejsedato"  value="<%=x_hjemrejsedato%>"></font></td>
   

    <td style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <a href="java script:cal2.popup();" style="color: #0000aa; text-decoration: none; font-family: Tahoma, Verdana; font-size: 11px">
                <img src="images/cal.gif" width="16" height="16" border="0" alt="Click Here to Pick up the date"></a></td>
   

  </tr>
  </table>
                </td></td>
    <td width="87" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_depart1" value="<%= x_depart1 %>" size="10"></font></td>
    <td width="83" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_arrival1" value="<%= x_arrival1 %>" size="7"></font></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Antal Voksne</font> </b> </td>
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_AntalVoksenSalg" onchange="udregn(this.form);">
    <option value="1">1</option>
    <option value="2">2</option>
    <option value="3">3</option>
    <option value="4">4</option>
    <option value="5">5</option>
    <option value="6">6</option>
    <option value="7">7</option>
    <option value="8">8</option>
    <option value="9">9</option>
    <option value="10">10</option>
    <option value="11">11</option>
    <option value="12">12</option>
    <option value="13">13</option>
    <option value="14">14</option>
    <option value="15">15</option>
    <option value="16">16</option>
    </select></td>
    <td width="78" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Antal børn</font></b></td>
    <td width="179" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_AntalBarnSalg" onchange="udregn(this.form);">
    <option selected value="0">0</option>
    <option value="1">1</option>
    <option value="2">2</option>
    <option value="3">3</option>
    <option value="4">4</option>
    <option value="5">5</option>
    <option value="6">6</option>
    <option value="7">7</option>
    <option value="8">8</option>
    <option value="9">9</option>
    <option value="10">10</option>
    <option value="11">11</option>
    <option value="12">12</option>
    <option value="13">13</option>
    <option value="14">14</option>
    <option value="15">15</option>
    <option value="16">16</option>
    </select></td>
    <td width="87" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Antal Infant</font></b></td>
    <td width="83" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><select size="1" name="x_AntalInfantSalg" onchange="udregn(this.form);">
    <option selected value="0">0</option>
    <option value="1">1</option>
    <option value="2">2</option>
    <option value="3">3</option>
    <option value="4">4</option>
    <option value="5">5</option>
    <option value="6">6</option>
    <option value="7">7</option>
    <option value="8">8</option>
    <option value="9">9</option>
    <option value="10">10</option>
    <option value="11">11</option>
    <option value="12">12</option>
    <option value="13">13</option>
    <option value="14">14</option>
    <option value="15">15</option>
    <option value="16">16</option>
    </select></td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <font face="Verdana" size="1"><b>Billet nr.</b></font></td>
    <td width="104" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_Billetnummer" value="<%= x_Billetnummer %>" size="13"></font></td>
    <td width="78" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <font face="Verdana" size="1"><b>Airlines</b></font></td>
    <td width="179" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_Destairlines" value="<%= x_Destairlines %>" size=13 maxlength=50></font></td>
    <td width="87" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><b>
    <font face="Verdana" size="1">
    Betaling</font></b></td>
    <td width="83" height="11" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><font size="1" face="Verdana">
    <input name="x_Betbetingelser" value="Kontant" size="10"></font></td>
  </tr>
</table>
       
        </td>
        </tr>
   


   
        </script>
        </table>
        </td></tr></table>

            </td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="12" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">&nbsp;</td>
  </tr>
  <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
    <td width="104" height="215" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">

        <table cellpadding="0" cellspacing="0" width="450" border="0" id="table28">
            <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
                <td bgcolor="#4682B4" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <table cellpadding="5" cellspacing="1" width="100%" border="0" id="table29">
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px"><th bgcolor="#DBEAF5">
            <p align="left"><font face="tahoma, verdana" size="2">Betaling
            </font></tr>
        <tr style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
        <td bgcolor="#ffffff" valign="top" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
       
<table border="1" width="651" height="124" bgcolor="#FFFFFF" id="table30" style="border-collapse: collapse">
  <tr>
    <td width="92" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">
    Pris voksne </font></b></td>

    <td width="121" height="24">
    <input name="x_PrisVoksenSalg" onchange="udregn(this.form);" size="12" value="<%= x_PrisVoksenSalg %>"></td>
    <td width="93" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">
    Pris børn</font></b></td>
    <td width="80" height="24">
<input name="x_PrisBarnSalg" onchange="udregn(this.form);" size="11" value="<%= x_PrisBarnSalg %>"></td>
    <td width="82" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">
    Pris Influent</font></b></td>
    <td width="150" height="24" colspan="2">
<input name="x_PrisInfantSalg" onchange="udregn(this.form);" size="7" value="<%= x_PrisInfantSalg %>"></td>
  </tr>
  <tr>
    <td width="92" height="24" bgcolor="#FFFFFF">
    <b>
    <font face="Verdana" size="1" color="#336699">Skatter </font></b></td>
    <td width="121" height="24"><font color="#336699" face="Verdana" size="1">
    <input name="x_SkatVoksenSalg" onchange="udregn(this.form);"  value="<%= x_SkatVoksenSalg %>" size="12 " maxlength=50></font></td>
    <td width="93" height="24">&nbsp;</td>
    <td width="80" height="24"><font color="#336699" face="Verdana" size="1">
    <input name="x_SkatBarnSalg" onchange="udregn(this.form);" value="<%= x_SkatBarnSalg %>" size=11 maxlength=50></font></td>
    <td width="82" height="24">&nbsp;</td>
    <td width="150" height="24" colspan="2"><font color="#336699" size="1" face="Verdana">
    <input name="x_SkatInfantSalg" onchange="udregn(this.form);" value="<%= x_SkatInfantSalg %>" size=7 maxlength=50></font></td>
  </tr>
  <tr>
    <td width="92" height="38"><b><font face="Verdana" size="1" color="#336699">Depositum</font></b></td>
    <td width="121" height="38"><font face="Verdana" size="1">
    <input name="x_Depositium" onchange="udregn(this.form);" value="<%= x_Depositium %>" size="12" maxlength="50"></font></td>
    <td width="93" height="38"><b><font size="1" face="Verdana" color="#336699">
    Betales senest</font></b></td>
    <td width="80" height="38"><font face="Verdana" size="1">
    <input name="x_Betsenest" value="<%= x_Betsenest %>" size="11"></font></td>
    <td width="82" height="38"><b><font face="Verdana" size="1" color="#336699">
    Restbeløb</font></b></td>
    <td width="75" height="38"><font size="1" face="Verdana">
    <input name="x_restbelob" value="<%= x_restbelob %>" size="7"></font></td>
    <td width="75" height="38">&nbsp;</td>
  </tr>
  <tr>
    <td width="92" height="26"><b><font size="1" face="Verdana" color="#336699">Købs pris</font></b></td>
    <td width="121" height="26"><b>&nbsp;</b><input name="x_Totalalle0" onchange="pro(this.form);" size="13"></td>
    <td width="93" height="26"><b><font face="Verdana" size="1">
    &nbsp;</font></b><input name="x_total0" size="10" value="<%=x_total %>"></td>
    <td width="80" height="26"><b>&nbsp;</b><input name="x_Profit0" size="8" value="<%=x_Profit %>"></td>
    <td width="82" height="26"><b><font face="Verdana" size="1" color="#336699">Forsikring</font></b></td>
    <td width="150" height="26" colspan="2"><font size="1" face="Verdana">
    <input name="x_forsikring" onchange="udregn(this.form);" value="<%= x_forsikring %>" size="7"></font></td>
  </tr>
</table>
       
        </td>
        </tr>

        <script language="JavaScript">
   
            var cal1 = new calendar2(document.forms['online'].elements['x_afrejsedato']);
            cal1.year_scroll = true;
            cal1.time_comp = false;
            var cal2 = new calendar2(document.forms['online'].elements['x_hjemrejsedato']);
            cal2.year_scroll = false;
            cal2.time_comp = false;
   
        </script>
        </table>
        </td></tr></table>


        <p>
<input type="submit" name="Action" value="Opret billet" style="font-weight: 700"></form></td>
  </tr>
</table>
       

    <p>&nbsp;</p>
</body>
</html>
<!--#include file="footer.asp"-->
Avatar billede neoo Nybegynder
28. december 2003 - 16:37 #20
har rettet det :)
Avatar billede neoo Nybegynder
28. december 2003 - 16:38 #21
superior kan du ikke smide et svar ind så kan jeg dele poin :)
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 9 25/06/202622:20 29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 21:03 Kan man få Word viewer gratis Af Strawberry i Word
26/0813:28 Findes der en brugsanvisning til : "ONKYO Stereo Casette - Tape Deck - R1" Af Ikke-ekspert i Musik & videoafspillere
24/0820:07 Libra Office 26.2.5.2 - Er sort - Kan an ændre til lysere baggrund ? (Windows 11) Af Ikke-ekspert i Office & Kontorpakker
24/0811:24 Hvor kan jeg finde hjælp til at flytte fra min gamle Samsung Flip4 til min nye Samsung Galaxy S24 Af vbr i Apps til Android
24/0811:16 problem med mailbesked Af Pestilensen i Excel
White papers
Flere white papers »