ASP (VBScript)

PHP (v4.3+)

(must be inside "", not '')

Left(), Right(), Mid()

Left("abcdef",3)      result = "abc"
Right("abcdef",2)     result = "ef"
Mid("abcdef",3)       result = "cdef"
Mid("abcdef",2,4)     result = "bcde"

substr()

substr("abcdef",0,3);     result = "abc"
substr("abcdef",-2);      result = "ef"
substr("abcdef",2);       result = "cdef"
substr("abcdef",1,4);     result = "bcde"

Instr(), InstrRev()

x=Instr("abcdef","de")        x=4
x=InstrRev("alabama","a")     x=7

strpos(), strrpos()

$x=strpos("abcdef","de");      x=3
$x=strrpos("alabama","a");     x=6

search,replace)

(search,replace,string exp)

Split()

temp="cows,horses,chickens"
farm=Split(temp,",",-1,1)
x=farm(0)

explode()

$temp="cows,horses,chickens";
$farm=explode(",",$temp);
$x=$farm[0];

if x=100 then
  x=x+5
elseif x<200 then
  x=x+2
else
  x=x+1
end if

if ($x==100) {
  $x=$x+5;
}
else if ($x<200) {
  $x=$x+2;
}
else {
  $x++;
}

for x=0 to 100 step 2
  if x>p then exit for
next

for ($x=0; $x<=100; $x+=2) {    if ($x>$p) {break;}
}

do while x<100    x=x+1    if x>p then exit do
loop

while ($x<100) {    $x++;    if ($x>$p) {break;}
}

select case chartName
  case "TopSales"
    theTitle="Best Sellers"
    theClass="S"
  case "TopSingles"
    theTitle="Singles Chart"
    theClass="S"
  case "TopAlbums"
    theTitle="Album Chart"
    theClass="A"
  case else
    theTitle="Not Found"
end select

switch ($chartName) {
 case "TopSales":
  $theTitle="Best Sellers"; $theClass="S";
  break;
 case "TopSingles":
  $theTitle="Singles Chart"; $theClass="S";
  break;
 case "TopAlbums":
  $theTitle="Album Chart"; $theClass="A";
  break;
 default:
 $theTitle="Not Found";
}

Function myFunction(x)
  myFunction = x*16  'Return value
End Function

function myFunction($x) {
  return $x*16;  //Return value
}

Request.ServerVariables("SERVER_NAME")
Request.ServerVariables("SCRIPT_NAME")
Request.ServerVariables("HTTP_USER_AGENT")
Request.ServerVariables("REMOTE_ADDR")
Request.ServerVariables("HTTP_REFERER")

$_SERVER["HTTP_HOST"];
$_SERVER["PHP_SELF"];
$_SERVER["HTTP_USER_AGENT"];
$_SERVER["REMOTE_ADDR"];
@$_SERVER["HTTP_REFERER"];
@ = ignore errors

Response.CacheControl="no-cache"

s_t=timer 

...ASP script to be timed...

duration=timer-s_t
response.write duration &" seconds"

$s_t=microtime();

...PHP script to be timed...

$duration=microtime_diff($s_t,microtime());
$duration=sprintf("%0.3f",$duration);
echo $duration." seconds";

//required function
function microtime_diff($a,$b) {
  list($a_dec,$a_sec)=explode(" ",$a);
  list($b_dec,$b_sec)=explode(" ",$b);
  return $b_sec-$a_sec+$b_dec-$a_dec;
}

pFile="data.txt"
xPage=fileObj.GetFile(Server.MapPath(pFile))
xSize=xPage.Size  'Get size of file in bytes
xPage=fileObj.
OpenTextFile(Server.MapPath(pFile))
temp=xPage.Read(xSize)  'Read file
linkPage.Close

$pFile="data.txt";
$temp=file_get_contents($pFile);
//Read file

Date = 1/20/2010

format in PHP.

is_numeric()