Oversæt fra ASP

Er der nogle der kode i både ASP og PHP..??

Har følgende jeg skal prøve at have oversat til PHP:

<%
Dim rsRitzauCI

Set rsRitzauCI = Server.CreateObject("RitzauCI.Recordset")
rsRitzauCI.Openconnection ("10.130.32.28")
rsRitzauCI.HentKategoriRul Request.QueryString("Cat"), 29, ""

Do While Not rsRitzauCI.EOF
If NOT rsRitzauCI.Item("Headline")="" Then
    response.write ("<a class=""pling"" Target=""midle"" href=""visnyhed.asp?ID=" & rsRitzauCI.Item("ID") & """>" & rsRitzauCI.Item("TIME") & " " & rsRitzauCI.Item("HEADLINE") & "</a><br><br>")
End if

    rsRitzauCI.MoveNext
Loop
%>