asp教程 查詢指定id記錄進行修改
<%
Dim Id,Sql,Url
Id=Html_Encode(Request.QueryString("id"))
If id="" Then
Response.Write("數據傳輸過程被修改過了,服務器拒絕操作.")
Response.End
ElseIf Not IsNumeric(Id) Then
Response.Write("數據傳輸過程被修改過了,服務器拒絕操作.")
Response.End
Else
Call Hit(id)
Url=Request.ServerVariables("Script_Name")
Sql="Select * from young Where id="&Id
On Error Resume Next
Call OpenDb
Set Rs=Conn.Execute(Sql)
If Not Rs.eof Then
Did=Rs(0)
Pid=Rs(1)
Cid=Replace(Replace(Rs(2),"Script",""),"<","")
%>
原理很簡單,現在我們把獲取id的值哦。