Преобразование функций ASP в PHP - PullRequest
Новая
       22

Преобразование функций ASP в PHP

0 голосов
/ 02 февраля 2012

Я пытаюсь перевести или преобразовать эти функции из файла .asp в функции .php, так как я пока не знаком с .asp.Некоторые из них я распознаю и могу понять, такие как команды SQL и заполнители, куда будут отправляться данные из удаленной таблицы, а остальные запутали меня.Я уже конвертировал некоторые из них, такие как include, который, я считаю, эквивалентен PHP include '';функции и несколько других.Может ли кто-то с рабочим знанием обоих языков показать мне, какие функции идут куда? 

<!--#include virtual="/includes/functions.asp" -->
<%
intBusiness_Catagory = Request("select_catagory")

Set thisConn    = Server.CreateObject("ADODB.Connection")
thisConn.Open CreateAfccDSN()


SelectSQL   = "SELECT * FROM BusinessInfo WHERE ((CatID = " & intBusiness_Catagory & ") or (CatID2 = " & intBusiness_Catagory & ") or (CatID3 = " & intBusiness_Catagory & ")) and (intStatusCodeID = 1) and (intOnWeb = 1) Order By vcBusinessName"
Set SelectRs = thisConn.Execute(SelectSQL)

If SelectRs.EOF Then
    Response.Write("No members found for selected category.<br> Please search <a href='javascript:history.back()'>again</a>.")
Else
%>
<b>Member Search Results:</b>
<p>

<%
End If

    If Not SelectRs.BOF AND Not SelectRs.EOF then
        SelectRs.MoveFirst
        Do Until SelectRs.EOF
%>
            <b><%=SelectRs("vcBusinessName") %></b><br>
            <%=SelectRs("vcPhone") %><br>
            <%=SelectRs("vcPAddress") %><br>
            <%=SelectRs("vcPCity") %>, <%=SelectRs("vcPState") %>&nbsp;&nbsp;<%=SelectRs("vcPZipCode") %><br>
            <%
            If isNull(SelectRs("vcURL")) then

            Else
            %>
                <b>Website: </b><a href="http://<%=SelectRs("vcURL") %>" target="_blank"><%=SelectRs("vcURL") %></a>
            <%
            End If
            %>
            <p>
            <hr>
<%
            SelectRs.MoveNext
        Loop
%>

<%
    End If

SelectRs.Close
Set SelectRs = Nothing
%>

1 Ответ

0 голосов
/ 03 февраля 2012

Этот скрипт открывает базу данных, делает запрос и выплевывает значения из полученных записей. Не все здесь имеет PHP-эквивалент 1: 1.

Set thisConn = Server.CreateObject - это создает объект подключения к базе данных

thisConn.Open CreateAfccDSN() - открывает соединение с базой данных, используя значения, переданные обратно из функции CreateAfccDSN (), которая здесь не показана.

intBusiness_Catagory = Request("select_catagory") - принимает параметр формы / URL с именем select_catagory и присваивает его локальной переменной intBusiness_Catagory

...