min Path fungerer ikke

Det er fordi du ik' har adgang til folks lokale diske ude fra nettet! Ellers kunne du jo lave gnogle grimme viruser!

//>Rune

De 2 filer, er vel nogle du oploader også ???

Så skal du enten have den eksagte sti på den server det ligger på, eller danne det med en Server.Mappath (hvis der er brug for den eksagte sti)... ellers så bare som vi er vandt til med html...

Hvis dit script ligger i Default.htm og den ligger i mappen www på serveren...
Hvis så dine 2 filer ligger i mappen www/Web på serveren... men du ikke kender en fulde sti, Du ka prøve med:
_______________________________________________________________________________

Sub button_OnClick ()
if Codic1.value = "1" then  window.navigate("web\familie_venner.htm") else _
window.navigate("web\kode_familie_venner.htm")
end sub
_______________________________________________________________________Eller

Sub button_OnClick ()
if Codic1.value = "1" then  window.navigate(Server.MapPath "web\familie_venner.htm")) else _
window.navigate(Server.MapPath("web\kode_familie_venner.htm"))
end sub

Det er dog lige hurgtigt stykket sammen...

Tak allesammen:
Jeg har de følgende kommentarer:
1) Jeg har en hjemmeside på tdc ftp.
2) jeg har ikke en eksagt sti, fordi jeg har ingen påvirkning på server jeg bare kan upload med min Frontpage udgiver, men selvføgelig på min computer skal jeg give en sti men den dur ikke på server.
3) jeg bruger index.htm med den lille skrift-program  ligger som i kan se på en side som hedder kode_familie_venner.htm og lige i c:\Web på min computer, hvis kode  ikke =1 så kommer tilbage til kode_familie_venner.htm eller går videre
4) Sub button_OnClick ()
if Codic1.value = "1" then  window.navigate("web\familie_venner.htm") else _
window.navigate("web\kode_familie_venner.htm")
end sub
fungerer ikke,  finder ikke stien på min computer,jeg har ikke prøvet på server

5)
Sub button_OnClick ()
if Codic1.value = "1" then  window.navigate(Server.MapPath "web\familie_venner.htm")) else _
window.navigate(Server.MapPath("web\kode_familie_venner.htm"))
end sub
fungerer ikke, på min computer, det giver fejl ”Et object er obligatorisk server” men muligvis fungere på server, men så skal jeg skifte hver gang jeg skal rette fra min computer til server, men som sagt jeg har ikke prøvet og det vil jeg gøre
Enric

md_craig> Det her er VBScript kategorien, og derfor er det ikke serversided, og dermed kan du så ikke bruge Server.MapPath() ! Eller så skal han i så fald ha' ASP understøttelse, hvilket hjem næppe tror han har når han ligger hos TDC (Hvis ikke han har købt hotellet ved siden af)

enric> Prøv at fortæl hvad det er du vil ha' dit program til, så skal vi prøve at se om vi kan lave det til dig serversided hvis VBScript ikke er muligt!

//>Rune

Tak Rune:
som sagt det VBskript er det som jeg har beskrevet:
Jeg har en side som hedder ("kode_familie_venner.htm")og har den lille VBskript program at hvis den kode som folk taster ind er ikke = 1 så kommer de tilbage til samme side ellers går videre til  "familie_venner.htm" side, problemet er når jeg upload til server, formoder jer at sti på Server er en hel anden, en dem jeg har på min computer og det er her det går galt.
stig på min computer er C:\Web og på Server = ????
Spørg igen hvis du vil have mere orientering.
Tak Enric

Du kan ikke uploade en fil gennem Clientsided VBScript! Det er du nødt til at gøre gennem enten ASP, PHP eller et andet serversided programmeringssprog!

I ASP kan det fx. gøres gennem en Upload komponent kaldet ASPUpload!

//>Rune

medions >>>

Nej... det kan være rigtigt... hvis der ikke understøttelse for ASP... så bliver Server.Mappath uanvendeligt... derfor var det kun noget der kunne afprøves...

Ok, men hvis det var det skulle virke skulle han så oz ha' sat det op sådan her:

