⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 edit_product.asp

📁 不错的ASP整站源代码。在IIS环境下运行都没有问题
💻 ASP
字号:
<!--#include file="../checkuser.asp" -->  
<!--#include file="../../include/db_conn.asp" -->
<!--#include file="../../include/pub_func.asp" -->  
<%
 m_ver = Trim(request("ver"))
 if m_ver="cn" then 
  tmpstr_t="[中文版]"
 elseif  m_ver="en"  then 
 tmpstr_t="[英文版]"
 else
 response.write "错误访问页面,请重试" 
 response.end    
 End If
%>

<%
set myrs = server.CreateObject("ADODB.RECORDSET")
productlist= trim(Request("productlist"))
catalogid=request("catalogid")
m_page=request("m_page")

   sqlstr= "SELECT ID,ProductName,catalogid,SmallPhoto,BigPhoto,"
   sqlstr=sqlstr& "Field1,Field2,Field3,Field4,Content,orderid,ifhot FROM ys_product "
   sqlstr=sqlstr& "WHERE id in (" &productList& ") ORDER BY ID desc"
   myrs.Open sqlstr,conn,1,1
    if myrs.RecordCount>1 then          
                  myrs.PageSize=1  
                  total_page=myrs.PageCount
                  total_red=myrs.RecordCount 
                  current_page=Request("m_page")
                  if current_page="" then  
	                 current_page=1
                  elseif not isnumeric(current_page) then
                      current_page=1
                  else
                      current_page=cint(current_page)
                  end if

                  if current_page>total_page then 
                      current_page=total_page
                  elseif current_page<1 then
                      current_page=1
                  end if
                  
                  session("current_edit_page")=current_page   ''写入修改返回时的当前页
                  
                  myrs.AbsolutePage=current_page  
       end if

%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>产品修改</title>
<script language="javascript">
function f_Enable(objCheck,objText)
{
	if(objCheck.checked==true)
	{
		if (objText.name =="txtSaleExpire")
		{	
			document.all.t_sale.style.display ="";
		}
		objText.disabled = false;
		objText.focus();
	}else
	{
		objText.value = "";
		objText.disabled = true;
		if (objText.name =="txtSaleExpire")
		{	
			document.all.t_sale.style.display ="none";
		}
	}

}



function checkform(nForm){

	if(nForm.txtProductName.value=="")
	{
		alert("请输入产品名称!");
		nForm.txtProductName.focus();
		return false;
	}
	if ( nForm.selCatalog.value=="0")
	{
		alert("请选择产品类别!");
		nForm.selCatalog.focus();
		return false;
	}
	if (nForm.txtCommExpire.value!="")
	{
		if(!is_integer(nForm.txtCommExpire.value))
		{
			alert("请在特殊标记有效期栏内填入正整数或置空!");
			nForm.txtCommExpire.focus();
			return false;
		}
	}
	if (nForm.txtSaleExpire.value!="")
	{
		if(!is_integer(nForm.txtSaleExpire.value))
		{
			alert("请在特殊标记有效期栏内填入正整数或置空!");
			nForm.txtSaleExpire.focus();
			return false;
		}
	}
	
	return true;
}
function is_integer(str)
{

  var checkOK = "0123456789";
  var checkStr = str;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  
  if(str==""){
  return false;
  }
  
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
  }
  if (!allValid)
  {  
    return (false);
  }

  return (true);
}
function f_BackToList(){
	document.frm_main.action="list.asp";
	document.frm_main.submit();
}

function showimg(picname){
  window.open("showimg.asp?pic_name="+picname,"mypic","toolbar=no, menubar=no, scrollbars=no, resizable=no,location=no, status=no,width=20,height=20,top=100,left=180'");

}
</script>
<link href="../include/styles.css" rel="stylesheet" type="text/css">
</head>
<body>
<div align="center"><img src="../images/Snapproduct.jpg" width="587" height="684"></div>
</body>
</html>
<%call closedb%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -