Traducir código ASP a PHP

[allhen]

Algun tigre , experto , un genio , un dotado q se anime a pasarme este codigo a php !!!


se lo agradecere !!!

<%
alphaxx = request.querystring("letter")
//alphaxx = left(alphaxx,1)
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("artistasenallhen.mdb"))
set rs=createobject("ADODB.Recordset")
select case alphaxx
case "a"
sqltxt="SELECT * From Tabla1 WHERE artista Like 'a%' order by artista"
case "b"
sqltxt="SELECT * From Tabla1 WHERE artista Like 'b%' order by artista"
case "p"
sqltxt="SELECT * From Tabla1 WHERE artista Like 'p%' order by artista"
case "all"
sqltxt="SELECT * From Tabla1 order by artista"
end select
rs.open sqltxt,conn
Do while not rs.EOF
var1 = rs.fields("id")
var2 = rs.fields("artista")
response.write ("&lt;%var1 = """&var1&""" //"&var2&" %&gt;<br>" &vbCrlf)
response.write ("&lt;!--#include file=""www.asp""--&gt;<br>" &vbCrlf)

%>

<%
rs.MoveNext
Loop
rs.close
%>