📄 empmain_cp_info.asp

📁 好用的管理,代码程序好用的管理,代码程序

💻 ASP

字号:

<!--#include file="Connections/EmpMain.asp" -->
<!--#include file="EmpMain_CheckRight.asp"-->
<%
	selname="产品"
	Set SCode = Server.CreateObject("ADODB.Recordset")
		SCode.ActiveConnection = MM_EmpMain_STRING
		SCode.Source = "SELECT * FROM T_Class where  F_SelectName = '"& selName &"'" 
		SCode.CursorLocation = 2
		SCode.LockType = 1
		SCode.Open()
	dim  diqustr,astr
	diqustr=SCode("F_OptionContent")
	if diqustr="" then
		response.write("无法读取数据")
		response.End()
	else
		astr=split(diqustr,"，")
	end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>产品</title>
<link rel="stylesheet" href="CSS/SellWellWeb.css" type="text/css">
</head>
<SCRIPT language=Javascript>
<!-- hide
function fsected(obj) {
  if   (window.dialogArguments.document.myform.cp.value==""){
			  window.dialogArguments.document.myform.cp.value=obj.value;
		  }else{
		 
		   var str="，"
          
		  window.dialogArguments.document.myform.cp.value+=str+obj.value;
		  }
         
		}
function dook(){
window.close();
}
function doreset(){
window.dialogArguments.document.myform.cp.value=""
}
function insertsmilie(smilieface){
	document.myform.cp.value=smilieface;
	window.close()	
}


// -->
</SCRIPT>
<body bgcolor="#EAF4FF" class="body">  <form name=chinwxt>
<table border="1" width="100%" cellspacing="1" bordercolordark="#999999" bordercolor="#666666">
 
  <tr> <%  k=0
	      for i=0 to ubound(astr)
		  if request("id")="" then
		  strch="" 
		  else
		  if instr(userdq,astr(i))>0 then
		   strch="checked"
		   else
		  strch=""
		  end if
		  end if 
		  k=k+1%>
      <td ><font size="2"> 
        <p align="left"> 
          <input type="checkbox" name="namecheck" <%=strch%> value="<%=astr(i)%>" onclick="fsected(this)" >
          <%=astr(i)%></font></td>
	  <%
	  if k mod 3= 0 then%>
  </tr>
  <tr> 
  <% end if
next
%>
  </tr>

</table>
<center><button name="ok" onClick="dook()">确定</button> <button name="reset" onClick="doreset()">重配</button></center>
</form>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -