?? setting_fieldcheck.asp
字號:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!-- #include file="include/adovbs.inc" -->
<!--#include file="include/dataconn.asp" -->
<!-- #include file="include/checksession.asp" -->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from Setting_Field where IsCanBeConfig=1"
rs.open sql,conn,1,1
while not rs.eof
MyFieldText=request("name_"+rs("FieldName"))
FuncCheck=request("value_"+rs("FieldName"))
if len(FuncCheck)>0 then
FuncCheck=1
else
FuncCheck=0
end if
strsql ="update Setting_Field set MyFieldText='" & MyFieldText &"' ,FieldIsDisplay= "& FuncCheck &" where FieldName='" & rs("FieldName") &"'"
set rstemp=server.createobject("adodb.recordset")
rstemp.open strsql,conn
set rstemp=nothing
rs.movenext
wend
%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<link rel="stylesheet" href="include/e1.css" type="text/css">
</HEAD>
<BODY>
-------------------------更新參數(shù)中...............<br>
<br>------------------------<font color=red>參數(shù)更新成功!</font><br>
<script language="javascript">
window.location.href="Setting_Field.asp"
window.parent.frames(0).location.reload();
</script>
</BODY>
</HTML>?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -