/bond/Admin/BondEdit.asp
ASP | 493 lines | 476 code | 17 blank | 0 comment | 3 complexity | ec8c164f458f50cd93f610f7c7d7ad26 MD5 | raw file
Possible License(s): BSD-3-Clause, LGPL-2.1
- <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
- <!--#include file="../Connections/b_con.asp" -->
- <%
- If request.QueryString("act") = 2 Then
-
- Set rsSelect = Server.CreateObject("ADODB.Recordset")
- rsSelect.ActiveConnection = MM_b_con_STRING
- rsSelect.Source = "SELECT CPID, CPShortName, CPName, FirmID, CPMajorConsignee, CPRatingIns, CPRatings, CPVolume, CPTerm, CPIssueStartDate, CPIssueEndDate, CPMatureDate, CPCirculateStartDate, CPCirculateEndDate, CPCirculateMarket, CPIsAllowedToSpan, CPInterestManner, CPIssueRate, CPBookRate, CPIssuePrice, CPPurpose, CPTrustee FROM T_CPBasicData Where CPID = '" & Request.QueryString("CID") & "'"
- rsSelect.CursorType = 0
- rsSelect.CursorLocation = 2
- rsSelect.LockType = 1
- rsSelect.Open()
-
- strCPID = rsSelect(0)
- strCPShortName = rsSelect(1)
- strCPName = rsSelect(2)
- intFirmID = rsSelect(3)
- strCPMajorConsignee = rsSelect(4)
- strCPRatingIns = rsSelect(5)
- strCPRatings = rsSelect(6)
- strCPVolume = rsSelect(7)
- strCPTerm = rsSelect(8)
- strCPIssueStartDate = rsSelect(9)
- strCPIssueEndDate = rsSelect(10)
- strCPMatureDate = rsSelect(11)
- strCPCirculateStartDate = rsSelect(12)
- strCPCirculateEndDate = rsSelect(13)
- strCPCirculateMarket = rsSelect(14)
- strCPIsAllowedToSpan = rsSelect(15)
- strCPInterestManner = rsSelect(16)
- strCPIssueRate = rsSelect(17)
- strCPBookRate = rsSelect(18)
- strCPIssuePrice = rsSelect(19)
- strCPPurpose = rsSelect(20)
- strCPTrustee = rsSelect(21)
-
- rsSelect.Close()
- Set rsSelect = Nothing
-
-
- End If
-
- Set rsFirmList = Server.CreateObject("ADODB.Recordset")
- rsFirmList.ActiveConnection = MM_b_con_STRING
- rsFirmList.Source = "SELECT T_FirmInfo.FirmID, T_FirmInfo.FirmName FROM T_FirmInfo"
- rsFirmList.CursorType = 0
- rsFirmList.CursorLocation = 2
- rsFirmList.LockType = 1
- rsFirmList.Open()
-
- While Not rsFirmList.EOF
-
- If rsFirmList(0) = intFirmID Then
- strFirmList = strFirmList & "<option value='"& rsFirmList(0) &"' Selected>"& rsFirmList(1) &"</option>"
- Else
- strFirmList = strFirmList & "<option value='"& rsFirmList(0) &"'>"& rsFirmList(1) &"</option>"
- End If
- rsFirmList.movenext
-
- Wend
-
- rsFirmList.Close()
- Set rsFirmList = Nothing
-
- %>
- <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
- <html xmlns="http://www.w3.org/1999/xhtml"><!-- InstanceBegin template="/Templates/index.dwt" codeOutsideHTMLIsLocked="false" -->
- <head>
- <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
- <!-- InstanceBeginEditable name="doctitle" -->
- <title>?????</title>
- <!-- InstanceEndEditable -->
- <style type="text/css">
- <!--
- body {
- margin-left: 0px;
- margin-top: 0px;
- margin-right: 0px;
- margin-bottom: 0px;
- }
- .goBotom {
- vertical-align: bottom;
- }
- -->
- </style>
- <link href="../css.css" rel="stylesheet" type="text/css" />
- <SCRIPT language=javascript>
- function showsubmenu(sid)
- {
- whichEl = eval("submenu" + sid);
- if (whichEl.style.display == "none")
- {
- HideAll();
- eval("submenu" + sid + ".style.display=\"\";");
- }
- else
- {
- HideAll();
- eval("submenu" + sid + ".style.display=\"none\";");
- }
- }
- </SCRIPT>
-
- <SCRIPT lanuage="JScript">
- function HideAll()
- {
- var NA=navigator.appName;
- //alert(i);
- if (NA=="Microsoft Internet Explorer")
- {
- //document.all("submenu1").style.display="none";
- submenu02.style.display="none";
- submenu03.style.display="none";
- //pic3.src="index/plus.gif";
- submenu01.style.display="none";
- submenu04.style.display="none";
- submenu05.style.display="none";
-
- submenu07.style.display="none";
- }
- }</SCRIPT>
- <!-- InstanceBeginEditable name="head" -->
- <style type="text/css">
- <!--
- .STYLE1 {color: #FF0000}
- -->
- </style>
- <!-- InstanceEndEditable -->
- </head>
-
- <body>
- <div align="center">
- <table width="984" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td><table width="986" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="986" height="20" valign="bottom"><table width="100%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="214" rowspan="2" align="right" valign="bottom" class="bzen"><img src="../image/logo.gif" width="180" height="26" /></td>
- <td height="20" align="right" class="bzen"> </td>
- <td align="right"> </td>
- </tr>
- <tr>
- <td width="765" align="right" class="bzen"><a href="../Default.asp">????</a> <span class="STYLE2">|</span> <a href="../concats.asp">????</a><span class="STYLE2"> | </span><a href="../4/Default.asp">????</a><span class="STYLE2"> |</span> <a href="Rating/">????</a></td>
- <td width="7" align="right"> </td>
- </tr>
- <tr>
- <td height="5" colspan="3"></td>
- </tr>
- </table></td>
- </tr>
- <tr>
- <td width="984" height="115" align="right" valign="bottom" background="../image/t.gif"><table width="30%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td align="right" bgcolor="#5B7730"><span class="sp"><img src="../image/wl.gif" width="327" height="24" /></span></td>
- </tr>
- <tr>
- <td> </td>
- </tr>
- </table></td>
- </tr>
- <tr>
- <td height="8" valign="bottom"></td>
- </tr>
- </table></td>
- </tr>
- <tr>
- <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="185" align="center" valign="top"><table width="92%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="11%" height="12" align="right"> </td>
- <td width="53%" align="right"><img src="../image/x.gif" width="19" height="12" /></td>
- <td width="36%" align="right"><img src="../image/com.gif" width="51" height="12" /></td>
- </tr>
- <tr>
- <td height="10" colspan="3"></td>
- </tr>
- <tr>
- <td height="25" colspan="3"><table width="100%" height="25" border="0" cellpadding="0" cellspacing="0">
- <tr>
- <td width="13" bgcolor="#5B7730"> </td>
- <td width="150" align="left" bgcolor="#5B7730" class="bian">
- <% If Session("MemberName") <> "" Then
- Response.Write "????" & Session("MemberName")
- ELse
- Response.Write "Login"
- End If %></td>
- </tr>
- </table></td>
- </tr>
- <tr>
- <td height="9" colspan="3"></td>
- </tr>
- <tr>
- <td colspan="3" class="bzen">
- <% If Session("MemberID") <> "" Then
- Response.Write "<table width='95%' border='0' align='right' cellpadding='0' cellspacing='0'>" & _
- "<tr>" & _
- "<td width='44%' height='25' align='left'>????</td>" & _
- "<td align='left'>" & Session("LastLogin") & "</td>" & _
- "</tr>"
- If Session("Level") > 0 Then
- response.write "<tr>" & _
- "<td width='44%' height='25' align='left' colspan='2'><a href='../../Admin/index.asp' class='sj'>??????</a></td>" & _
- "</tr>"
- End If
- Response.Write "<tr>" & _
- "<td height='25' colspan='2' align='Left'><a href='../../ModifyUserInfo.asp' class='sj'>?????????</a> <a href='../../Logout.asp'>??</a></td>" & _
- "</tr>" & _
- "</table>"
- Else
- Response.Write "<form action='../../CheckUser.asp' method='post' name='form1' id='form1'>" & _
- "<table width='95%' border='0' align='right' cellpadding='0' cellspacing='0'><tr>" & _
- "<td width='44%' height='25' align='left'>User ID: </td>" & _
- "<td width='56%' align='left'><input name='txtID' type='text' class='lxth3' id='txtID' size='10' /></td>" & _
- "</tr>" & _
- "<tr>" & _
- "<td height='25' align='left'>Password:</td>" & _
- "<td align='left'><input name='txtPwd' type='password' class='lxth3' id='txtPwd' size='10' /></td>" & _
- "</tr>" & _
- "<tr>" & _
- "<td height='25' colspan='2' align='right'><a href='../../UserRegi.asp'>Register</a> " & _
- "<input type='image' class='goBotom' value='Login' src='../../image/ago.gif' width='26' height='16' border='0'>" & _
- " </td>" & _
- "</tr>" & _
- "</table>" & _
- "</form>"
- End If
- %></td>
- </tr>
- <tr>
- <td height="5" colspan="3"></td>
- </tr>
- <tr>
- <td colspan="3"><table width="100%" height="25" border="0" cellpadding="0" cellspacing="0">
- <tr>
- <td width="13" bgcolor="#5B7730"> </td>
- <td width="150" align="left" bgcolor="#5B7730" class="bian"> QuickNav</td>
- </tr>
- </table></td>
- </tr>
- <tr>
- <td height="7" colspan="3" align="left" class="newsz"></td>
- </tr>
- <tr>
- <td height="20" align="left" class="newsz"> </td>
- <td height="20" colspan="2" align="left" class="newsz" style="cursor:hand;" onClick="showsubmenu('01')"><span class="cd" >????</span></td>
- </tr>
- <tr style="display:none;" id="submenu01" >
- <td height="10" align="left"><span class="newsz"> </span></td>
- <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="11%"> </td>
- <td width="89%" height="20" class="bzen"><a href="../1/1.asp">????</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><a href="../1/2.asp">????</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><a href="../1/3.asp">????</a></td>
- </tr>
- </table></td>
- </tr>
- <tr>
- <td height="10" align="left"> </td>
- <td height="20" colspan="2" align="left" style="cursor:hand;" onClick="showsubmenu('02')"><span class="cd">????</span></td>
- </tr>
- <tr style="display:none;" id="submenu02">
- <td height="10" align="left"><span class="newsz"> </span></td>
- <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="11%"> </td>
- <td width="89%" height="20" class="bzen"><a href="../2/1.asp">?????</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><a href="#">ABS&MBS</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><a href="#">?????</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><a href="../2/4.asp">????</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><a href="../2/5.asp">????</a></td>
- </tr>
- </table></td>
- </tr>
- <tr>
- <td height="10" align="left"> </td>
- <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;" onClick="showsubmenu('03')">????</td>
- </tr>
- <tr style="display:none;" id="submenu03">
- <td height="10" align="left"><span class="newsz"></span></td>
- <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="11%"> </td>
- <td width="89%" height="20" class="bzen"><a href="../3/1.asp">????<span lang="EN-US" xml:lang="EN-US"></span></a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><a href="../3/2.asp">????</a></td>
- </tr>
-
- </table></td>
- </tr>
- <tr>
- <td height="10" align="left"> </td>
- <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;" onClick="showsubmenu('04')">????</td>
- </tr>
- <tr style="display:none;" id="submenu04">
- <td height="10" align="left"><span class="newsz"></span></td>
- <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="11%"> </td>
- <td width="89%" height="20" class="bzen"><a href="../4/Default.asp?Btype=4">????????</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><a href="../4/Default.asp?Btype=5">????</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><p><a href="../4/Default.asp?Btype=6">??????</a></p></td>
- </tr>
-
- </table></td>
- </tr>
- <tr>
- <td height="10" align="left"> </td>
- <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;" onClick="showsubmenu('05')">????</td>
- </tr>
- <tr style="display:none;" id="submenu05">
- <td height="20" align="left"></td>
- <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="11%"> </td>
- <td width="89%" height="20" class="bzen"><a href="../5/1.asp">DX??</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><p><a href="../concats.asp">????</a></p> </td>
- </tr>
-
- </table></td>
- </tr>
- <tr>
- <td height="20" align="left"></td>
- <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;"><a href="../6/case.asp" class="cd">????</a></td>
- </tr>
- <tr>
- <td height="20" align="left"></td>
- <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;" onClick="showsubmenu('07')">????</td>
- </tr>
- <tr style="display:none;" id="submenu07">
- <td height="20" align="left"></td>
- <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <td width="11%"> </td>
- <td width="89%" height="20" class="bzen"><a href="../7/open.asp" class="bzen">????</a></td>
- </tr>
- <tr>
- <td> </td>
- <td height="20" class="bzen"><p><a href="../7/close.asp">????</a></p></td>
- </tr>
- </table></td>
- </tr>
- </table></td>
- <td align="center" valign="top" class="sp"><!-- InstanceBeginEditable name="1" -->
- <form id="form2" name="form2" method="post" action="BondUpdate.asp">
- <table width="600" border="0" align="center" cellpadding="0" cellspacing="0">
- <tr>
- <td height="24" align="left" class="lxth3">?????</td>
- <td align="left" class="lxth3"><input name="txtCPID" type="text" id="txtCPID" value="<%= strCPID %>" />
- <span class="STYLE1">*</span></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">?????</td>
- <td align="left" class="lxth3"><input name="txtCPShortName" type="text" id="txtCPShortName" value="<%= strCPShortName %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">?????</td>
- <td align="left" class="lxth3"><input name="txtCPName" type="text" id="txtCPName" value="<%= strCPName %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">?????</td>
- <td align="left" class="lxth3"><select name="sltFirmID" id="sltFirmID">
- <%= strFirmList %>
- </select>
- <span class="STYLE1">*</span> </td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">?????</td>
- <td align="left" class="lxth3"><input name="txtCPMajorConsignee" type="text" id="txtCPMajorConsignee" value="<%= strCPMajorConsignee %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">?????</td>
- <td align="left" class="lxth3"><input name="txtCPRatingIns" type="text" id="txtCPRatingIns" value="<%= strCPRatingIns %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">?????</td>
- <td align="left" class="lxth3"><input name="txtCPRatings" type="text" id="txtCPRatings" value="<%= strCPRatings %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">?????(??)?</td>
- <td align="left" class="lxth3"><input name="txtCPVolume" type="text" id="txtCPVolume" value="<%= strCPVolume %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">????(?)?</td>
- <td align="left" class="lxth3"><input name="txtCPTerm" type="text" id="txtCPTerm" value="<%= strCPTerm %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">????????</td>
- <td align="left" class="lxth3"><input name="txtCPIssueStartDate" type="text" id="txtCPIssueStartDate" value="<%= strCPIssueStartDate %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">????????</td>
- <td align="left" class="lxth3"><input name="txtCPIssueEndDate" type="text" id="txtCPIssueEndDate" value="<%= strCPIssueEndDate %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">??????</td>
- <td align="left" class="lxth3"><input name="txtCPMatureDate" type="text" id="txtCPMatureDate" value="<%= strCPMatureDate %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">????</td>
- <td align="left" class="lxth3"><input name="txtCPCirculateStartDate" type="text" id="txtCPCirculateStartDate" value="<%= strCPCirculateStartDate %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">????</td>
- <td align="left" class="lxth3"><input name="txtCPCirculateEndDate" type="text" id="txtCPCirculateEndDate" value="<%= strCPCirculateEndDate %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">????</td>
- <td align="left" class="lxth3"><input name="txtCPCirculateMarket" type="text" id="txtCPCirculateMarket" value="<%= strCPCirculateMarket %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">??????</td>
- <td align="left" class="lxth3"><input name="txtCPIsAllowedToSpan" type="text" id="txtCPIsAllowedToSpan" value="<%= strCPIsAllowedToSpan %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">?????</td>
- <td align="left" class="lxth3"><input name="txtCPInterestManner" type="text" id="txtCPInterestManner" value="<%= strCPInterestManner %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">???????(%)?</td>
- <td align="left" class="lxth3"><input name="txtCPIssueRate" type="text" id="txtCPIssueRate" value="<%= strCPIssueRate %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">????(%)?</td>
- <td align="left" class="lxth3"><input name="txtCPBookRate" type="text" id="txtCPBookRate" value="<%= strCPBookRate %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">????(?)?</td>
- <td align="left" class="lxth3"><input name="txtCPIssuePrice" type="text" id="txtCPIssuePrice" value="<%= strCPIssuePrice %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" class="lxth3">????</td>
- <td align="left" class="lxth3"><input name="txtCPTrustee" type="text" id="txtCPTrustee" value="<%= strCPTrustee %>" /></td>
- </tr>
- <tr>
- <td height="24" align="left" valign="top" class="lxth3">?????</td>
- <td align="left" class="lxth3"><textarea name="txtCPPurpose" cols="30" rows="5" id="txtCPPurpose"><%= strCPPurpose %></textarea></td>
- </tr>
- <tr>
- <td height="24" align="left">
- <% If request.QueryString("act") = 2 Then response.write "<input name='hfCPID' type='hidden' id='hfCPID' value='"& strCPID &"' /> " %>
- <input name="act" type="hidden" id="act" value="<%= request.QueryString("act") %>" /></td>
- <td align="left" class="lxth3"><input type="submit" name="Submit" value="??" />
- <a href="BondList.asp">??</a></td>
- </tr>
- </table>
- </form>
- <!-- InstanceEndEditable --></td>
- </tr>
- </table></td>
- </tr>
- <tr>
- <td height="10"> </td>
- </tr>
- <tr>
- <td height="35" align="center" valign="middle" bgcolor="#5B7730" class="baid">Copyright (C)2006 All rights reserved</td>
- </tr>
- </table>
- </div>
- </body>
- <!-- InstanceEnd --></html>