%@ Language=VBScript %> <% rem on error resume next dim mySQL, connTemp, rsTemp dim pItem_Number, pItem_Name, pItem_Amount dim addCartStr,viewCartStr pItem_Number = request.querystring("pid") call opendb() mySQL = "SELECT * from sfProducts where prodID =" + "'" + pItem_Number + "'" Set rsTemp = Server.CreateObject("ADODB.Recordset") rsTemp.Open mySQL, Conntemp, adOpenStatic, adLockReadOnly, adCmdText rsTemp.movefirst pItem_Name = rsTemp("prodName") pItem_Amount = rsTemp("prodPrice") %>
mySql = <%=mySQL%>