PageRenderTime 60ms CodeModel.GetById 6ms RepoModel.GetById 1ms app.codeStats 0ms

/bond/Admin/BondComeToMarketQuery.asp

http://demoasp.googlecode.com/
ASP | 373 lines | 363 code | 10 blank | 0 comment | 3 complexity | 88630d3956853d0e3c8fbcd0c74ff599 MD5 | raw file
Possible License(s): BSD-3-Clause, LGPL-2.1
  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
  2. <!--#include file="../Connections/b_con.asp" -->
  3. <%
  4. If request.Form("hf") =1 Then
  5. Set rsSelect = Server.CreateObject("ADODB.Recordset")
  6. rsSelect.ActiveConnection = MM_b_con_STRING
  7. rsSelect.Source = "SELECT T_CPBasicData.CPID, T_CPBasicData.CPShortName, T_FirmInfo.FirmName, T_CPBasicData.CPTerm, T_CPBasicData.CPCirculateStartDate, T_CPBasicData.FirmID, T_CPBasicData.CPIssueStartDate FROM T_CPBasicData INNER JOIN T_FirmInfo ON T_CPBasicData.FirmID = T_FirmInfo.FirmID Where (T_CPBasicData.CPCirculateStartDate >= '"& request.Form("txtDate") &"') Order By CPID Desc"
  8. rsSelect.CursorType = 0
  9. rsSelect.CursorLocation = 2
  10. rsSelect.LockType = 1
  11. rsSelect.Open()
  12. While Not rsSelect.Eof
  13. Select Case rsSelect(3)
  14. Case 1
  15. strTerm = "1?"
  16. Case 0.75
  17. strTerm = "9??"
  18. Case 0.5
  19. strTerm = "6??"
  20. Case 0.25
  21. strTerm = "3??"
  22. End Select
  23. strTableData = strTableData & "<tr><td height='7' align='left'></td></tr><tr><td height='15' align='left' valign='middle' class='news'><table width='95%' align='center' cellpadding='0' cellspacing='3'><tr><td width='15%' class='newsz'><a href='../2/101.asp?CID="& rsSelect(0) &"&FID="& rsSelect(5) &"' target='_blank'>"& rsSelect(0) &"</a></td><td width='15%' class='newsz'>"& rsSelect(1) &"</td><td width='35%' height='15' class='newsz'>"& rsSelect(2) &"</td></td><td width='5%' height='10' class='newsz'>"& strTerm &"</td></td><td width='15%' height='20' align='right' class='sj'>"& rsSelect(6) &"</td><td width='15%' height='20' align='right' class='sj'>"& rsSelect(4) &"</td></tr></table></td></tr>"
  24. rsSelect.MoveNext
  25. Wend
  26. rsSelect.Close()
  27. Set rsSelect = Nothing
  28. End If
  29. %>
  30. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  31. <html xmlns="http://www.w3.org/1999/xhtml"><!-- InstanceBegin template="/Templates/index.dwt" codeOutsideHTMLIsLocked="false" -->
  32. <head>
  33. <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
  34. <!-- InstanceBeginEditable name="doctitle" -->
  35. <title>???????</title>
  36. <!-- InstanceEndEditable -->
  37. <style type="text/css">
  38. <!--
  39. body {
  40. margin-left: 0px;
  41. margin-top: 0px;
  42. margin-right: 0px;
  43. margin-bottom: 0px;
  44. }
  45. .goBotom {
  46. vertical-align: bottom;
  47. }
  48. -->
  49. </style>
  50. <link href="../css.css" rel="stylesheet" type="text/css" />
  51. <SCRIPT language=javascript>
  52. function showsubmenu(sid)
  53. {
  54. whichEl = eval("submenu" + sid);
  55. if (whichEl.style.display == "none")
  56. {
  57. HideAll();
  58. eval("submenu" + sid + ".style.display=\"\";");
  59. }
  60. else
  61. {
  62. HideAll();
  63. eval("submenu" + sid + ".style.display=\"none\";");
  64. }
  65. }
  66. </SCRIPT>
  67. <SCRIPT lanuage="JScript">
  68. function HideAll()
  69. {
  70. var NA=navigator.appName;
  71. //alert(i);
  72. if (NA=="Microsoft Internet Explorer")
  73. {
  74. //document.all("submenu1").style.display="none";
  75. submenu02.style.display="none";
  76. submenu03.style.display="none";
  77. //pic3.src="index/plus.gif";
  78. submenu01.style.display="none";
  79. submenu04.style.display="none";
  80. submenu05.style.display="none";
  81. submenu07.style.display="none";
  82. }
  83. }</SCRIPT>
  84. <!-- InstanceBeginEditable name="head" --><!-- InstanceEndEditable -->
  85. </head>
  86. <body>
  87. <div align="center">
  88. <table width="984" border="0" cellspacing="0" cellpadding="0">
  89. <tr>
  90. <td><table width="986" border="0" cellspacing="0" cellpadding="0">
  91. <tr>
  92. <td width="986" height="20" valign="bottom"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  93. <tr>
  94. <td width="214" rowspan="2" align="right" valign="bottom" class="bzen"><img src="../image/logo.gif" width="180" height="26" /></td>
  95. <td height="20" align="right" class="bzen">&nbsp;</td>
  96. <td align="right">&nbsp;</td>
  97. </tr>
  98. <tr>
  99. <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>
  100. <td width="7" align="right">&nbsp;</td>
  101. </tr>
  102. <tr>
  103. <td height="5" colspan="3"></td>
  104. </tr>
  105. </table></td>
  106. </tr>
  107. <tr>
  108. <td width="984" height="115" align="right" valign="bottom" background="../image/t.gif"><table width="30%" border="0" cellspacing="0" cellpadding="0">
  109. <tr>
  110. <td align="right" bgcolor="#5B7730"><span class="sp"><img src="../image/wl.gif" width="327" height="24" /></span></td>
  111. </tr>
  112. <tr>
  113. <td>&nbsp;</td>
  114. </tr>
  115. </table></td>
  116. </tr>
  117. <tr>
  118. <td height="8" valign="bottom"></td>
  119. </tr>
  120. </table></td>
  121. </tr>
  122. <tr>
  123. <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
  124. <tr>
  125. <td width="185" align="center" valign="top"><table width="92%" border="0" cellspacing="0" cellpadding="0">
  126. <tr>
  127. <td width="11%" height="12" align="right">&nbsp;</td>
  128. <td width="53%" align="right"><img src="../image/x.gif" width="19" height="12" /></td>
  129. <td width="36%" align="right"><img src="../image/com.gif" width="51" height="12" /></td>
  130. </tr>
  131. <tr>
  132. <td height="10" colspan="3"></td>
  133. </tr>
  134. <tr>
  135. <td height="25" colspan="3"><table width="100%" height="25" border="0" cellpadding="0" cellspacing="0">
  136. <tr>
  137. <td width="13" bgcolor="#5B7730">&nbsp;</td>
  138. <td width="150" align="left" bgcolor="#5B7730" class="bian"> &nbsp;&nbsp;
  139. <% If Session("MemberName") <> "" Then
  140. Response.Write "????" & Session("MemberName")
  141. ELse
  142. Response.Write "Login"
  143. End If %></td>
  144. </tr>
  145. </table></td>
  146. </tr>
  147. <tr>
  148. <td height="9" colspan="3"></td>
  149. </tr>
  150. <tr>
  151. <td colspan="3" class="bzen">
  152. <% If Session("MemberID") <> "" Then
  153. Response.Write "<table width='95%' border='0' align='right' cellpadding='0' cellspacing='0'>" & _
  154. "<tr>" & _
  155. "<td width='44%' height='25' align='left'>????</td>" & _
  156. "<td align='left'>" & Session("LastLogin") & "</td>" & _
  157. "</tr>"
  158. If Session("Level") > 0 Then
  159. response.write "<tr>" & _
  160. "<td width='44%' height='25' align='left' colspan='2'><a href='../../Admin/index.asp' class='sj'>??????</a></td>" & _
  161. "</tr>"
  162. End If
  163. Response.Write "<tr>" & _
  164. "<td height='25' colspan='2' align='Left'><a href='../../ModifyUserInfo.asp' class='sj'>?????????</a>&nbsp;&nbsp;<a href='../../Logout.asp'>??</a></td>" & _
  165. "</tr>" & _
  166. "</table>"
  167. Else
  168. Response.Write "<form action='../../CheckUser.asp' method='post' name='form1' id='form1'>" & _
  169. "<table width='95%' border='0' align='right' cellpadding='0' cellspacing='0'><tr>" & _
  170. "<td width='44%' height='25' align='left'>User ID: </td>" & _
  171. "<td width='56%' align='left'><input name='txtID' type='text' class='lxth3' id='txtID' size='10' /></td>" & _
  172. "</tr>" & _
  173. "<tr>" & _
  174. "<td height='25' align='left'>Password:</td>" & _
  175. "<td align='left'><input name='txtPwd' type='password' class='lxth3' id='txtPwd' size='10' /></td>" & _
  176. "</tr>" & _
  177. "<tr>" & _
  178. "<td height='25' colspan='2' align='right'><a href='../../UserRegi.asp'>Register</a>&nbsp;" & _
  179. "<input type='image' class='goBotom' value='Login' src='../../image/ago.gif' width='26' height='16' border='0'>" & _
  180. "&nbsp;&nbsp;&nbsp;</td>" & _
  181. "</tr>" & _
  182. "</table>" & _
  183. "</form>"
  184. End If
  185. %></td>
  186. </tr>
  187. <tr>
  188. <td height="5" colspan="3"></td>
  189. </tr>
  190. <tr>
  191. <td colspan="3"><table width="100%" height="25" border="0" cellpadding="0" cellspacing="0">
  192. <tr>
  193. <td width="13" bgcolor="#5B7730">&nbsp;</td>
  194. <td width="150" align="left" bgcolor="#5B7730" class="bian">&nbsp;&nbsp;QuickNav</td>
  195. </tr>
  196. </table></td>
  197. </tr>
  198. <tr>
  199. <td height="7" colspan="3" align="left" class="newsz"></td>
  200. </tr>
  201. <tr>
  202. <td height="20" align="left" class="newsz">&nbsp;</td>
  203. <td height="20" colspan="2" align="left" class="newsz" style="cursor:hand;" onClick="showsubmenu('01')"><span class="cd" >????</span></td>
  204. </tr>
  205. <tr style="display:none;" id="submenu01" >
  206. <td height="10" align="left"><span class="newsz">&nbsp;&nbsp;&nbsp;&nbsp;</span></td>
  207. <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  208. <tr>
  209. <td width="11%">&nbsp;</td>
  210. <td width="89%" height="20" class="bzen"><a href="../1/1.asp">????</a></td>
  211. </tr>
  212. <tr>
  213. <td>&nbsp;</td>
  214. <td height="20" class="bzen"><a href="../1/2.asp">????</a></td>
  215. </tr>
  216. <tr>
  217. <td>&nbsp;</td>
  218. <td height="20" class="bzen"><a href="../1/3.asp">????</a></td>
  219. </tr>
  220. </table></td>
  221. </tr>
  222. <tr>
  223. <td height="10" align="left">&nbsp;</td>
  224. <td height="20" colspan="2" align="left" style="cursor:hand;" onClick="showsubmenu('02')"><span class="cd">????</span></td>
  225. </tr>
  226. <tr style="display:none;" id="submenu02">
  227. <td height="10" align="left"><span class="newsz">&nbsp;&nbsp;&nbsp;&nbsp;</span></td>
  228. <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  229. <tr>
  230. <td width="11%">&nbsp;</td>
  231. <td width="89%" height="20" class="bzen"><a href="../2/1.asp">?????</a></td>
  232. </tr>
  233. <tr>
  234. <td>&nbsp;</td>
  235. <td height="20" class="bzen"><a href="#">ABS&amp;MBS</a></td>
  236. </tr>
  237. <tr>
  238. <td>&nbsp;</td>
  239. <td height="20" class="bzen"><a href="#">?????</a></td>
  240. </tr>
  241. <tr>
  242. <td>&nbsp;</td>
  243. <td height="20" class="bzen"><a href="../2/4.asp">????</a></td>
  244. </tr>
  245. <tr>
  246. <td>&nbsp;</td>
  247. <td height="20" class="bzen"><a href="../2/5.asp">????</a></td>
  248. </tr>
  249. </table></td>
  250. </tr>
  251. <tr>
  252. <td height="10" align="left">&nbsp;</td>
  253. <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;" onClick="showsubmenu('03')">????</td>
  254. </tr>
  255. <tr style="display:none;" id="submenu03">
  256. <td height="10" align="left"><span class="newsz"></span></td>
  257. <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  258. <tr>
  259. <td width="11%">&nbsp;</td>
  260. <td width="89%" height="20" class="bzen"><a href="../3/1.asp">????<span lang="EN-US" xml:lang="EN-US"></span></a></td>
  261. </tr>
  262. <tr>
  263. <td>&nbsp;</td>
  264. <td height="20" class="bzen"><a href="../3/2.asp">????</a></td>
  265. </tr>
  266. </table></td>
  267. </tr>
  268. <tr>
  269. <td height="10" align="left">&nbsp;</td>
  270. <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;" onClick="showsubmenu('04')">????</td>
  271. </tr>
  272. <tr style="display:none;" id="submenu04">
  273. <td height="10" align="left"><span class="newsz"></span></td>
  274. <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  275. <tr>
  276. <td width="11%">&nbsp;</td>
  277. <td width="89%" height="20" class="bzen"><a href="../4/Default.asp?Btype=4">????????</a></td>
  278. </tr>
  279. <tr>
  280. <td>&nbsp;</td>
  281. <td height="20" class="bzen"><a href="../4/Default.asp?Btype=5">????</a></td>
  282. </tr>
  283. <tr>
  284. <td>&nbsp;</td>
  285. <td height="20" class="bzen"><p><a href="../4/Default.asp?Btype=6">??????</a></p></td>
  286. </tr>
  287. </table></td>
  288. </tr>
  289. <tr>
  290. <td height="10" align="left">&nbsp;</td>
  291. <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;" onClick="showsubmenu('05')">????</td>
  292. </tr>
  293. <tr style="display:none;" id="submenu05">
  294. <td height="20" align="left"></td>
  295. <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  296. <tr>
  297. <td width="11%">&nbsp;</td>
  298. <td width="89%" height="20" class="bzen"><a href="../5/1.asp">DX??</a></td>
  299. </tr>
  300. <tr>
  301. <td>&nbsp;</td>
  302. <td height="20" class="bzen"><p><a href="../concats.asp">????</a></p> </td>
  303. </tr>
  304. </table></td>
  305. </tr>
  306. <tr>
  307. <td height="20" align="left"></td>
  308. <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;"><a href="../6/case.asp" class="cd">????</a></td>
  309. </tr>
  310. <tr>
  311. <td height="20" align="left"></td>
  312. <td height="20" colspan="2" align="left" class="cd" style="cursor:hand;" onClick="showsubmenu('07')">????</td>
  313. </tr>
  314. <tr style="display:none;" id="submenu07">
  315. <td height="20" align="left"></td>
  316. <td height="20" colspan="2" align="left"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  317. <tr>
  318. <td width="11%">&nbsp;</td>
  319. <td width="89%" height="20" class="bzen"><a href="../7/open.asp" class="bzen">????</a></td>
  320. </tr>
  321. <tr>
  322. <td>&nbsp;</td>
  323. <td height="20" class="bzen"><p><a href="../7/close.asp">????</a></p></td>
  324. </tr>
  325. </table></td>
  326. </tr>
  327. </table></td>
  328. <td align="center" valign="top" class="sp"><!-- InstanceBeginEditable name="1" -->
  329. <form id="form1" name="form1" method="post" action="BondComeToMarketQuery.asp">
  330. <p>????
  331. <input name="txtDate" type="text" class="newsz" id="txtDate" value="<% If request.Form("txtDate") = "" Then
  332. response.Write Date()
  333. Else
  334. response.Write request.Form("txtDate")
  335. End If %>" />
  336. <input name="hf" type="hidden" id="hf" value="1" />
  337. </p>
  338. <p>
  339. <label>
  340. <input type="submit" name="Submit" value="??" />
  341. </label>
  342. <a href="index.asp">??</a></p>
  343. </form>
  344. <table width="80%" border="0" cellspacing="0" cellpadding="0">
  345. <%= strTableData %>
  346. <tr>
  347. <td height="8" align="left" valign="middle">&nbsp;</td>
  348. </tr>
  349. </table>
  350. <!-- InstanceEndEditable --></td>
  351. </tr>
  352. </table></td>
  353. </tr>
  354. <tr>
  355. <td height="10">&nbsp;</td>
  356. </tr>
  357. <tr>
  358. <td height="35" align="center" valign="middle" bgcolor="#5B7730" class="baid">Copyright (C)2006 All rights reserved</td>
  359. </tr>
  360. </table>
  361. </div>
  362. </body>
  363. <!-- InstanceEnd --></html>