Sub button_OnClick ()
if Codic1.value = "1" then  window.navigate(<%= Server.MapPath("web\familie_venner.htm") %>)) else _
window.navigate(Server.MapPath("web\kode_familie_venner.htm"))
end sub

;o)

//>Rune

Og ved den næste oxo... ;o)
hehe... men det kan jo smutte lidt det skidt...

Det hender at jeg glemmer <%= %> af og til... ;o)

;o)

Hej igen:
jeg sender hele min side:
det gir stadigvæk fejl i linie 24 "En sætning var ventet"
Enric

<html>
<head>
<meta http-equiv="Content-Language" content="da">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>PassWord</title>
<meta name="Microsoft Theme" content="canvas 011, default">
</head>
<body>
<script language="vbscript">
</script>
<p align="left"><font size="4">&nbsp;&nbsp;&nbsp;<a href="Index.htm"><img border="0" src="images/Marguritte-solo-50-50.jpg" width="50" height="50"></a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
&nbsp; <font face="KidTYPEPaint" color="#00FF00">Control Familie &amp; Venner</font></font> </p>
<p align="center"><font face="KidTYPEPaint" color="#00FF00">Indtast</font> </p>
<p align="center"><input size="20" name="Codic1" tabindex="1" type="password"> </p>
<p align="center"><input type="button" value="Send" name="Button" tabindex="2" style="font-family: KidTYPEPaint; color: #00FF00"> </p>
<script language="vbscript">
<!--
Sub button_OnClick ()<BR>if Codic1.value = "1" then  window.navigate(&lt;%=
Server.MapPath("web\familie_venner.htm") %&gt;)) else
_<BR>window.navigate(Server.MapPath("web\kode_familie_venner.htm")) <BR>end
sub<BR>
-->
</script>
</body>
</html>

Undskyld,den side som jeg har sendt for at i skulle se den var forkert
Nu sender jeg den rigtige.
Men der er stadigvæk fejl i linie 25 tegnet er ugyldigt.
På forhånd tak.
Enric
<html>
<head>
<meta http-equiv="Content-Language" content="da">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>PassWord</title>
<meta name="Microsoft Theme" content="canvas 011, default">
</head>
<body>
<script language="vbscript">
</script>
<p align="left"><font size="4">&nbsp;&nbsp;&nbsp;<a href="Index.htm"><img border="0" src="images/Marguritte-solo-50-50.jpg" width="50" height="50"></a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
&nbsp; <font face="KidTYPEPaint" color="#00FF00">Control Familie &amp; Venner</font></font> </p>
<p align="center"><font face="KidTYPEPaint" color="#00FF00">Indtast</font> </p>
<p align="center"><input size="20" name="Codic1" tabindex="1" type="password"> </p>
<p align="center"><input type="button" value="Send" name="Button" tabindex="2" style="font-family: KidTYPEPaint; color: #00FF00"> </p>
<script language="vbscript">
<!--
Sub button_OnClick ()
if Codic1.value = "1" then  window.navigate(<%=Server.MapPath("web\familie_venner.htm") %>)) else _
window.navigate(Server.MapPath("web\kode_familie_venner.htm"))
end sub
-->
</script>
</body>
</html>

Hej:
stadigvæk fejl i linie 25 tegnet er ugyldigt
Enric

<script language="vbscript">
<!--
Sub button_OnClick ()
if Codic1.value = "1" then  window.navigate(<%=Server.MapPath("web\familie_venner.htm") %>) else _
window.navigate(<%=Server.MapPath(web\familie_venner.htm") %>)
end sub
-->
</script>

<script language="vbscript">
<!--
Sub button_OnClick ()
if Codic1.value = "1" then  window.navigate("<%=Server.MapPath("web\familie_venner.htm") %>") else _
window.navigate("<%=Server.MapPath(web\familie_venner.htm") %>")
end sub
-->
</script>

//>Rune

Der er desværre stadig fejl.Selv om jeg har rettet nogle kosmetiske fejl som mangler anførselstegn lige før web  men den fungerer alligevel ikke.
Enric