文件名称：网上购书系统SQL和ASP做的
文件大小：552B
文件格式：HTM
更新时间：2012-01-02 06:53:25
购书 用于课程设计和毕业设计 %@ LANGUAGE="VBScript" %>
| " & _ "" & objRS("btitle") & _ " | |||||||||||||||||||||
" & _
"
| " & _
"
| ||||||||||||||||||||
网上购书系统SQL和ASP做的
【文件属性】：
文件名称：网上购书系统SQL和ASP做的
文件大小：552B
文件格式：HTM
更新时间：2012-01-02 06:53:25
购书 用于课程设计和毕业设计 %@ LANGUAGE="VBScript" %>我的网络书店
<%
If Request("ISBN") <> "" Then
' 注释：生成SQL查询语句
mysql = "SELECT a.ISBN, a.title AS btitle, a.author, a.ptime, a.porder, " & _
"a.format, a.psize, a.pages, a.words, a.cdrom, a.price, " & _
"a.content, b.title AS ptitle " & _
"FROM book AS a JOIN Publisher AS b " & _
"ON PATINDEX('%-' + b.id + '-%',a.ISBN) > 0 " & _
"WHERE a.ISBN = '" & Request("ISBN") & "'"
' 注释：连接数据库并执行SQL语句
Set objRS = Session("objRS")
objRS.Source = mysql
objRS.Open
' 注释：显示相关结果
If objRS.RecordCount > 0 Then
price = CSng(objRS("price"))
outstr = _
"" & _
"
文件名称：网上购书系统SQL和ASP做的
文件大小：552B
文件格式：HTM
更新时间：2012-01-02 06:53:25
购书 用于课程设计和毕业设计 %@ LANGUAGE="VBScript" %>