I am getting the following error."Unterminated string constant" It shows the error hapending at:
alert('<%=bid
----------------^
Does anyone have a clue, i have tried just about everything.
I am just trying to alert the Request.QueryString("q").
alert('<%=bid
----------------^
Does anyone have a clue, i have tried just about everything.
I am just trying to alert the Request.QueryString("q").
Code:
<%
Dim bid
bid = Request.QueryString("q")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/_database/BuckleyAssc.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT COMPANY, ADDRESS, CITY, STATE, ZIP FROM BILL WHERE BILLID = '" & Request.QueryString("q") &"'"
rs.Open sql, conn
response.write("<table>")
do until rs.EOF
for each x in rs.Fields
response.write("<tr><td style=""FONT-SIZE: 10px; padding-left: 60px; FONT-FAMILY: Tahoma"">" & x.value & "</td></tr>")
next
rs.MoveNext
loop
response.write("<tr><td style=""FONT-SIZE: 10px; padding-left: 60px; FONT-FAMILY: Tahoma""><input name="""" type=""button"" onClick=""alert('<%=bid%>')"" value=""Delete"" /></td></tr>")
response.write("</table>")
%>