stestuc.asp

来自「一个软件工程的软件质量web跟踪管理系统」· ASP 代码 · 共 66 行

ASP
66
字号
<%@ Language=VBScript %>
<%Response.Expires=0
Response.Buffer = False%>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>药品拼音码辅助输入系统</title>
</head>
<!--#include virtual ="/TestUC/Include/dbtofile1.inc"-->
<body  bgcolor="#FFFFFF" language="vbscript" onload="returnValue=&quot;Exit&quot;
PYCode0.focus
" leftmargin="5">
<p>
<OBJECT id=tdcComposers CLASSID="clsid:333C7BC4-460F-11D0-BC04-0080C7055A83" width=0 height=0>
	<PARAM NAME="DataURL" VALUE="../../Temp/<%=strFile%>">	
	<PARAM NAME="UseHeader" VALUE="true">
	<PARAM NAME="TextQualifier" VALUE=",">
    <PARAM NAME="Filter" VALUE='PYCode="a*"'>
 
</OBJECT>
<div align="left">
  <table border="0" cellspacing="1" width="100%" style="font-family: 宋体; font-size: 10pt">
    <tr>
      <td width="100%"><LABEL FOR=PYCode><b><font color="#000000">辅助码:</font></b></LABEL><input type="text" name="PYCode0" size="15" style="font-family: 宋体; font-size: 10pt; background-color: #FFFFFF"
      language="vbscript" onkeyup="
      if len(Trim(PYCode0.value))<>0 then
	     tdcComposers.object.Filter='PYCode=&quot;'+PYCode0.value+'*&quot;'
         tdcComposers.reset()
      else
         tdcComposers.object.Filter='PYCode=&quot;*&quot;'
         tdcComposers.reset()
      end if
      "
      ></td>
    </tr>
    <tr>
      <td width="100%">
      <TABLE ID=elemtbl DATASRC=#tdcComposers  width="100%" style="font-family: 宋体; font-size: 10pt" cellspacing="0" cellpadding="0" border="1" bordercolor="#C8C8C8">
  <center>
   <TBODY>
     <TR>
     <TD id="DrugTD"  language="vbscript" onmousedown="returnValue=me.outerText
     window.close()
     "><DIV id=Drug DATAFLD="Drug" style="display:none"></DIV><DIV id=Drug DATAFLD="DrugName" ></DIV>
     
        </TD>
     
     </TR>
   </TBODY>
</TABLE>
      
      </center>
      
      </td>
    </tr>
  </table>
</div>

</body>

</html>

⌨️ 快捷键说明

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