webForumDet fria alternativet

översättning från php

ASP

1 svar · 305 visningar · startad av tronez

Medlem sedan juli 2001728 inlägg
Frågan#1

Hej!

Skulle behöva ha lite hjälp med att översätta en snutt kod skriven i PHP till ASP.

$dir = '../filter/';

	$handle = opendir($dir);
	$i = 0;

	echo "new Array(\n";
	$local = array();
	
	while( $kh = readdir($handle) ){		
		if($kh == "." || $kh == ".."){} else { $local[] = $kh; }
	}
	
	$file = count($local);
	
	foreach ($local as $out) {
		
		if($i != ($file-1)){
			echo "\"../filter/$out\",\n";
		} else {
			echo "\"../filter/$out\"\n";	
		}
		$i++;
	}
	closedir($handle);

	echo ")\n );";

Vad den gör är helt enkelt att den letar igenom en mapp efter ett par filer och lägger det i en javascript array.

Tacksam för all hjälp jag kan få, då jag inte kan ett dyft om asp's syntax.

Medlem sedan jan. 20022 440 inlägg
#2

Jag kan ingen php alls... men jag gor ett forsok!! Jag kan ju lite om asp iaf.

<%
Dim objFS
Dim cmdFO
Dim i

Set objFS = Server.CreateObject("Scripting.FileSystemObject")
Set cmdFO = objFS.GetFolder( Server.MapPath( "\..\filter" ) )

for each i in cmdFO.Files
	Response.Write(i.Name & "<br />")
next
%>

Det är ju i alla fall en början, vad allt detta gör är att skriva ut alla filer till webläsaren med en radbrytning.

259 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
126 ms — deklarationer (db)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)
127 ms — ändringar (db)