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

📄 xinximemo.asp

📁 二手程序,可是实现会员的等级功能管理,会员可以有上船图片,给信息标题加颜色功能!
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="conn.asp"-->

<%
dim rs,sql,ijob,ThisPage
ijob=request("ijob")
if request("page")="" then
  ThisPage=1		
else
  ThisPage=request("page")
end if
function HTMLEncode(fString)
if not isnull(fString) then
    fString = replace(fString, ">", "&gt;")
    fString = replace(fString, "<", "&lt;")
    fString = Replace(fString, CHR(32), "&nbsp;")
    fString = Replace(fString, CHR(9), "&nbsp;")
    fString = Replace(fString, CHR(34), "&quot;")
    fString = Replace(fString, CHR(39), "&#39;")
    fString = Replace(fString, CHR(13), "")
    fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
    fString = Replace(fString, CHR(10), "<BR> ")
    HTMLEncode = fString
end if
end function
%>
<script language="JavaScript">
function DrawImage(ImgD){
   var image=new Image();
   image.src=ImgD.src;
   if(image.width>0 && image.height>0){
    flag=true;
    if(image.width/image.height>= 120/80){
     if(image.width>120){  
     ImgD.width=80;
     ImgD.height=(image.height*80)/image.width;
     }else{
     ImgD.width=image.width;  
     ImgD.height=image.height;
     }

     }
    else{
     if(image.height>80){  
     ImgD.height=80;
     ImgD.width=(image.width*80)/image.height;     
     }else{
     ImgD.width=image.width;  
     ImgD.height=image.height;
     }

     }
    }
   /*else{
    ImgD.src="";
    ImgD.alt=""
    }*/
   }
</script>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=title%>信息内容</title>
<link rel="stylesheet" type="text/css" href="1.CSS">
</head>
<SCRIPT language=javascript>
<!--
function CheckForm()
{
if(document.thisForm.username.value.length<1)
	{
	    alert("用户名不能为空!");
	    return false;
	}
	if(document.thisForm.password.value.length<1)
	{
	    alert("密码不能为空!");
	    return false;
	}
}

//-->
</SCRIPT>
<body topmargin="0">
<div align="center">
<!--#include file=top.asp-->
</div>
<table cellSpacing="0" cellPadding="0" width="726" align="center" bgColor="#ffffff" border="0" height="410">
  <tr>
    <td height="331">
    <table cellSpacing="0" cellPadding="0" width="779" border="0" height="406">
      <tr>
        <td vAlign="top" width="174" height="406">
        <table cellSpacing="0" cellPadding="0" width="100%" border="0">
          <tr>
            <td> </td>
          </tr>
          <!--buyer-->
          <tr>
            <td>
            <div align="left">
              <table class="font_10_e_blue" cellSpacing="0" cellPadding="0" width="100" background="img/login_r3_c1.gif" border="0" style="border-collapse: collapse" bordercolor="#111111">
                <tr>
              <td vAlign="top" width="173">
              <img border="0" src="img/mail_login_r1_c1.gif"></td>
                </tr>
                <tr>
              <td vAlign="top" background="img/mail_login_r3_c1.gif" width="173">
              <table class="font_10_e_black" cellSpacing="0" cellPadding="3" width="98%" align="center" border="0">
                <!---------------------->
                <form id="f1" name="thisForm" action="Loginchk.asp" method="POST">
                  <tr>
                    <td width="48%">
                    <p align="center">&nbsp;登陆帐号:</td>
                    <td width="52%">
                    <input class="form_e_10_black" id="username2" maxLength="20" size="10" name="username"></td>
                  </tr>
                  <tr>
                    <td>
                    <p align="center">&nbsp;登陆密码:</td>
                    <td>
                    <input class="form_e_10_black" id="password2" type="password" maxLength="32" size="10" value name="password"></td>
                  </tr>
                  <tr>
                    <td> </td>
                    <td>
                    <input onclick="javascript:return CheckForm();" type="image" src="img/mail_login_r5_c2.gif" border="0" name="I3">
                    </td>
                  </tr>
                </form>
              </table>
              </td>
                </tr>
                <tr>
              <td vAlign="top" width="173">
              <img alt src="img/mail_login_r7_c1.gif" border="0" name="mail_login_r7_c1"></td>
                </tr>
              </table>
            </div>
            </td>
          </tr>
          <tr>
            <td> </td>
          </tr>
          <tr>
            <td>
            <img border="0" src="img/title_contact_sub.gif" width="167" height="100"></td>
          </tr>
        </table>
        </td>
        <td vAlign="top" width="605" height="406">
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
<%
set rs=server.createobject("adodb.recordset")
sql = "select * from xinxi where id="&cstr(ijob)
rs.open sql,conn,1,3
if rs.eof then
response.write "参数错误或该记录已经删除!"
response.end
end if
rs("llcs")=rs("llcs")+1
rs.update
%>
          <tr>
            <td width="14%" height="24" colspan="2"> </td>
            <td width="2%" height="24"> </td>
            <td width="82%" height="24" style="border-bottom-style: solid; border-bottom-width: 1" bordercolor="#E1E2DC"> </td>
            <td width="2%" height="24"> </td>
          </tr>
          <tr>
            <td width="3%" height="24" align="right" style="border-bottom-style: solid; border-bottom-width: 1" bgcolor="#EFEFEF" bordercolor="#D2D2D2">
      <img border="0" src="img/Nav_Icon.gif"> </td>
            <td width="11%" height="24" align="right" style="border-bottom-style: solid; border-bottom-width: 1" bgcolor="#EFEFEF" bordercolor="#D2D2D2">
      信息标题:</td>
            <td width="2%" height="24" style="border-right-style: none; border-right-width: medium; border-bottom-style:solid; border-bottom-width:1" bordercolor="#E1E2DC" bgcolor="#EFEFEF"> </td>
            <td width="82%" height="24" style="border-left-style:none; border-left-width:medium; border-right-style:none; border-right-width:medium; border-top-style:solid; border-top-width:1; border-bottom-style:solid; border-bottom-width:1" bordercolor="#E1E2DC" bgcolor="#ECEDE9"><%if rs("a")="0" then%><%=rs("biaoti")%><%else%><font color="#<%=rs("a")%>"><%=rs("biaoti")%></font><%end if%></td>
            <td width="2%" height="24" style="border-left-style: none; border-left-width: medium" bgcolor="#EFEFEF"> </td>
          </tr>
          <tr>
            <td width="3%" height="24" align="right" style="border-top-style: solid; border-top-width: 1; border-bottom-style: solid; border-bottom-width: 1" bgcolor="#EFEFEF" bordercolor="#D2D2D2">
      <img border="0" src="img/Nav_Icon.gif"></td>
            <td width="11%" height="24" align="right" style="border-top-style: solid; border-top-width: 1; border-bottom-style: solid; border-bottom-width: 1" bgcolor="#EFEFEF" bordercolor="#D2D2D2">
      信息类别:</td>
            <td width="2%" height="24" style="border-top-style: solid; border-top-width: 1"> </td>
            <td width="82%" height="24" style="border-top-style: solid; border-top-width: 1">
            <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
              <tr>
                <td width="73%">
<%

⌨️ 快捷键说明

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