View Single Post
Old 09-17-2012, 11:57 PM   PM User | #6
dalezjc
New Coder

 
Join Date: Jun 2006
Posts: 17
Thanks: 0
Thanked 0 Times in 0 Posts
dalezjc is an unknown quantity at this point
So here's the code that I used to test that I'm pulling kpname:

Code:
<%
Response.Buffer = false
Dim kpname, parenteventid
Function ChkString(string)
If string = "" Then string = " "
ChkString = Replace(string, "'", "'")
End Function

kpname = ChkString(Request.QueryString("kpname"))
parenteventid = ChkString(Request.QueryString("parenteventid"))
set Conn=Server.CreateObject("ADODB.Connection")
set rsqdb = server.CreateObject("ADODB.Recordset")
Conn.open "Provider=sqloledb;Server=server;Initial Catalog=qdb;UID=;PWD=;"
%>

<html>
<table border>
<%
mysql = "SELECT ParentEventID, KPname " _
& " FROM event " _
& " where parenteventid = '" & Request.QueryString("parenteventid") &"' "
Set RS = conn.execute (mysql)
Do Until RS.EOF
%>

<tr>
<td><b>Name:</b> <%=RS("kpname")%><%=RS("parenteventid")%><br>
</tr>

<%
RS.MoveNext
Loop
RS.Close
%>
</table>

And it worked just fine. What else am I missing? I just replaced the HTML code with the call to the executable.

Thanks!
Dale
dalezjc is offline   Reply With Quote