📄 newsaddjs.asp

📁 天创商务网客户资源管理系统 v1,asp+Access,iis5
💻 ASP
字号:
<!--#include file = include.asp-->
<%
'==========================================
'
'  
'
'  
'
'==========================================
'
'子程序作用：添加商务信息到JS列表
'程序创建时间：2002-11-08
'程序完成时间：2002-11-08
'最后修改时间：2002-11-08
'==========================================
  if request.querystring("FileName")="" then response.redirect"NewsManage.asp"
  set rs=Server.CreateObject("adodb.recordset")
  sql="select * from News Where FileName='"&request.querystring("FileName")&"'"
  rs.open sql,conn,1,1
  set rs1=Server.CreateObject("Adodb.recordset")
  sql1="select * from JS Where type='文字商务信息' order by Date Desc"
  rs1.open sql1,conn,1,1
  set rs2=Server.CreateObject("Adodb.recordset")
  sql2="select * from JS Where type='图片商务信息' order by Date Desc"
  rs2.open sql2,conn,1,1
%>
<body background="images/BLogo.gif">
<form name="form" method="POST" action="NewsAddJSSave.asp">
  <table style="border-left: 1px solid #A4CEE4;border-top: 1px solid #A4CEE4;border-bottom: 1px solid #A4CEE4; border-right: 1px solid #A4CEE4" width="486" border="0" cellpadding="0" align="center" cellspacing="1" bgcolor="#96C5DE">
    <tr> 
      <td colspan=3><!--#include file = topMenu.htm--></td>
    </tr>
    <tr bgcolor="#a4cee4"> 
      <td height="25" colspan="2" align="center" valign="middle"><b>文字商务信息JS列表</b></td>
    </tr>
    <tr bgcolor="#FFFFFF" valign="middle"> 
      <td height="20" width="153" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>文字商务信息JS列表：</td>
      <td width="328" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';> 
        <select Name="WordNewsName">
         <%while not rs1.eof%>
           <option><%=rs1("JSNameCN")%></option>
         <%rs1.movenext:wend%>
        </select>
      </td>
    </tr>
    <tr bgcolor="#FFFFFF" align="center" valign="middle"> 
      <td height="38" colspan="2" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';> 
        <input type=hidden name=WordNews value="Add">
        <input type=hidden name=FileName1 value=<%=request.querystring("FileName")%>>
        <input type="submit" name="Submit" value=" 添 加 ">
      </td>
    </tr>
  </table>
</form>
<form name="form" method="POST" action="NewsAddJSSave.asp">
  <table style="border-left: 1px solid #A4CEE4;border-top: 1px solid #A4CEE4;border-bottom: 1px solid #A4CEE4; border-right: 1px solid #A4CEE4" width="486" border="0" cellpadding="0" align="center" cellspacing="1" bgcolor="#96C5DE">
    <tr align="center" valign="middle"> 
      <td height="25" colspan="2"><b>图片商务信息JS列表</b></td>
    </tr>
    <tr valign="middle"> 
      <td height="20" width="153" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor=''; bgcolor="#FFFFFF">图片商务信息JS列表：</td>
      <td width="328" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor=''; bgcolor="#FFFFFF"> 
        <select Name="PhotoNewsName">
         <%while not rs2.eof%>
           <option><%=rs2("JSNameCN")%></option>
         <%rs2.movenext:wend%>
        </select>
      </td>
    </tr>
    <tr valign="middle"> 
      <td height="25" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>图片路径： 
      </td>
      <td height="25" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';> 
        <input type="text" size=30 name="PhotoPath">
      </td>
    </tr>
    <tr valign="middle"> 
      <td colspan=2 width=100% height="25" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
       <iframe name="ad" frameborder=0 width=100% height=23 align=center scrolling=no src=upload.asp></iframe>
      </td>
    </tr>
    <tr valign="middle" align="center">
      <td height="25" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor=''; colspan="2"> 
        <input type=hidden name=PhotoNews value="Add">
        <input type=hidden name=FileName2 value=<%=request.querystring("FileName")%>>
        <input type="submit" name="Submit2" value=" 添 加 ">
      </td>
    </tr>
  </table>
</form>
⌨️ 快捷键说明

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