neoo Nybegynder

02. januar 2004 - 23:11 Der er 42 kommentarer og
1 løsning

udtræk fra database ?

Hej til alle.

jeg skal til at lave en side hvor den skal læse nogle informationer fra en tabel og smide det ind i på siden på et special måde.
men ved ikke rigtige hvordan det her gøres :(

i min db har jeg en tabel der hedder flight.
og den ser således ud.

pakke_nr | fra_by | til_by | afgangs_dato|afgangs tid|antal
--------------------------------------------------------
23 CPH York 01-05-2004 13:45 25
24 CPH London 05-06-2004 14:30 15
25 ANK LA 06-07-2004 14:45 10

på siden er der bla. 2 rullelister, også er det meningen at man fra rulleliste1 kan se alle data fra fra_by også skal rulleliste2 tilpases rulleliste1, således at vælger man CPH i rulleliste1 skal man kun have mulligehed for at kun vælge York og London i rulleliste2, også skal resten af informationerne for det sæt automatisk smides ind på siden, i forskellige tekstbokse.

er der nogen der ved hvordan det her kan gøres ? eller ved hvordan koden ser ud ?

Synes godt om

neoo Nybegynder

02. januar 2004 - 23:13 #1

Synes godt om

neoo Nybegynder

02. januar 2004 - 23:14 #2

i topen af min kode har jeg:

<%
set Conn= server.CreateObject("ADODB.Connection")
Conn.Open "Data Source="& server.mappath("db/min.mdb") & ";Provider=Microsoft.Jet.OLEDB.4.0;"
set RS= Conn.Execute("SELECT * FROM flight")
x_fra_by = "<OPTION VALUE=""none"">Vælg fra by</OPTION>"
x_til_by = "<OPTION VALUE=""none"">Vælg fra by</OPTION>"
i = 1
Do Until RS.EOF
fra_by = fra_by & "<OPTION VALUE=""" & rs("fra_by") & """>" & rs("fra_by") & "</OPTION>"
til_by = til_by & "<OPTION VALUE=""" & rs("til_by") & """>" & rs("til_by") & "</OPTION>"

i = i +1
rs.MoveNext
Loop
rs.Close
Conn.close
%>

man kan ikke rigtige komme videre

Synes godt om

neoo Nybegynder

02. januar 2004 - 23:35 #3

er der slette ikke nogen der kan hjælpe :( :(

Synes godt om

eagleeye Praktikant

03. januar 2004 - 00:15 #4

De to drop downs kan laves så de er afhængige af hinanden, men det bliver nok sådan den skal loade siden for at man kan se de data som er valgt.
Når siden ikke må reloade efter hver valg skal det nemlig laves i Javascript.

Synes godt om

eagleeye Praktikant

03. januar 2004 - 00:22 #5

Hvad skal da vise hvis der nu er flere som fra og til samme by men med forskellig dato?

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:28 #6

hvis den mulligehed træffes skal den visse det i en rulleliste så man kan vælge fra det

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:29 #7

jeg kunne svare med det samme, fordi jeg skulle lige væk fra computeren med bliver her nu til jeg har løst det. det bare lidt svært nå man ikke kan det :(

Synes godt om

eagleeye Praktikant

03. januar 2004 - 00:30 #8

Så nu vi oppe på 3 rulle lister?

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:32 #9

ja det bliver svære

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:33 #10

også skal resten af informationerne vises alt efter hvad man har valgt af de 3

Synes godt om

eagleeye Praktikant

03. januar 2004 - 00:35 #11

Hvis vi nu siger det ser sådan her ud:

pakke_nr | fra_by | til_by | afgangs_dato|afgangs tid|antal
--------------------------------------------------------
23 CPH York 01-05-2004 13:45 25
24 CPH London 05-06-2004 14:30 15
25 ANK LA 06-07-2004 14:45 10
26 CPH York 09-05-2004 09:40 9

JEg vælger CPH i den første så har man i den anden to som bare hedder York

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:35 #12

ja

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:37 #13

også skal man kunne vælge en af de to afgangsdatoer efter man har valgt et af dem skal den visse afgangstiden og resten af informationer automatisk

Synes godt om

eagleeye Praktikant

03. januar 2004 - 00:39 #14

Så giver det ikke mening at havde to York i samme ??

Synes godt om

eagleeye Praktikant

03. januar 2004 - 00:42 #15

Det bliver enten altid 2 eller altid 3 drop downs

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:44 #16

først vælger man CPH efter det kan man i næste rulleliste se 3 byer york og London og vælger man london skal resten af informationerne komme automatisk i formen, men vælger man derimod york (som vises 1 gang) skal man kunne vælge en af de to afgangsdatoer og efter det skal de resterende info fra det pågældende recordsæt vises automatisk i formen.

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:44 #17

undskyld 2 byer

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:46 #18

man kan også sige at york må vises to gange og london en gang også må man klikke på det ene også det andet for at få vist datoerne , så undgå man 3 ruleliste på den måde

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:47 #19

to rullelister vil være nemere, så må york vises to gange

Synes godt om

neoo Nybegynder

03. januar 2004 - 00:56 #20

er du der

Synes godt om

neoo Nybegynder

03. januar 2004 - 01:30 #21

er du der :(

Synes godt om

eagleeye Praktikant

03. januar 2004 - 01:33 #22

ja ja

Synes godt om

neoo Nybegynder

03. januar 2004 - 01:34 #23

har du nogen forslag til hvordan det her kan gøres ?
ser du mit problem er mellem asp og databasen

Synes godt om

eagleeye Praktikant

03. januar 2004 - 01:35 #24

Ja her et eks dog virker det ikke hetl det kan vælge til og fra by

<html>
<head>
<title></title>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("db101.mdb")
Conn.Open connStr

SQL = "SELECT fra_by, til_by&'|'&pakke_nr FROM flight ORDER BY fra_by, til_by"
Set rs = Conn.Execute(SQL)
rsArr = rs.GetRows()
'Så er [fra_by] i rsArr(0,i), [til_by] er i rsArr(1,i)
for i = 0 to ubound(rsArr,2)
Response.write rsArr(0,i) & " " & rsArr(1,i) & "<br>"
next

SQL = "SELECT pakke_nr, afgangs_dato, afgangs_tid, antal FROM flight ORDER BY pakke_nr"
Set rs = Conn.Execute(SQL)
dataArr = rs.GetRows()

rs.Close
Conn.Close
%>

<script language="javascript" type="text/javascript">
var arr1 = [
<%
oldValg1 = ""
for i = 0 to ubound(rsArr,2)
if oldValg1 <> rsArr(0,i) then
Response.write "['" & rsArr(0,i) & "', ["
oldValg1 = rsArr(0,i)
end if

Response.write "'" & rsArr(1,i) & "'"

t = i+1
if t <= ubound(rsArr,2) then
endValg = false
if oldValg1 <> rsArr(0,t) then
Response.write "]]"
endValg = true
end if
Response.write ","
if endValg = true then response.write vbCrLf
else
Response.write "]]"
end if

next
%>
];

var arrData = [
<%
oldValg1 = ""
for i = 0 to ubound(dataArr,2)
if oldValg1 <> dataArr(0,i) then
Response.write "['" & dataArr(0,i) & "', ["
oldValg1 = dataArr(0,i)
end if

Response.write "'" & dataArr(1,i) & "', '" & dataArr(2,i) & "', '" & dataArr(3,i) & "'"

t = i+1
if t <= ubound(dataArr,2) then
endValg = false
if oldValg1 <> dataArr(0,t) then
Response.write "]]"
endValg = true
end if
Response.write ","
if endValg = true then response.write vbCrLf
else
Response.write "]]"
end if

next
%>
];

function initSels(){
createOpts(document.getElementById('sel1'));
}

function createOpts(sel){
var s = new Array();
var num = 0, txt = "arr1";
var ar = opt = null;
var n = sel.selectedIndex;
var args = createOpts.arguments.length;
for(var i=1;args>i;i++){
s[i-1] = document.getElementById(createOpts.arguments[i]);
if(s[i-1]==sel)num=i;
}
if(args>1){
if(s[num])sel = s[num];
else return;
}
if(n==0&&args>1){
for(i=num;args>i+1;i++){
s[i].length = 0;
opt = document.createElement('OPTION');
s[i].appendChild(opt);
opt.value = "";
opt.text = "\74-- Vælg --";
}
return true
};
for(i=0;num>i;i++){
txt+="["+(s[i].selectedIndex-1)+"][1]";
}
ar = eval(txt);
sel.length = 0;
opt = document.createElement('OPTION');
sel.appendChild(opt);
opt.value = "";
opt.text = "-- Vælg --";
for(i=0;ar.length>i;i++){
opt = document.createElement('OPTION');
sel.appendChild(opt);
if(typeof ar[i] == 'object'){
opt.value = ar[i][0];
opt.text = ar[i][0];
}else{
str = ar[i];
if (str.indexOf("|")!=-1) {
str = str.substr(0,str.indexOf("|"));
}
opt.value = ar[i];
opt.text = str;
}
}
if(args>num+2){
for(i=num+1;args-1>i;i++){
s[i].length = 0;
opt = document.createElement('OPTION');
s[i].appendChild(opt);
opt.value = "";
opt.text = "\74-- Vælg --";
}
}
}

function showdata(sel) {
str = sel;
if (str.indexOf("|")!=-1) {
str = str.substr(str.indexOf("|")+1);
}
alert(dataArr[str]);
}
</script>

</head>
<body style="font-size:12px;" onload="initSels()">
<div style="text-align:left;">
<form name="sels">
<select name="sel1" id="sel1" onchange="createOpts(this,'sel1','sel2');">
<option value="">Vis alle</option>
</select>      
<select name="sel2" id="sel2" onchange="showdata(this.value);">
<option value="">Vis alle</option>
</select>      
</form>
</div>
</body>
</html>

Synes godt om

neoo Nybegynder

03. januar 2004 - 01:41 #25

hvordan får man den til at smide de resterende infor fra den samme pakke nr til formen ?

Synes godt om

neoo Nybegynder

03. januar 2004 - 01:45 #26

Synes godt om

eagleeye Praktikant

03. januar 2004 - 01:52 #27

og det hele skal med??

Synes godt om

eagleeye Praktikant

03. januar 2004 - 01:52 #28

hvad med ankomst_dato?

Synes godt om

neoo Nybegynder

03. januar 2004 - 01:55 #29

ok, jeg har en side hvor jeg indtaster tingene ind.
det ser sådan ud, og fungere :)

<%
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"
%>


<%
response.buffer = true

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

'get fields from form

x_pakke_nr = Request.Form("x_pakke_nr")
x_fra_by = Request.Form("x_fra_by")
x_til_by = Request.Form("x_til_by")
x_afgangs_dato = Request.Form("x_afgangs_dato")
x_afgangs_tid = Request.Form("x_afgangs_tid")
x_ankomst_tid = Request.Form("x_ankomst_tid")
x_fly_selskab = Request.Form("x_fly_selskab")
x_billet_pris = Request.Form("x_billet_pris")
x_flight_nr = Request.Form("x_flight_nr")
x_antal = Request.Form("x_antal")

' 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 [flight] WHERE 0 = 1"

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

rs.AddNew

tmpFld = x_afgangs_dato
If IsDate(tmpFld) Then
rs("afgangs_dato") = cDate(tmpFld)
Else
rs("afgangs_dato") = Null
End If

tmpFld = Trim(x_fra_by)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("fra_by") = tmpFld

tmpFld = Trim(x_til_by)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("til_by") = tmpFld

tmpFld = Trim(x_pakke_nr)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("pakke_nr") = tmpFld

tmpFld = Trim(x_afgangs_tid)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("afgangs_tid") = tmpFld

tmpFld = Trim(x_ankomst_tid)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("ankomst_tid") = tmpFld

tmpFld = Trim(x_fly_selskab)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("fly_selskab") = tmpFld

tmpFld = Trim(x_billet_pris)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("billet_pris") = tmpFld

tmpFld = Trim(x_flight_nr)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("flight_nr") = tmpFld

tmpFld = Trim(x_antal)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("antal") = tmpFld

rs.Update
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
Response.Clear
Response.Redirect "input.asp"
End Select
%>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Gidiş tarihi</title>

</head>

<body>

<table width="100%" border="0" cellspacing="0" cellpadding="0" bgcolor="#336699" id="table12" height="37">
<tr><td bgcolor="#FFFFFF">
<p align="left">
 <p align="left">
 <p align="center">
<font color="#336699" size="4"><b>Overfør billetter til system</b></font><p align="center">
<img border="0" src="images/opretbillet.gif" width="158" height="61"></td></tr></table>

<table width="681" border="0" cellspacing="0" cellpadding="0" id="table1">

<tr>

<td width="611" rowspan="2">
<table width="591" border="0" cellspacing="0" cellpadding="0" id="table2">

<tr>

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

</tr>

<tr>

<td class="text1" bordercolor="#C0C0C0" bgcolor="#FFFFFF" rowspan="12">
<p align="left">    </td>

</tr>

<tr>

<td class="text1" width="144" bgcolor="#BBC3D3" bordercolor="#BBC3D3">
 </td>

<td width="233" bgcolor="#BBC3D3" >
 </td>

<td width="15" height="3" bgcolor="#FFFFFF">
</td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><B>pakkenr.                       </B></font></td>

<td width="233" >
<input type="text" name="x_pakke_nr" size="20" value="<%= x_pakke_nr %>"></td>

<td width="15" height="3" bgcolor="#FFFFFF">
</td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><b>billetter fra</b></font></td>

<td width="233" >
<input type="text" name="x_fra_by" size="20" value="<%= x_fra_by%>"></td>

<td width="15" height="3" bgcolor="#FFFFFF">
</td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><b>billetter til</b></font></td>

<td width="233" >
<input type="text" name="x_til_by" size="20" value="<%= x_til_by %>"></td>

<td width="15" height="3" bgcolor="#FFFFFF">
</td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><b>afgangs dato</b></font></td>

<td width="233" >
<font size="1">

<input name="x_afgangs_dato" type="text" class="input3" id="departureDate" value="<%= x_afgangs_dato %>" size="20" maxlength="10"></font></td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><b>afgangs tid</b></font></td>

<td width="233" >
<input type="text" name="x_afgangs_tid" size="20" value="<%= x_afgangs_tid %>"></td>

<td width="15" height="3">
</td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><b>ankomst tid </b>
</font></td>

<td width="233" >
<input type="text" name="x_ankomst_tid" size="20" value="<%= x_ankomst_tid %>"></td>

<td width="15" bgcolor="#FFFFFF">
 </td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><b>fly selskab</b></font></td>

<td width="233" >
<input type="text" name="x_fly_selskab" size="20" value="<%= x_fly_selskab %>"></td>

<td width="15" bgcolor="#FFFFFF">
 </td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><b>Billet pris</b></font></td>

<td width="233" >
<input type="text" name="x_billet_pris" size="20" value="<%= x_billet_pris %>"></td>

<td width="15" bgcolor="#FFFFFF">
 </td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><b>
flight nr.</b></font></td>

<td width="233" >
<input type="text" name="x_flight_nr" size="20" value="<%= x_flight_nr %>"></td>

<td width="15">
 </td>

</tr>

<tr>

<td class="text1" width="144">
<font color="#666666"><b>
Antal stk.</b></font></td>

<td width="233" >
<input type="text" name="x_antal" size="20" value="<%= x_antal %>"></td>

<td width="15">
 </td>

<form onSubmit="return EW_checkMyForm(this);" action="input.asp" method="post">
<input type="hidden" name="a" value="A">

</tr>

</tr>

</table>

<td width="74" height="179">
 <tr>

<td width="100">
<input type="submit" value="Gem" name="Action"></table>

</body>

</html>
<br>
<br>
<br>
<br>

</html>

Synes godt om

neoo Nybegynder

03. januar 2004 - 01:56 #30

også har jeg en side som er den jeg ved at lave:
og den fungere ikke :(.

den ser sådan ud

<%
set Conn= server.CreateObject("ADODB.Connection")
Conn.Open "Data Source="& server.mappath("db/min.mdb") & ";Provider=Microsoft.Jet.OLEDB.4.0;"
set RS= Conn.Execute("SELECT * FROM flight")
x_fra_by = "<OPTION VALUE=""none"">Vælg fra by</OPTION>"
x_til_by = "<OPTION VALUE=""none"">Vælg fra by</OPTION>"
i = 1
Do Until RS.EOF
fra_by = fra_by & "<OPTION VALUE=""" & rs("fra_by") & """>" & rs("fra_by") & "</OPTION>"
til_by = til_by & "<OPTION VALUE=""" & rs("til_by") & """>" & rs("til_by") & "</OPTION>"

i = i +1
rs.MoveNext
Loop
rs.Close
Conn.close
%>


<%
Response.expires = 0
Response.expiresabsolute = Now() - 1
Response.addHeader "pragma", "no-cache"
Response.addHeader "cache-control", "private"
Response.CacheControl = "no-cache"
%>
<%
response.buffer = true

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

'get fields from form

x_afgangs_dato = Request.Form("x_afgangs_dato")
x_tilbagekomst_dato = Request.Form("x_tilbagekomst_dato")
x_fra_by = Request.Form("x_fra_by")
x_til_by = Request.Form("x_til_by")
x_voksne = Request.Form("x_voksne")
x_boern = Request.Form("x_boern")
x_boernu2 = Request.Form("x_boernu2")
x_navn = Request.Form("x_navn")
x_Deltager = Request.Form("x_Deltager")

' 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_afgangs_dato
If IsDate(tmpFld) Then
rs("afrejsedato") = cDate(tmpFld)
Else
rs("afrejsedato") = Null
End If

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

tmpFld = Trim(x_fra_by)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("afrejse") = tmpFld

tmpFld = x_tilbagekomst_dato
If IsDate(tmpFld) Then
rs("hjemrejsedato") = cDate(tmpFld)
Else
rs("hjemrejsedato") = Null
End If

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

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

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

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

tmpFld = Trim(x_Deltager)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("Deltager") = tmpFld

rs("Total") = TotalFld

rs.Update
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
Response.Clear
Response.Redirect "default.asp"
End Select
%>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Menu</title>
<script language="JavaScript" src="date_picker_datetr.js" type="text/javascript"></script>
</head>
<body>
<p> </p>
<table border="0" width="140" cellspacing="0" cellpadding="2" id="table15">
<form name="online" method="post" action="">
<tr>
<td>
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table16">
<form onSubmit="return EW_checkMyForm(this);" action="OpretBookingadd.asp" method="post">
<input type="hidden" name="a" value="A">
<tr>
<td height="14" class="infoBoxHeading" width="7"></td>
<td width="26%" height="14" class="infoBoxHeading">
<p align="left"> </td>
<td height="14" class="infoBoxHeading">Opret biletter<img src="images/pixel_trans.gif" border="0" alt="" width="11" height="14"></td>
</tr>
</table>
<table border="0" width="166%" cellspacing="0" cellpadding="1" class="infoBox" id="table17">
<tr>
<td>
<table border="0" width="753" cellspacing="0" cellpadding="3" class="infoBoxContents" id="table18">
<tr>
<td colspan="2">
<img src="images/pixel_trans.gif" border="0" alt="" width="100%" height="1"></td>
</tr>
<tr>
<td align="left" class="boxText" width="457">

<table cellpadding="0" cellspacing="1" border="0" width="450" class="boxtable" id="table19">
<form name="online0" method="post" action="">

<tr class="boxrow">
<td width="187" colspan="2">
<p align="left"><b><font size="2" color="#808080">REJSE FRA </font> </b> </td>
<td>
<p align="left">
<select name="x_fra_by" size="1" >
<option><%=fra_by%></option>
<option selected>vælg rejse fra</option>
</select></td></tr><tr class="boxrow">
<td width="187" colspan="2">
<p align="left"><b><font size="2" color="#808080">REJSE TIL </font> </b> </td>
<td>
<p align="left">
<select name="x_til_by" size="1" >
<option><%=til_by%></option>
<option selected>vælg rejse til</option>
</select></td></tr><tr class="boxrow">
<td width="187" colspan="2">
<p align="left"><b><font size="2" color="#808080">UDREJSEDATO</font></b></tD>
<td>
<table cellpadding="0" cellspacing="0" border="0" width="170" id="table20">
<tr>
<td>
<p align="left">
<font size="1">

<input name="x_afgangs_dato" type="text" class="input3" id="departureDate" value="<%= x_afgangs_dato %>" size="20" maxlength="10"></font></td>
<td align="right">
<p align="left">
<a href="java script:show_calendar('document.online.departureDate', document.online.departureDate.value, '../images');">
<img src="images/takvim.gif" width="29" height="22" border="0"></a></td>
</tr>
</table>
</td>
</tr>

<tr class="boxrow">
<td width="187" colspan="2">
<p align="left"><b><font size="2" color="#808080">HJEMREJSEDATO</font></b></tD>
<td>
<table cellpadding="0" cellspacing="0" border="0" width="172" id="table21">
<tr>
<td>
<p align="left">
<font face="Arial, Helvetica" size="1">

<input name="x_tilbagekomst_dato" type="text" class="input3" id="returnDate" size="20" maxlength="10" value="<%= x_tilbagekomst_dato %>"></font></td>
<td align="right">
<p align="left">
<a href="java script:show_calendar('document.online.returnDate', document.online.returnDate.value, '/images');">
<img src="images/takvim.gif" width="29" height="22" border="0"></a></td>
</tr>
</table>
</td>
</tr>

<tr class="boxrow">
<td width="187" colspan="2">
<p align="left"><b><font size="2" color="#808080">ANTAL VOKSNE</font></b></td>
<td>
<p align="left"><select size="1" name="x_voksne">
<option selected 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>
</select></td>
</tr>

<tr class="boxrow">
<td width="187" colspan="2">
<p align="left"><b><font size="2" color="#808080">ANTAL BØRN</font></b></td>
<td>
<p align="left"><select size="1" name="x_boern">
<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>
</select></td>
</tr>

<tr class="boxrow">
<td width="187" colspan="2">
<p align="left"><b><font size="2" color="#808080">Børn under 2 år</font></b></tD>
<td>
<p align="left">
<select size="1" name="x_boernu2">
<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>
</select></td>
</tr>

<tr class="boxrow">
<td width="187" height="58" colspan="2"> </tD>
<td height="58">
 <p> </p>
<p> </p>
<p> </p>
</td>
</tr>

<tr class="boxrow">
<td width="72" height="22"><b><font size="2" color="#808080">Navn</font></b></tD>
<td width="114" height="22"><font size="1" face="Verdana">
<input type="text" name="x_navn" value="<%= x_navn %>" size=14 maxlength=50></font></tD>
<td height="22">
 </td>
</tr> </table>

<p><br></td>
<td align="left" class="boxText" width="284" rowspan="3">

 </td>
</tr>
<tr>
<td align="left" class="boxText" width="457">

<font size="2" color="#808080"><b>Deltagerliste.</b></font></td>
</tr>
<tr>
<td align="left" class="boxText" width="457">

<font size="1" face="Verdana"><textarea cols=44 rows=7 name="x_Deltager"><%= x_Deltager %></textarea></font><input type="submit" name="Action" value="TILFØJ"></td>
</tr>
<tr>
<td colspan="2">
<img src="images/pixel_trans.gif" border="0" alt="" width="100%" height="1"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>

</table>

</body>
</html>
<br>

Synes godt om

neoo Nybegynder

03. januar 2004 - 01:58 #31

undskyld det sidste er forkert.

det burde være det her.

<%
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"
%>


<%
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_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_email = Request.Form("x_email")
x_Deltager = Request.Form("x_Deltager")
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_medarbejder = Request.Form("x_medarbejder")
x_Billetnummer = Request.Form("x_Billetnummer")
x_Totalalle = Request.Form("x_Totalalle")
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_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_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")
x_total = Request.Form("x_total")

' 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_total
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("total") = 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_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_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 = Trim(x_forsikring)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("forsikring") = 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

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")

rs("provision") = TotalFld

rs.Update
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
Response.Clear
Response.Redirect "OpretBookingprocces.asp"
End Select
%>


</script>
<html>
<head><title>Opret booking</title>
<script language="JavaScript" src="calendar1.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>

<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">

<p> </p>

<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">
 </td>
<td width="132" height="28" bgcolor="#FFFFFF">
<p align="center">
<input name="x_dato" size="11" type="hidden" 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"> </td>
<td width="132" height="24">
<input name="x_maaned" type="hidden" value="<% =monthname(month(now)) %>" size=8 maxlength=1></font></td></td>

</tr>
<tr>
<td width="104" height="23"><b><font face="Verdana" size="1" color="#336699">
Postnr. & 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"> </td>
<td width="132" height="23"> </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"> </td>
<td width="132" height="12"> </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"> </td>
<td width="132" height="6"><font face="Arial" size="-1">
<input size="8" name="x_medarbejder" type="hidden" value="<%Response.Write " " & session("brugernavn")%>"></font></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"> </td>
<td width="132" height="5"> </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"> </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="1" 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>AAlborg</option>
<option>AArhus</option>
<option>Adana</option>
<option>Agri</option>
<option>Almaata</option>
<option>Amman</option>
<option>Amsterdam</option>
<option>Ankara</option>
<option>Antalya</option>
<option>Askabat</option>
<option>Atina</option>
<option>Atlanta</option>
<option>Bahreyn</option>
<option>Bakü</option>
<option>Baltimore</option>
<option>Bangkok</option>
<option>Barselona</option>
<option>Basel</option>
<option>Batman</option>
<option>Beijing</option>
<option>Berlin</option>
<option>Beirut</option>
<option>Bergen</option>
<option>Biskek</option>
<option>Billund</option>
<option>Bodrum</option>
<option>Boston</option>
<option>Brüksel</option>
<option>Budapeste</option>
<option>Bükres</option>
<option>Genevre</option>
<option>Copenhagen</option>
<option>Cezayir</option>
<option>Chicago</option>
<option>Cidde</option>
<option>Cleveland</option>
<option>Dalaman</option>
<option>Dallas</option>
<option>Delhi</option>
<option>Denizli</option>
<option>Denver</option>
<option>Detroit</option>
<option>Diyarbakir</option>
<option>Dubai</option>
<option>Düsseldorf</option>
<option>Edremit</option>
<option>Elazgi</option>
<option>Erzincan</option>
<option>Erzurum</option>
<option>Frankfurt</option>
<option>Gaziantep</option>
<option>Hamburg</option>
<option> Hannover</option>
<option>Hong Kong</option>
<option>Houston</option>
<option>Istanbul</option>
<option>Izmir</option>
<option>Kahire</option>
<option>Karaçi</option>
<option>Kars</option>
<option>Karup</option>
<option>Kayseri</option>
<option>Kiev</option>
<option>Kisinev</option>
<option>Konya</option>
<option>Köln</option>
<option>Kuveyt</option>
<option>Las Vegas</option>
<option>Lefkosa</option>
<option>Londra</option>
<option>Los Angeles</option>
<option>Lyon</option>
<option>Madrid</option>
<option>Malatya</option>
<option>Manchester</option>
<option>Mardin</option>
<option>Miami</option>
<option>Milano</option>
<option>Minneapolis</option>
<option>Moskova</option>
<option>Mus</option>
<option>Münih</option>
<option>New York</option>
<option>Nice</option>
<option>Nürnberg</option>
<option>Odessa</option>
<option>Orlando</option>
<option>Osaka</option>
<option>Oslo</option>
<option>Trondheim</option>
<option>Stavanger</option>
<option>Kristiansand</option>
<option>Paris</option>
<option>Pittsburg</option>
<option>Prag</option>
<option>Pristina</option>
<option>Riyad</option>
<option>Roma</option>
<option>Damaskus</option>
<option>Samsun</option>
<option>San Diego</option>
<option>San Francisco</option>
<option>Sanghai</option>
<option>Saraybosna</option>
<option> Seattle</option>
<option>Seul</option>
<option>Simferopol</option>
<option>Singapur</option>
<option>Sivas</option>
<option>Sofya</option>
<option>St.Louis</option>
<option>Stockholm</option>
<option>Strasbourg</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>AAlborg</option>
<option>AArhus</option>
<option>Adana</option>
<option>Agri</option>
<option>Almaata</option>
<option>Amman</option>
<option>Amsterdam</option>
<option>Ankara</option>
<option>Antalya</option>
<option>Askabat</option>
<option>Atina</option>
<option>Atlanta</option>
<option>Bahreyn</option>
<option>Bakü</option>
<option>Baltimore</option>
<option>Bangkok</option>
<option>Barselona</option>
<option>Basel</option>
<option>Batman</option>
<option>Beijing</option>
<option>Berlin</option>
<option>Beirut</option>
<option>Bergen</option>
<option>Biskek</option>
<option>Billund</option>
<option>Bodrum</option>
<option>Boston</option>
<option>Brüksel</option>
<option>Budapeste</option>
<option>Bükres</option>
<option>Genevre</option>
<option>Copenhagen</option>
<option>Cezayir</option>
<option>Chicago</option>
<option>Cidde</option>
<option>Cleveland</option>
<option>Dalaman</option>
<option>Dallas</option>
<option>Delhi</option>
<option>Denizli</option>
<option>Denver</option>
<option>Detroit</option>
<option>Diyarbakir</option>
<option>Dubai</option>
<option>Düsseldorf</option>
<option>Edremit</option>
<option>Elazgi</option>
<option>Erzincan</option>
<option>Erzurum</option>
<option>Frankfurt</option>
<option>Gaziantep</option>
<option>Hamburg</option>
<option> Hannover</option>
<option>Hong Kong</option>
<option>Houston</option>
<option>Istanbul</option>
<option>Izmir</option>
<option>Kahire</option>
<option>Karaçi</option>
<option>Kars</option>
<option>Karup</option>
<option>Kayseri</option>
<option>Kiev</option>
<option>Kisinev</option>
<option>Konya</option>
<option>Köln</option>
<option>Kuveyt</option>
<option>Las Vegas</option>
<option>Lefkosa</option>
<option>Londra</option>
<option>Los Angeles</option>
<option>Lyon</option>
<option>Madrid</option>
<option>Malatya</option>
<option>Manchester</option>
<option>Mardin</option>
<option>Miami</option>
<option>Milano</option>
<option>Minneapolis</option>
<option>Moskova</option>
<option>Mus</option>
<option>Münih</option>
<option>New York</option>
<option>Nice</option>
<option>Nürnberg</option>
<option>Odessa</option>
<option>Orlando</option>
<option>Osaka</option>
<option>Oslo</option>
<option>Trondheim</option>
<option>Stavanger</option>
<option>Kristiansand</option>
<option>Paris</option>
<option>Pittsburg</option>
<option>Prag</option>
<option>Pristina</option>
<option>Riyad</option>
<option>Roma</option>
<option>Damaskus</option>
<option>Samsun</option>
<option>San Diego</option>
<option>San Francisco</option>
<option>Sanghai</option>
<option>Saraybosna</option>
<option> Seattle</option>
<option>Seul</option>
<option>Simferopol</option>
<option>Singapur</option>
<option>Sivas</option>
<option>Sofya</option>
<option>St.Louis</option>
<option>Stockholm</option>
<option>Strasbourg</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">  </font></td>
<td align="right" width="30" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
<p align="left">
  
<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>AAlborg</option>
<option>AArhus</option>
<option>Adana</option>
<option>Agri</option>
<option>Almaata</option>
<option>Amman</option>
<option>Amsterdam</option>
<option>Ankara</option>
<option>Antalya</option>
<option>Askabat</option>
<option>Atina</option>
<option>Atlanta</option>
<option>Bahreyn</option>
<option>Bakü</option>
<option>Baltimore</option>
<option>Bangkok</option>
<option>Barselona</option>
<option>Basel</option>
<option>Batman</option>
<option>Beijing</option>
<option>Berlin</option>
<option>Beirut</option>
<option>Bergen</option>
<option>Biskek</option>
<option>Billund</option>
<option>Bodrum</option>
<option>Boston</option>
<option>Brüksel</option>
<option>Budapeste</option>
<option>Bükres</option>
<option>Genevre</option>
<option>Copenhagen</option>
<option>Cezayir</option>
<option>Chicago</option>
<option>Cidde</option>
<option>Cleveland</option>
<option>Dalaman</option>
<option>Dallas</option>
<option>Delhi</option>
<option>Denizli</option>
<option>Denver</option>
<option>Detroit</option>
<option>Diyarbakir</option>
<option>Dubai</option>
<option>Düsseldorf</option>
<option>Edremit</option>
<option>Elazgi</option>
<option>Erzincan</option>
<option>Erzurum</option>
<option>Frankfurt</option>
<option>Gaziantep</option>
<option>Hamburg</option>
<option> Hannover</option>
<option>Hong Kong</option>
<option>Houston</option>
<option>Istanbul</option>
<option>Izmir</option>
<option>Kahire</option>
<option>Karaçi</option>
<option>Kars</option>
<option>Karup</option>
<option>Kayseri</option>
<option>Kiev</option>
<option>Kisinev</option>
<option>Konya</option>
<option>Köln</option>
<option>Kuveyt</option>
<option>Las Vegas</option>
<option>Lefkosa</option>
<option>Londra</option>
<option>Los Angeles</option>
<option>Lyon</option>
<option>Madrid</option>
<option>Malatya</option>
<option>Manchester</option>
<option>Mardin</option>
<option>Miami</option>
<option>Milano</option>
<option>Minneapolis</option>
<option>Moskova</option>
<option>Mus</option>
<option>Münih</option>
<option>New York</option>
<option>Nice</option>
<option>Nürnberg</option>
<option>Odessa</option>
<option>Orlando</option>
<option>Osaka</option>
<option>Oslo</option>
<option>Trondheim</option>
<option>Stavanger</option>
<option>Kristiansand</option>
<option>Paris</option>
<option>Pittsburg</option>
<option>Prag</option>
<option>Pristina</option>
<option>Riyad</option>
<option>Roma</option>
<option>Damaskus</option>
<option>Samsun</option>
<option>San Diego</option>
<option>San Francisco</option>
<option>Sanghai</option>
<option>Saraybosna</option>
<option> Seattle</option>
<option>Seul</option>
<option>Simferopol</option>
<option>Singapur</option>
<option>Sivas</option>
<option>Sofya</option>
<option>St.Louis</option>
<option>Stockholm</option>
<option>Strasbourg</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>AAlborg</option>
<option>AArhus</option>
<option>Adana</option>
<option>Agri</option>
<option>Almaata</option>
<option>Amman</option>
<option>Amsterdam</option>
<option>Ankara</option>
<option>Antalya</option>
<option>Askabat</option>
<option>Atina</option>
<option>Atlanta</option>
<option>Bahreyn</option>
<option>Bakü</option>
<option>Baltimore</option>
<option>Bangkok</option>
<option>Barselona</option>
<option>Basel</option>
<option>Batman</option>
<option>Beijing</option>
<option>Berlin</option>
<option>Beirut</option>
<option>Bergen</option>
<option>Biskek</option>
<option>Billund</option>
<option>Bodrum</option>
<option>Boston</option>
<option>Brüksel</option>
<option>Budapeste</option>
<option>Bükres</option>
<option>Genevre</option>
<option>Copenhagen</option>
<option>Cezayir</option>
<option>Chicago</option>
<option>Cidde</option>
<option>Cleveland</option>
<option>Dalaman</option>
<option>Dallas</option>
<option>Delhi</option>
<option>Denizli</option>
<option>Denver</option>
<option>Detroit</option>
<option>Diyarbakir</option>
<option>Dubai</option>
<option>Düsseldorf</option>
<option>Edremit</option>
<option>Elazgi</option>
<option>Erzincan</option>
<option>Erzurum</option>
<option>Frankfurt</option>
<option>Gaziantep</option>
<option>Hamburg</option>
<option> Hannover</option>
<option>Hong Kong</option>
<option>Houston</option>
<option>Istanbul</option>
<option>Izmir</option>
<option>Kahire</option>
<option>Karaçi</option>
<option>Kars</option>
<option>Karup</option>
<option>Kayseri</option>
<option>Kiev</option>
<option>Kisinev</option>
<option>Konya</option>
<option>Köln</option>
<option>Kuveyt</option>
<option>Las Vegas</option>
<option>Lefkosa</option>
<option>Londra</option>
<option>Los Angeles</option>
<option>Lyon</option>
<option>Madrid</option>
<option>Malatya</option>
<option>Manchester</option>
<option>Mardin</option>
<option>Miami</option>
<option>Milano</option>
<option>Minneapolis</option>
<option>Moskova</option>
<option>Mus</option>
<option>Münih</option>
<option>New York</option>
<option>Nice</option>
<option>Nürnberg</option>
<option>Odessa</option>
<option>Orlando</option>
<option>Osaka</option>
<option>Oslo</option>
<option>Trondheim</option>
<option>Stavanger</option>
<option>Kristiansand</option>
<option>Paris</option>
<option>Pittsburg</option>
<option>Prag</option>
<option>Pristina</option>
<option>Riyad</option>
<option>Roma</option>
<option>Damaskus</option>
<option>Samsun</option>
<option>San Diego</option>
<option>San Francisco</option>
<option>Sanghai</option>
<option>Saraybosna</option>
<option> Seattle</option>
<option>Seul</option>
<option>Simferopol</option>
<option>Singapur</option>
<option>Sivas</option>
<option>Sofya</option>
<option>St.Louis</option>
<option>Stockholm</option>
<option>Strasbourg</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="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="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"> </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"> </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"> </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"> </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> </b><input name="x_Totalalle" onchange="pro(this.form);" size="13" value="<%=x_Totalalle %>"></td>
<td width="93" height="26"><b><font face="Verdana" size="1">
 </font></b><input name="x_total" size="10" value="<%=x_total %>"></td>
<td width="80" height="26"><b> </b><input name="x_Profit" 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 calendar1(document.forms['online'].elements['x_afrejsedato']);
cal1.year_scroll = true;
cal1.time_comp = false;
var cal2 = new calendar1(document.forms['online'].elements['x_hjemrejsedato']);
cal2.year_scroll = false;
cal2.time_comp = false;

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

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

</body>
</html>

Synes godt om

neoo Nybegynder

03. januar 2004 - 02:00 #32

option byerne smider jeg ind databasen snart så det ikke fylder meget i koden, men det er sådan (se input.asp den første) at man kun kan oprette fra en by til en anden, så hjemmerejsen er vel det samme som afrejsen

Synes godt om

neoo Nybegynder

03. januar 2004 - 02:01 #33

Kommentar: neoo
03/01-2004 01:56:58 den indlæg er forkert

Synes godt om

neoo Nybegynder

03. januar 2004 - 02:03 #34

det er fraby til by om det er afrejse eller ankomst det er det samme.
men så kommer det problem at man så kan have en afrejse fra cph til london og hjemmerejse som er cph til london, men det brugeren så lad være med at vælge

Synes godt om

neoo Nybegynder

03. januar 2004 - 02:04 #35

du må undskylde at jeg har smidt for meget kode på siden

Synes godt om

eagleeye Praktikant

03. januar 2004 - 02:10 #36

Prøv dette

du må selv lige rette connStr så den passer med din database, nu udfylder den også form felterne..
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("db101.mdb")

<html>
<head>
<title></title>
</head>
<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("db101.mdb")
Conn.Open connStr

SQL = "SELECT fra_by, til_by&'|'&pakke_nr FROM flight ORDER BY fra_by, til_by"
Set rs = Conn.Execute(SQL)
rsArr = rs.GetRows()
'Så er [fra_by] i rsArr(0,i), [til_by] er i rsArr(1,i)
for i = 0 to ubound(rsArr,2)
Response.write rsArr(0,i) & " " & rsArr(1,i) & "<br>"
next

SQL = "SELECT pakke_nr, afgangs_dato, afgangs_tid, ankomst_tid, fly_selskab, billet_pris, antal FROM flight ORDER BY pakke_nr"
Set rs = Conn.Execute(SQL)
dataArr = rs.GetRows()

rs.Close
Conn.Close
%>

<script language="javascript" type="text/javascript">
var arr1 = [
<%
oldValg1 = ""
for i = 0 to ubound(rsArr,2)
if oldValg1 <> rsArr(0,i) then
Response.write "['" & rsArr(0,i) & "', ["
oldValg1 = rsArr(0,i)
end if

Response.write "'" & rsArr(1,i) & "'"

t = i+1
if t <= ubound(rsArr,2) then
endValg = false
if oldValg1 <> rsArr(0,t) then
Response.write "]]"
endValg = true
end if
Response.write ","
if endValg = true then response.write vbCrLf
else
Response.write "]]"
end if

next
%>
];

<%
for i = 0 to ubound(dataArr,2)
Response.write "var arrData" & dataArr(0,i) & " = new Array("
for x = 0 to 6
if ""&dataArr(x,i) <> "" then
Response.write "'" & dataArr(x,i) & "'"
else
Response.write "' '"
end if
if x < 6 then Response.write ","
next
Response.write ");" & vbCrLf
next
%>

function initSels(){
createOpts(document.getElementById('sel1'));
}

function createOpts(sel){
var s = new Array();
var num = 0, txt = "arr1";
var ar = opt = null;
var n = sel.selectedIndex;
var args = createOpts.arguments.length;
for(var i=1;args>i;i++){
s[i-1] = document.getElementById(createOpts.arguments[i]);
if(s[i-1]==sel)num=i;
}
if(args>1){
if(s[num])sel = s[num];
else return;
}
if(n==0&&args>1){
for(i=num;args>i+1;i++){
s[i].length = 0;
opt = document.createElement('OPTION');
s[i].appendChild(opt);
opt.value = "";
opt.text = "\74-- Vælg --";
}
return true
};
for(i=0;num>i;i++){
txt+="["+(s[i].selectedIndex-1)+"][1]";
}
ar = eval(txt);
sel.length = 0;
opt = document.createElement('OPTION');
sel.appendChild(opt);
opt.value = "";
opt.text = "-- Vælg --";
for(i=0;ar.length>i;i++){
opt = document.createElement('OPTION');
sel.appendChild(opt);
if(typeof ar[i] == 'object'){
opt.value = ar[i][0];
opt.text = ar[i][0];
}else{
str = ar[i];
if (str.indexOf("|")!=-1) {
str = str.substr(0,str.indexOf("|"));
}
opt.value = ar[i];
opt.text = str;
}
}
if(args>num+2){
for(i=num+1;args-1>i;i++){
s[i].length = 0;
opt = document.createElement('OPTION');
s[i].appendChild(opt);
opt.value = "";
opt.text = "\74-- Vælg --";
}
}
}

function showdata(theform,sel) {
str = sel;
if (str.indexOf("|")!=-1) {
str = str.substr(str.indexOf("|")+1);
}
str = eval("arrData"+str)
var myArr = (""+str).split(",");
theform.pakke_nr.value = myArr[0];
theform.afgangs_dato.value = myArr[1];
theform.afgangs_tid.value = myArr[2];
theform.ankomst_tid.value = myArr[3];
theform.fly_selskab.value = myArr[4];
theform.billet_pris.value = myArr[5];
theform.antal.value = myArr[6];
}
</script>

</head>
<body style="font-size:12px;" onload="initSels()">
<div style="text-align:left;">
<form name="sels">
<select name="sel1" id="sel1" onchange="createOpts(this,'sel1','sel2');">
<option value="">Vis alle</option>
</select>      
<select name="sel2" id="sel2" onchange="showdata(this.form,this.value);">
<option value="">Vis alle</option>
</select>      
<br>
Pakke nr:<input type="text" name="pakke_nr" value=""><br>
afgangs_dato:<input type="text" name="afgangs_dato" value=""><br>
afgangs_tid:<input type="text" name="afgangs_tid" value=""><br>
ankomst_tid:<input type="text" name="ankomst_tid" value=""><br>
fly_selskab:<input type="text" name="fly_selskab" value=""><br>
billet_pris:<input type="text" name="billet_pris" value=""><br>
antal:<input type="text" name="antal" value=""><br>
</form>
</div>
</body>
</html>

Synes godt om

neoo Nybegynder

03. januar 2004 - 02:15 #37

kanonn :) det virker, men skal lige spørge hvad nu hvis antalet skal minuses med 1 hvergang der bliver opretet en billet

Synes godt om

eagleeye Praktikant

03. januar 2004 - 02:19 #38

På hvilken måde tænker du?
men du kan lave en UPDATE sql som trækker en fra en kolonne:
SQL = "UPDATE fligt SET antal = antal-1 where pakke_nr = 23"

Synes godt om

eagleeye Praktikant

03. januar 2004 - 02:22 #39

Jeg smutter i seng nu, godnat og sov godt ;)

Synes godt om

neoo Nybegynder

03. januar 2004 - 02:24 #40

faktisk skal alt det smides i denne side og der har jeg en knap der hedder opret billet og hver gang der bliver opretet en billet skal den tælle antalet ned en gang.
det er denne kode:

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

<%
set Conn= server.CreateObject("ADODB.Connection")
Conn.Open "Data Source="& server.mappath("db/min.mdb") & ";Provider=Microsoft.Jet.OLEDB.4.0;"
set RS= Conn.Execute("SELECT * FROM flight")
x_fra_by = "<OPTION VALUE=""none"">Vælg fra by</OPTION>"
x_til_by = "<OPTION VALUE=""none"">Vælg fra by</OPTION>"
i = 1
Do Until RS.EOF
fra_by = fra_by & "<OPTION VALUE=""" & rs("fra_by") & """>" & rs("fra_by") & "</OPTION>"
til_by = til_by & "<OPTION VALUE=""" & rs("til_by") & """>" & rs("til_by") & "</OPTION>"

i = i +1
rs.MoveNext
Loop
rs.Close
Conn.close
%>

<%
Response.expires = 0
Response.expiresabsolute = Now() - 1
Response.addHeader "pragma", "no-cache"
Response.addHeader "cache-control", "private"
Response.CacheControl = "no-cache"
%>


<%
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_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_email = Request.Form("x_email")
x_Deltager = Request.Form("x_Deltager")
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_medarbejder = Request.Form("x_medarbejder")
x_Billetnummer = Request.Form("x_Billetnummer")
x_Totalalle = Request.Form("x_Totalalle")
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_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_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")
x_total = Request.Form("x_total")

' 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_total
If Not IsNumeric(tmpFld) Then tmpFld = 0
rs("total") = 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_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_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 = Trim(x_forsikring)
If trim(tmpFld) & "x" = "x" Then tmpFld = Null
rs("forsikring") = 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

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")

rs("provision") = TotalFld

rs.Update
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
Response.Clear
Response.Redirect "OpretBookingprocces.asp"
End Select
%>


</script>
<html>
<head><title>Opret booking</title>
<script language="JavaScript" src="calendar1.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>

<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">

<p> </p>

<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">
 </td>
<td width="132" height="28" bgcolor="#FFFFFF">
<p align="center">
<input name="x_dato" size="11" type="hidden" 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"> </td>
<td width="132" height="24">
<input name="x_maaned" type="hidden" value="<% =monthname(month(now)) %>" size=8 maxlength=1></font></td></td>

</tr>
<tr>
<td width="104" height="23"><b><font face="Verdana" size="1" color="#336699">
Postnr. & 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"> </td>
<td width="132" height="23"> </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"> </td>
<td width="132" height="12"> </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"> </td>
<td width="132" height="6"><font face="Arial" size="-1">
<input size="8" name="x_medarbejder" type="hidden" value="<%Response.Write " " & session("brugernavn")%>"></font></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"> </td>
<td width="132" height="5"> </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"> </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="1" 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 name="sel1" id="sel1" onchange="createOpts(this,'sel1','sel2');">
<option value="">Vis alle</option>
</select>

<td width="104" height="24" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">

<select name="sel3" id="sel3" onchange="showdata(this.form,this.value);">
<option value="">Vis alle</option>
</select>

<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="<%=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">  </font></td>
<td align="right" width="30" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
<p align="left">
  
<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 name="sel2" id="sel2" onchange="createOpts(this,'sel1','sel2');">
<option value="">Vis alle</option>
</select>
<td width="104" height="23" bgcolor="#FFFFFF" style="color: #000000; font-family: Tahoma, Verdana; font-size: 11px">
<select name="sel4" id="sel4" onchange="showdata(this.form,this.value);">
<option value="">Vis alle</option>
</select>
<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="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="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"> </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 Infant</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"> </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"> </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"> </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> </b><input name="x_Totalalle" onchange="pro(this.form);" size="13" value="<%=x_Totalalle %>"></td>
<td width="93" height="26"><b><font face="Verdana" size="1">
 </font></b><input name="x_total" size="10" value="<%=x_total %>"></td>
<td width="80" height="26"><b> </b><input name="x_Profit" 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 calendar1(document.forms['online'].elements['x_afrejsedato']);
cal1.year_scroll = true;
cal1.time_comp = false;
var cal2 = new calendar1(document.forms['online'].elements['x_hjemrejsedato']);
cal2.year_scroll = false;
cal2.time_comp = false;

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

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

</body>
</html>

Synes godt om

neoo Nybegynder

03. januar 2004 - 02:30 #41

ok, du skal have mange tak for hjælpen :) god nat og sov godt :)
og du må meget gerne indlægge en svar så du kan få nogle poin

Synes godt om

eagleeye Praktikant

03. januar 2004 - 11:48 #42

Ok ;)

jeg kan ikke overskue alt det kode ;)
men hvis du selv har lavet det ved du ca. hvor det skal puttes ind. Hvad er unikt for at trække en fra antal i din tabel er det pakke_nr eller en anden kolonne. Det skal være det du styre det på.

Efter du har oprette en bilet eller hvad det hedder kan du så trække en fra antal:

SQL = "UPDATE fligt SET antal = antal-1 where pakke_nr = " & pakke_nr

Du har da en connection til databasen:
conn.Open xDb_Conn_Str

så SQL sætningen kan udføres sådan her:

Conn.Execute(SQL)

JEg vil gætte på det skal ind lige før dissse linjer, som er efter bileten er gemt (så vidt jeg kan se) og connection til databasen lukkes:

conn.Close
Set conn = Nothing
Response.Clear
Response.Redirect "OpretBookingprocces.asp"
End Select

Synes godt om

neoo Nybegynder

03. januar 2004 - 21:51 #43

tussind tak for hjælpen :) :)

Synes godt om

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

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

Notifikationer

udtræk fra database ?

Log ind eller opret profil

Hov!