?? softcount.asp
字號:
<!--#include file="../inc/HeadDH.asp" -->
<!--#include file="../inc/oConn.asp" -->
<%
Dim SoftID
SoftID = Request.QueryString("SoftID")
Call UpdateCount(SoftID)
Call SoftCount(SoftID)
Sub SoftCount(SoftID)
On Error Resume Next
Dim DownCount
DownCount = oConn.Execute("Select SoftCount From SoftInfo Where SoftID="&SoftID&"")(0)
Response.Write "document.write('"&DownCount&" 次');"
If Err Then
Err.Clear
End If
End Sub
Sub UpdateCount(SoftID)
On Error Resume Next
oConn.Execute("Update SoftInfo Set SoftCount=SoftCount+1 Where SoftID="&SoftID&"")
If Err Then
Err.Clear
End If
End Sub
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -