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

📄 amztxmzf.asp

📁 医院医技科室系统,可以进行医技报告的生成打印,完全的BS结构
💻 ASP
字号:
<SCRIPT LANGUAGE=vbscript>
<!--
 if "<%=session("yhid")%>"="" then 
    window.location="../../amain.asp"
end if
-->
</SCRIPT>
<%


'对于取医嘱的SQL语句,还要加上另外一些条件,取Application里面的项目类型
   dim conn,rs
   set conn=server.CreateObject ("adodb.connection")
   conn.Open application("sconn")
   set rs=server.CreateObject ("adodb.recordset")
   icob=Request.Form("coblsh")
   imzh=Request.Form("txtmzh")
%>
<html>
<head>
<META name=VI60_defaultClientScript content=VBScript>
<meta NAME="GENERATOR" Content="Microsoft FrontPage 4.0">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
<!--
table
{    
    FONT-FAMILY:宋体;
    FONT-SIZE: 10pt
}
INPUT
{
    FONT-FAMILY:宋体;
    FONT-SIZE: 9pt
}
SELECT
{
    FONT-FAMILY:宋体;
    FONT-SIZE: 9pt
}
-->
</style>
<base> 

<SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
<!--
Sub btnZF_onclick
	window.frazjh.form1.txttkid.value=form1.txttkid.value
	window.frazjh.form1.txtxms.value="zf"
	window.frazjh.form1.submit
End Sub



-->
</SCRIPT>
</head>
<body>
<table border=1 bordercolorlight=black bordercolordark=white bgcolor=#cce8d6 cellspacing=0 cellpadding=0 width=550>
  <tr bgcolor=#3399ff>
	<td align=middle><FONT color="white">住院病人项目退款作废</FONT> 
	</td></tr>
<tr><td>
<FORM action="" method=POST id=form1 name=form1>
<INPUT type="hidden" id=txttkid name=txttkid><INPUT type="hidden" id=txtyzid name=txtyzid>
<INPUT type="hidden" id=txtdj name=txtdj>
<INPUT type="hidden" id=txtxtdj name=txtxtdj>
<INPUT  type="hidden" id=txtxmlx name=txtxmlx>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=550 style="WIDTH: 580px" >
  <tr><td colspan=5><iframe id =fraupmenu name=fraupmenu frameborder=0 border="0" noresize color="#cce8d6"
		 width="580" height="22" src="aMZTXMZFdk.asp">                                                         
	</iframe>  </td></tr></table>
	<TABLE border=0 cellPadding=0 cellSpacing=0 width=580 style="WIDTH: 580px" >

	<TR>
		<TD width=40>医生</TD>
		<TD><INPUT id=txtYS name=txtYS readOnly  style="BACKGROUND-COLOR: #cce8d6;  BORDER-LEFT-STYLE: none; BORDER-RIGHT-STYLE: none; BORDER-TOP-STYLE: none; HEIGHT: 22px; WIDTH: 100px ;COLOR: mediumblue; FONT-VARIANT: normal" ></TD> 



</tr>
</TABLE>



</td></tr>
  
<tr><td>

<TABLE border=0	  cellspacing=0 cellpadding=0 style=" WIDTH: 530px">
<tr>
<TD>
      <P align=right>项目:</P> </TD>
<TD><INPUT type="text" id=txtxmm name=txtxmm style="BACKGROUND-COLOR: #cce8d6; BORDER-BOTTOM-COLOR: black; BORDER-LEFT-STYLE: none; BORDER-RIGHT-STYLE: none; BORDER-TOP-STYLE: none; HEIGHT: 22px; WIDTH: 120px;COLOR: red;">
    </TD>
<TD>
      <P align=right>已退数:</P> </TD>
<TD><input id="txtyts" name="txtyts" style="BACKGROUND-COLOR: #cce8d6; BORDER-BOTTOM-COLOR: black; BORDER-LEFT-STYLE: none; BORDER-RIGHT-STYLE: none; BORDER-TOP-STYLE: none; HEIGHT: 22px; WIDTH: 30px;COLOR: red;" 
     
     ></TD>
<TD>
	  <INPUT type="button" value="作废" id=btnZF name=btnZF style   ="HEIGHT: 22px; LEFT: 60px; TOP: 1px; WIDTH: 50px">
	 
	  </TD>
</tr>
</TABLE>
</td></tr><tr><td>
<TABLE BORDER=1 cellPadding=0		
	  cellSpacing=0  style="BACKGROUND-COLOR: #ffe4b5; COLOR: #1e90ff; HEIGHT: 23px;width=570px" >
<TR bgColor=#ffe4b5>
<TD align=middle width=60>选中</TD>
<TD align=middle width=150>项目名称</TD>
<TD align=middle width=80>数量</TD>
<TD align=middle width=80>金额</TD>
<TD align=middle width=130>录入时间  </TD>
<TD align=middle width=100>录入人</TD></TR>
</table>
</td></tr>
  <tr>
  <td>
	<iframe id =frazjh name=frazjh frameborder=1 border="1" noresize 
		width="570" height="130" color="#ffffff" src="amztxmzfdown.asp">                                                         
	</iframe>  
	
  </td>
  </tr>
</table>
</FORM>
 </body>  
</html>

⌨️ 快捷键说明

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