提示的错误信息为:正在查找的网页可能已被删除、重命名或暂时不可用
代码:<!--#includefile="Connections/conn.asp"--><html><head><metahttp-equiv="Content-Typ...
代码:
<!--#include file="Connections/conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>会员资料修改</title>
<style type="text/css">
<!--
body {
margin-top: 0px;
margin-bottom: 0px;
background-image: url();
background-repeat: no-repeat;
}
.STYLE1 {color: #FF0000}
-->
</style></head>
<body>
<%
set rst=server.CreateObject("adodb.recordset")
on error resume next
id=request.QueryString("id")
if request.QueryString("act")="modify" then
'如果是修改记录
conn.begintrans
'sql="update baidu_records set rDate='" & request.Form("f_riqi") & "',rType='" & request.Form("f_didian") & "',rContent='" & request.Form("f_syhwmx") & "',rType2='" & request.Form("f_yfqk") & "',jine='" & request.Form("f_yfqk") & "',user='" & request.Form("f_user") & "' where id=" & id
'conn.execute sql
rst.open "select * from baidu_records where rId=" & id,conn,1,3
rst("rDate")=request.Form("f_riqi")
rst("rType")=request.Form("f_didian")
rst("rContent")=request.Form("f_syhwmx")
rst("rType2")=request.Form("f_yfqk")
rst("jine")=request.Form("f_yfqk")
rst("user")=request.Form("f_user")
rst.update
rst.close
end if
%>
<td align="left"><input name="f_yfqk" type="text" id="f_yfqk"value="<%=rst("rType2")%>"/></td>
<td align="left"><span class="STYLE1">*</span></td>
</tr>
<tr>
<td align="right">运费金额:</td>
<td align="left"><input name="f_yfje" type="text" id="f_yfje"value="<%=rst("jine")%>"/></td>
<td align="left"><span class="STYLE1">*</span></td>
</tr>
<tr>
<td align="right">经手人:</td>
<td align="left"><input name="f_user" type="text" id="f_user"value="<%=rst("user")%>"/></td>
<td align="left"><span class="STYLE1">*</span></td>
</tr>
<% rst.close %>
<tr>
<td colspan="3" align="center"><input type="submit" name="Submit" value="修改资料" />
<input type="reset" name="Submit2" value="重置表单" /></td>
</tr>
</table>
</form>
</td>
<td> </td>
</tr>
</table></td>
</tr>
</table>
<%
set rst=nothing
conn.close
set conn=nothing
%>
</body>
</html> 展开
<!--#include file="Connections/conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>会员资料修改</title>
<style type="text/css">
<!--
body {
margin-top: 0px;
margin-bottom: 0px;
background-image: url();
background-repeat: no-repeat;
}
.STYLE1 {color: #FF0000}
-->
</style></head>
<body>
<%
set rst=server.CreateObject("adodb.recordset")
on error resume next
id=request.QueryString("id")
if request.QueryString("act")="modify" then
'如果是修改记录
conn.begintrans
'sql="update baidu_records set rDate='" & request.Form("f_riqi") & "',rType='" & request.Form("f_didian") & "',rContent='" & request.Form("f_syhwmx") & "',rType2='" & request.Form("f_yfqk") & "',jine='" & request.Form("f_yfqk") & "',user='" & request.Form("f_user") & "' where id=" & id
'conn.execute sql
rst.open "select * from baidu_records where rId=" & id,conn,1,3
rst("rDate")=request.Form("f_riqi")
rst("rType")=request.Form("f_didian")
rst("rContent")=request.Form("f_syhwmx")
rst("rType2")=request.Form("f_yfqk")
rst("jine")=request.Form("f_yfqk")
rst("user")=request.Form("f_user")
rst.update
rst.close
end if
%>
<td align="left"><input name="f_yfqk" type="text" id="f_yfqk"value="<%=rst("rType2")%>"/></td>
<td align="left"><span class="STYLE1">*</span></td>
</tr>
<tr>
<td align="right">运费金额:</td>
<td align="left"><input name="f_yfje" type="text" id="f_yfje"value="<%=rst("jine")%>"/></td>
<td align="left"><span class="STYLE1">*</span></td>
</tr>
<tr>
<td align="right">经手人:</td>
<td align="left"><input name="f_user" type="text" id="f_user"value="<%=rst("user")%>"/></td>
<td align="left"><span class="STYLE1">*</span></td>
</tr>
<% rst.close %>
<tr>
<td colspan="3" align="center"><input type="submit" name="Submit" value="修改资料" />
<input type="reset" name="Submit2" value="重置表单" /></td>
</tr>
</table>
</form>
</td>
<td> </td>
</tr>
</table></td>
</tr>
</table>
<%
set rst=nothing
conn.close
set conn=nothing
%>
</body>
</html> 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询