〖文章分类:电脑·手机·网络 / 网站设计·开发·优化〗〖阅读选项〗 |
********************
检测是否外部提交数据过程
********************
Public Sub Chk_Post()
Dim Server_V1,Server_V2
Server_V1=Cstr(Request.ServerVariables("HTTP_REFERER"))
Server_V2=Cstr(Request.ServerVariables("SERVER_NAME"))
If Mid(Server_V1,8,Len(Server_V2))<>Server_V2 Then
SysMsg=Language("Public",8)
Call ShowMsg("Back","")
End If
End Sub
|
文章作者:未知 更新日期:2006-05-13 |
〖文章浏览:〗〖发送文章〗〖打印文章〗 |
|
|