📄 setting_functioncheck.asp

📁 mlm双轨制直销系统V8.0免费版可用于： 1、直拨、回拨电话卡公司。 2、保健品、药品公司。 3、在线销售商品等等。 4、其他类型用到双轨制模式的线上开盘公司。

💻 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_Function"
rs.open sql,conn,1,1 
while not rs.eof
	FieldText=request("name_"+rs("FuncName"))
	FuncCheck=request("value_"+rs("FuncName"))
	if len(FuncCheck)>0 then
		FuncCheck=1
	else
		FuncCheck=0
	end if
		strsql ="update Setting_Function set  IsDisplay= "& FuncCheck &" where FuncName='" & rs("FuncName") &"'"
		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>
-------------------------更新参数中...............<br>
<br>------------------------<font color=red>参数更新成功!</font><br>
<script language="javascript">
	window.location.href="Setting_Function.asp"
	window.parent.frames(0).location.reload();
</script>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -