/ Forside/ Teknologi / Udvikling / ASP / Spørgsmål
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Hjælp med IF kode
Fra : plobber
Vist : 514 gange
50 point
Dato : 17-05-03 12:50

Hej. Jeg er begyndt at skrive ASP men er løbet ind i et prob.
Jeg har neden for lavet en kode som virker godt nok, men kun hvis jeg skriver default.asp?id=1 for at vise den første side.
Jeg vil gerne have en IF kode der får den til at åbne id=1 uden at skrive default.asp?id=1, da id=1 er forsiden.
På forhånd Tak

Kode:
<%
' Variabler
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath(Request.Querystring("id") &".txt")
Set f = fso.OpenTextFile(filespec,1)
Do While not f.AtEndOfStream
Response.write f.ReadLine
Loop
f.Close
%>

 
 
Accepteret svar
Fra : smorch

Modtaget 60 point
Dato : 17-05-03 13:07

<%
' Variabler
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
if Request.Querystring("id")="" then ID=1
filespec = Server.Mappath(ID &".txt")
Set f = fso.OpenTextFile(filespec,1)
Do While not f.AtEndOfStream
Response.write f.ReadLine
Loop
f.Close
%>


Godkendelse af svar
Fra : plobber


Dato : 17-05-03 13:17

Tak for svaret smorch.
MEN
<%
' Variabler
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
if Request.Querystring("id")="" then ID=1 -> else ID=Request.Querystring("id") <- Manglede du :)
filespec = Server.Mappath(ID &".txt")
Set f = fso.OpenTextFile(filespec,1)
Do While not f.AtEndOfStream
Response.write f.ReadLine
Loop
f.Close
%>

Du har følgende muligheder
Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.
Søg
Reklame
Statistik
Spørgsmål : 177415
Tips : 31962
Nyheder : 719565
Indlæg : 6407852
Brugere : 218876

Månedens bedste
Årets bedste
Sidste års bedste