WordPress asp issue
-
Hi., I have used one asp page in my wordpress pages.
I created one new page and i inserted one asp page by using<iframe id=”I1″ name=”I1″ src=”https://www.example.org/Directory/results.asp” frameborder=”0″ scrolling=”no” width=”900″ height=”20000″></iframe>
But the problem is the functionality what we have used in results.asp page is not working on wordpress page.
The functionality is anchor click,if we click on specific topic it will go to that point in the page.code we used in asp page
<body>
<%
Const adCmdTable = 2
Dim accessdb
Dim strconn
accessdb=server.mappath(“Members.mdb”)
strconn=”PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=”
strconn=strconn & accessDB & “;”
‘strconn=strconn & “USER ID=;PASSWORD=;”Dim strSQL0
strSQL0 = “Select * FROM Members Order By Category, CompanyName”
Dim objRS0
Set objRS0 = Server.CreateObject(“ADODB.Recordset”)
objRS0.Open strSQL0, strconn
DIM CatCount
CatCount=0
Response.Write “<p class=’style2′>| “
Do While Not objRS0.EOF
IF objRS0(“Category”) <> LastCategory THEN
CatCount=CatCount + 1
Response.Write “” & objRS0(“Category”) & “ | “
LastCategory = objRS0(“Category”)
END IF
objRS0.MoveNext
Loop
Response.Write “</p>”
objRS0.Close
Set objRS0 = Nothing
%>
<table style=”width: 100%” cellpadding=”12″ cellspacing=”0″ class=”style3″>
<tr>
<%
n12=2
Dim strSQL
Dim nParams
nParams = 0
strSQL = “Select * FROM Members Order By Category, CompanyName”
Dim objRS
Set objRS = Server.CreateObject(“ADODB.Recordset”)
objRS.Open strSQL, strconn
DIM RecordCount
Do While Not objRS.EOF
IF objRS(“Category”) <> LastCategory THEN
IF n12=2 THEN
Response.Write “</td></tr><tr><td valign=’top’ style=’width: 50%’>
“
ELSE
Response.Write “<td valign=’top’ style=’width: 50%’>
“
END IF
Response.Write “<p class=’style2′>” & objRS(“Category”) & “</p></td><td></td>”
n12=2
LastCategory = objRS(“Category”)
END IF
IF n12=2 THEN
Response.Write “</tr><tr>”
n12=0
END IF
Response.Write “<td valign=’top’ style=’width: 50%’><p class=’style1′>”
IF objRS(“LogoUpload”) <> “” THEN
Response.Write “ ” & “<img src=’https://www.ddifo.org/mdlogos/” & objRS(“LogoUpload”) & “‘ style=’float: right’ border=’none’ />“
END IF
Response.Write “<b>” & objRS(“CompanyName”) & “</b>
“
Response.Write objRS(“ContactFirstName”) & ” ” & objRS(“ContactLastName”) & “
“
Response.Write objRS(“Address”) & “
“
Response.Write objRS(“City”) & “, ” & objRS(“State”) & ” ” & objRS(“Zip”) & “
“
Response.Write objRS(“Phone”) & “
“
Response.Write “” & objRS(“EmailAddress”) & “
“
Response.Write “” & objRS(“WebAddress”) & “</p></td>”
n12=n12+1
objRS.MoveNext
Loop
IF n12=2 THEN
Response.Write “</tr><tr>”
n12=0
END IF
objRS.Close
Set objRS = Nothing
%>
</table>
</body>
- The topic ‘WordPress asp issue’ is closed to new replies.