求助帮我把一段简单的PHP代码转换成ASP的

<?php
if($_SERVER['HTTP_REFERER']!=''){
  @header("Content-type:image/jpeg");
  echo file_get_contents("xlight.jpg");
}
else{
  @header("location:http://www.baidu.com");
}

?>



求助朋友 希望指教 !!!谢谢

---

例子VBScript code:
<%
Dim a, reg
[color=#FF0000]a = Request.ServerVariables("HTTP_REFERER").Item[/color]
Set reg = New RegExp
reg.Pattern = "^http://(?:[^.]*\.)?(?:google\.com|google\.cn|baidu\.com)(/|$)"
reg.IgnoreCase = True

If Not reg.Test(a) Then
Set reg = Nothing
Response.Status = "404 File Not Found."
Response.End
End If
Set reg = Nothing

' .... 继续
%>

---

Request.ServerVariables("HTTP_REFERER").Item