主题:  还不行了。。。。。。。。面包哥哥

sky_5d

职务:普通成员
等级:1
金币:0.0
发贴:121
注册:2001/5/17 10:37:42
#12001/7/11 15:32:54
还是不行........救我啊>>>>>>>>>>>>>>>>>>>>
<><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>
代码如下:
<%@LANGUAGE="VBSCRIPT"%>

<%
if(REQUEST.servervariables("remote_addr") <> "") then Command1__ipp = REQUEST.servervariables("remote_addr")

%>
<%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_twh_STRING
Recordset1.Source = "SELECT * FROM ip"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open()
Recordset1_numRows = 0
%>
<%

set Command1 = Server.CreateObject("ADODB.Command")
Command1.ActiveConnection = MM_twh_STRING
Command1.CommandText = "INSERT INTO ip (ip) valueS ("&" + Replace(Command1__ipp, "'", "''") + "&") "
Command1.CommandType = 1
Command1.CommandTimeout = 0
Command1.Prepared = true
Command1.Execute()

%>
<%IPP=REQUEST.servervariables("remote_addr")%>


twh.com.cn








因为本站的产品图片多,所以浏览时可能会慢一点,不足之处敬请原谅...:::thw.com.cn:::...




<%
Recordset1.Close()
%>

<><><><><><><><><><><><><><><><><><><><><><><><><><>
运行时就会出现...
Microsoft JET Database Engine 错误 '80040e14'

语法错误 (操作符丢失) 在查询表达式 '+ Replace(Command1__ipp,' 中。

/web/web-file/yes.asp,行26
...............
救我............
.............
<><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>


我需要力量