SSI med asp

Två saker.

1. ASP (eller rättare sagt IIS) stöder inte alla SSI-kommandon. Det är Include och något mer om jag inte missminner mig.

2. SSI exekveras innan ASP-motorn gör sitt, dvs variabler du sätter i koden har inte hunnit få värden när du kör SSI.

Mvh,

------------------
All your base are belong to me.

Finns det nåt sätt att lösa detta på?

Kör med PatrikB's Zpagin II script

[Redigerat av cHeMiCaL-X den 22 okt 2001]

<% 
Set fso = CreateObject("Scripting.FileSystemObject")
Set fil = fso.GetFile(strUrl)
storlek = fil.size
%>

------------------
essentitia preter non sans multiplicandum

Då skall alltså koden se ut så här?:

For I = intStartID To ((intStartID + intPageSize) -1)
	
		intId = arrRecords(0,I)
		strProname = arrRecords(1,I)
		strType = arrRecords(2,I)
		strUname = arrRecords(3,I)
		strServer = arrRecords(4,I)
		strType2 = arrRecords(5,I)
		strUrl = arrRecords(6,I)
		
		
Set fso = CreateObject("Scripting.FileSystemObject")
Set fil = fso.GetFile(strUrl)
storlek = fil.size
		
		Response.Write " <table width='100%'><tr><td width='33%'><font face='Verdana' Size='1'><a href='" & strUrl & "' target='_blank'>" & strProname & "</a></font></td><td width='18%'><font face='Verdana' Size='1'>" & strType & "size:" & storlek & "</font></td><td width='19%'><font face='Verdana' Size='1'>" & strType2 & "</font></td><td width='14%'><font face='Verdana' Size='1'>" & strServer & "</font></td><td width='16%'><font face='Verdana' Size='1'>"&strUploader&"</font></td></tr></table>"

Sidan står bara och laddar när jag kör med ovanstående exempel

Hmm, det kanske blir problem om man anger något filnamn som är felaktigt

Set fso = CreateObject("Scripting.FileSystemObject")
if fso.fileExists(strurl) then
   Set fil = fso.GetFile(strUrl)
   storlek = fil.size
else
   storlek = 0
end if

hur anger du filnamnet? Absolut eller relativt?

------------------
essentitia preter non sans multiplicandum

Hmm, det kanske blir problem om man anger något filnamn som är felaktigt

hmm
i databasen är url'n formaterad sp här: /bypath/Cd-Covers/bild.jpg

Set fso = CreateObject("Scripting.FileSystemObject")
if fso.fileExists(server.mappath(strurl)) then
Set fil = fso.GetFile(server.mappath(strUrl))
storlek = fil.size
else
storlek = 0
end if

så blir det realtivt din applikationsroot.

------------------
essentitia preter non sans multiplicandum

Tror jag skiter i det här tills jag kan mer om asp..

Scriptet verkar ha en tendens att göra så att IIS hänger sig och sedan får jag starta om datorn...

Men tack för hjälpen, jag är skyldig dig många tack för all annan hjälp jag har fått av dig LarsG

tack vare tigger hjälp kan jag nu också köra filesystemobject på min IIS.

Men hur gör jag för att formatera storleken i kilobyte?

En kilobyte är ju 1024 bytes. Så det borde inte vara svårare än att dela filstorleken och göra till ett heltal.

storlek = clng(storlek/1024)

Mvh,

------------------
All your base are belong to me.

det har jag också tänkt på.. ( delat med 1024 ) men jag visste ite hur jag skulle ställa upp det...

Tack!