Invalid path character?!

Hej!

Får detta fel:

Server.MapPath() error 'ASP 0173 : 80004005'

Invalid Path Character

/navigation.asp, line 50

An invalid character was specified in the Path parameter for the MapPath method.

db = "nyheter.mdb"  
MinCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath(db) &" "  
SQL = "SELECT TOP 1 * From nyheter Where url=" & Request.Querystring("url") &" AND visa = 'sida'"   
RecSet.Open SQL, MinCon, 3,3

shyrre

Kan du inte bara skriva:

MinCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& db

kanske, ska testa :)

noep :(

MinCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath(db)

sorry. detta som är raderna som felet ligger i (tror ja)

Set objFS=Server.CreateObject("Scripting.FileSystemObject")
strName="temp" & Timer() & ".asp"

Timer()? Du kanske vill ha now() istället?

ytterligare en skum rad till det hela :e

Set objFile=objFS.CreateTextFile(Server.MapPath(strName),True)

Fick:

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method

/navigation.asp, line 27

sen jag bytte till now()

Hur ser strName ut? Kan du testa createtextfile med ett valigt namn (utan now())?

ÄHH! glöm det tidigare. skickar nytt. alltihop.

<%
If not Request.Querystring("url") = "" Then
  
Set MinCon = Server.CreateObject("ADODB.Connection")
Set RecSet = Server.CreateObject("ADODB.RecordSet")

db = "nyheter.mdb" 
MinCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath(db) 
SQL = "SELECT TOP 1 * From nyheter Where url=" & Request.Querystring("url") &" AND visa = 'sida'"  
RecSet.Open SQL, MinCon, 3,3

Set objFS=Server.CreateObject("Scripting.FileSystemObject") 
strName="temp" & Now() & ".asp"

' ---start av loopen---
Do While Not RecSet.EOF

Dim myMenu
myMeny = CInt(RecSet("kommentar"))

Select Case myMeny
Case 1
%><!-- #include file="home_menu.asp" --><%
Case 2
%><!-- #include file="information_menu.asp" --><%
Case 3
%><!-- #include file="contact_menu.asp" --><%
Case 4
%><!-- #include file="media_menu.asp" --><%
End Select
%>
<table border="0" cellpadding="5" cellspacing="0" style="border-collapse: collapse" width="98%" height="1">
<tr>
<td width="68%" valign="top" height="1"><br><%
Set objFile=objFS.CreateTextFile(Server.MapPath(strName),True)

Call objFile.WriteLine(RecSet("kod"))

Call objFile.Close

Set objFile=objFS.CreateTextFile(Server.MapPath(strName),True)

Call objFile.Close

Server.Execute strName

Loop
' ---slut på loopen---

Call obJFS.DeleteFile(Server.MapPath(strName))
Set objFS=Nothing

Call RecSet.Close
Set RecSet=Nothing

MinCon.Close

end if

'Följande if-sats körs bara om ?url är tom i querysting
If not Request.Querystring("url") = "" Then

SQL = "SELECT TOP 1 * From nyheter Where url=" & Request.Querystring("url") &" AND visa = 'nyhet'"
RecSet.Open SQL, MinCon

Do While Not RecSet.EOF
%>

Med det här blir följande fel:

Server.MapPath() error 'ASP 0173 : 80004005'

Invalid Path Character

/db/navigation.asp, line 50

An invalid character was specified in the Path parameter for the MapPath method.

rad 50:

Set objFile=objFS.CreateTextFile(Server.MapPath(strName),True)

tack!

http://www.webforum.nu/showthread.php?s=&threadid=60222 ???

haha, då kom nästa fel när jag tog bort now()

Server object error 'ASP 0228 : 80004005'

Server.Execute Error

/navigation.asp, line 60

The call to Server.Execute failed while loading the page

rad 60:
Server.Execute strName

Jag hjälper en annan kille så jag vet inte ens vad scriptet ska göra, och han verkar inte heller veta det med en så felig kod :e

haha, det var den killen det. ni kan nog radera den här tråden :e