%
' FP_ASP ASP ble automatisk generert av en FrontPage-komponent. Ikke rediger.
On Error Resume Next
Session("FP_OldCodePage") = Session.CodePage
Session("FP_OldLCID") = Session.LCID
Session.CodePage = 1252
Err.Clear
strErrorUrl = ""
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
If Request.Form("VTI-GROUP") = "0" Then
Err.Clear
Set fp_conn = Server.CreateObject("ADODB.Connection")
FP_DumpError strErrorUrl, "Kan ikke lage tilkobling"
Set fp_rs = Server.CreateObject("ADODB.Recordset")
FP_DumpError strErrorUrl, "Kan ikke opprette datapostsett"
fp_conn.Open Application("bliseilflyger_ConnectionString")
FP_DumpError strErrorUrl, "Kan ikke åpne database"
fp_rs.Open "Resultater", fp_conn, 1, 3, 2 ' adOpenKeySet, adLockOptimistic, adCmdTable
FP_DumpError strErrorUrl, "Kan ikke åpne datapostsett"
fp_rs.AddNew
FP_DumpError strErrorUrl, "Kan ikke legge til nytt datapostsett i databasen"
Dim arFormFields0(6)
Dim arFormDBFields0(6)
Dim arFormValues0(6)
arFormFields0(0) = "E_mail"
arFormDBFields0(0) = "E_mail"
arFormValues0(0) = Request("E_mail")
arFormFields0(1) = "Postnr"
arFormDBFields0(1) = "Postnr"
arFormValues0(1) = Request("Postnr")
arFormFields0(2) = "Fodt"
arFormDBFields0(2) = "Fodt"
arFormValues0(2) = Request("Fodt")
arFormFields0(3) = "Adresse"
arFormDBFields0(3) = "Adresse"
arFormValues0(3) = Request("Adresse")
arFormFields0(4) = "Navn"
arFormDBFields0(4) = "Navn"
arFormValues0(4) = Request("Navn")
arFormFields0(5) = "Sted"
arFormDBFields0(5) = "Sted"
arFormValues0(5) = Request("Sted")
FP_SaveFormFields fp_rs, arFormFields0, arFormDBFields0
If Request.ServerVariables("REMOTE_HOST") <> "" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_HOST"), "Navn_på_ekstern_maskin"
End If
FP_SaveFieldToDB fp_rs, Now, "Tidsangivelse"
If Request.ServerVariables("HTTP_USER_AGENT") <> "" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables("HTTP_USER_AGENT"), "Type_leser"
End If
If Request.ServerVariables("REMOTE_USER") <> "" Then
FP_SaveFieldToDB fp_rs, Request.ServerVariables("REMOTE_USER"), "Brukernavn"
End If
fp_rs.Update
FP_DumpError strErrorUrl, "Kan ikke oppdatere databasen"
fp_rs.Close
fp_conn.Close
FP_FormConfirmation "text/html; charset=windows-1252",_
"Skjemabekreftelse",_
"Takk for at du sendte inn følgende informasjon:",_
"bliseilflyger.asp",_
"Gå tilbake til skjemaet."
End If
End If
Session.CodePage = Session("FP_OldCodePage")
Session.LCID = Session("FP_OldLCID")
%>
Bli Seilflyger
|
|
PRØV SEILFLYGING |
Som seilflyger vil du oppleve grenseløse utfordringer og gleder,
enten du flyr på rekreasjonsnivå eller som aktiv idrettsutøver. |
|
|
Seilflyging er en av de minst kjente idrettsgrener,
men er den sporten som gir utøveren de mest fantastiske opplevelser. På de beste dagene
drives seilflyging langt inn over skoger og fjell, helt ute av syne for publikum.
|
Seilflyene kan i ren
glideflukt komme fra 3-5 km fremover for hver 100m nedover . Maksimal hastighet er
oppunder 300km/t. Dette er 1/3 av hastigheten til et rutefly, og raskere enn en
fallskjerm-hopper faller rett ned! Normalt flyr man med mellom 80-200 km/t. Ved å fylle
vann i tanker i vingene, kan seilflyets rekkevidde økes. Mer vekt gir bedre
glide-egenskaper ved høyere hastigheter. Ved bruk av oppdrift underveis, kan flere hundre
kilometer tilbakelegges uten mellomlanding. En god konkurransepilot kan gjennomføre en
300 km oppgave på ca. to timer, som tilsvarer 150km/t i gjennomsnitt hastighet - og da
med opphold underveis for å utnytte oppdrift. |
|
|
|
|
Opplæringen kan
begynne ved fylte 15 år, og det er også mulig å fly alene med elevbevis fra denne
alderen - etter bestått praktisk prøve. Flygingen foregår da under tilsyn av
instruktør på bakken eller i annet fly i nærheten. Sertifikat kan man først få etter
fylte 17 år, og fra da kan man fly alene uten tilsyn av instruktør. |
Alt som kreves av deg at du melder deg på et kurs og
liker å yte ditt beste!
Fyll ut skjemaet nedenfor for å få tilsendt mer informasjon.
Sist oppdatert: 28. October 2008
|
|
|
|
|
|