<%
dhhm=request.Form("dhhm") gh=request.Form("gh") pwd=request.Form("pwd") sgr=request.Form("sgr") memo01=request.Form("memo") timehd=date()+time()
dhhm=Replace( dhhm, "'", "''" ) gh=Replace( gh, "'", "''" ) pwd=Replace( pwd, "'", "''" ) memo01=Replace( memo01, "'", "''" )
set conn=server.createobject("adodb.connection") conn.Open"Driver={SQL Server};Server=192.168.10.3;UID=honrry;PWD=88888888;"& _ "database=sdsdsd;"
set rs=conn.execute("select * from username where " & "gh = '" _ & gh & "' and " & "Pwd = '" & pwd & "'") if RS.EOF then response.write("工号或密码错！ <a href=javascript:history.back()> 返回</a>") rs.close else conn.execute "update [index] set " _ & "timehd='" & timehd & "', " _ & "memo01='" & memo01 & "', " _ & "hdr='" & gh & "', " _ & "sgr='" & sgr & "' " _ & " Where dhhm='" & dhhm &"'" Conn.Close end if response.write("恭喜！<a href=index.asp> 查看</a>")
%>
无语法错，但就是UPDATE不了INDEX表，请各位高手看看？？（时间太紧了，帮帮忙。）
