<%myFile=Server.MapPath("/mdb-database/cont.txt")
Set FileObject=CreateObject ("Scripting.FileSystemObject")
Set InStream=FileObject.OpenTextFile(myFile,1,true)
dim cont
if session("utente")="" then
cont=InStream.ReadLine()+1
session("utente")=1
else
cont = InStream.ReadLine()
end if
INStream.close
Set FileObject=CreateObject ("Scripting.FileSystemObject")
Set OutStream=FileObject.CreateTextFile(myFile,true)
OutStream.WriteLine(cont)%>
"Mietwagen mit Fahrer"
"Mietwagen tageweise "
"Mietwagen für die Dauer des Urlaubs"
Warum uns wählen ?
Wir können Ihnen helfen, folgende Probleme zu lösen:
