Question

Response.Write(cStr(nPage) & "'>" & aTitle & "</a> ")

If Request("DisplayPage") = "" then
CurPage = 1
Else
CurPage = CInt(Request("DisplayPage"))
End if
objRS.AbsolutePage = CurPage
ShowL1 = True : ShowL2 = True : ShowL3 = True : ShowL4 = True
If objRS.PageCount < 2 Then
ShowL1 = False : ShowL2 = False : ShowL3 = False : ShowL4 = False
ELse
Select Case CurPage
Case 1
ShowL1 = False : ShowL2 = False
Case objRS.PageCount
ShowL3 = False : ShowL4 = False
End Select
End If
Sub ShowLink(nPage, aTitle)
Response.Write("<a href='qst06c.asp?DisplayPage=")
Response.Write(cStr(nPage) & "'>" & aTitle & "</a> ")
End Sub

If ShowL1 Then Call ShowLink(1,"第1页")
If ShowL2 Then Call ShowLink(CurPage - 1,"上一页")
If ShowL3 Then Call ShowLink(CurPage + 1,"下一页")
If ShowL4 Then Call ShowLink(objRS.PageCount,"最后一页")
%>
****************
上面语句中Response.Write(cStr(nPage) & "'>" & aTitle & "</a> ")
这句中& "'>"这个的作用是什么？vbs中'单引号的作用是什么？

Answer 1

Response.Write("<a href='qst06c.asp?DisplayPage=")
Response.Write(cStr(nPage) & "'>" & aTitle & "</a> ")
这两行要合起来看的，它就相当于
Response.Write("<a href='qst06c.asp?DisplayPage=" & cStr(nPage) & "'>" & aTitle & "</a> "老袜困)
所以这个单引号就是对应qst06c前面那个单侍念引号的。
比如说nPage=1，aTitle="点我"好缓，那么结果就是
<a href='qst06c.asp?DisplayPage=1'>点我</a>

Answer 2

就是单引号， 为了 构造出 html 代码 格式