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

📄 singleaskgetdruglist.aspx

📁 医院进行药品进货,划价,派单等功能的系统
💻 ASPX
字号:
<%@ Page Language="C#" debug="true"%> 
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient"%>
<script Language="c#" runat="server">
void Page_Load(Object Source, EventArgs E)
{
	String sSheetId=Request.QueryString["sheetid"].ToString();
	String sCon="server=localhost;database=_hospital;uid=sa;pwd=;Trusted_Connection=yes";
	String sSql="";
	sSql="select TBB.Name as NAME,TBB.Type as TYPE,TBB.BatchCode as BATCHCODE,TBB.Price as PRICE,TBA.DrugUseContent as DRUGUSECOUNT from tb_DrugUse as TBA,tb_DrugStore as TBB where TBB.AutoId=TBA.DrugId and TBA.ToExpenditureRegId='"+sSheetId+"'";
Response.Write(sSheetId);
	SqlConnection OCon=new SqlConnection(sCon);
	SqlCommand OCmd=new SqlCommand(sSql,OCon);
	OCmd.Connection.Open();
	SqlDataReader dr;
	dr=OCmd.ExecuteReader();

	String sStr="";
	while(dr.Read())
	{
		sStr+=(dr["NAME"].ToString()+"è");
		sStr+=(dr["TYPE"].ToString()+"è");
		sStr+=(dr["BATCHCODE"].ToString()+"è");
		sStr+=(dr["PRICE"].ToString()+"è");
		sStr+=(dr["DRUGUSECOUNT"].ToString()+"é");

	}
	dr.Close();
	idStr.Value=sStr;
}
</script>
<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">
<!--
function _initSAGDrugL()
{
	var sVal=idStr.value;
	var sValSplit=sVal.split('é');


//
	var htmlStr="<table width='606' height='26' border='0' cellpadding='0' cellspacing='0'><tr align='center' bgcolor='#CEDDF2'><td width='51'>序号</td><td width='166'>药名</td><td width='63'>类型</td><td width='103'>批号</td><td width='72'>单价</td><td width='72'>单位量</td><td width='79'>小计</td></tr>";
	var nRow=0;
	for(i=0;i<sValSplit.length-1;i++)
	{
		nRow++;
		var subSplit=sValSplit[i].split('è');
		htmlStr+="<tr bgcolor='#ffffff'>"
		htmlStr+="<td align='center'>"+nRow+"</td>";
		for(j=0;j<subSplit.length;j++)
		{
			htmlStr+="<td align='center'>"+subSplit[j]+"</td>";
		}
		htmlStr+="<td align='center'>"+Math.round(Number(subSplit[3])*Number(subSplit[4])*100)/100+"</td>";
	}
	htmlStr+="</table>";

	parent.idDrugDetails.innerHTML=htmlStr;
}
//-->
</SCRIPT>
</HEAD>
<body onContextMenu='return false'  leftmargin=0 topmargin=0   ondragstart='return false' onselectstart ='return false' onselect='document.selection.empty()' oncopy='document.selection.empty()' onbeforecopy='return false'  onLoad="_initSAGDrugL()">
<INPUT TYPE="text" id="idStr" runat="server"/>
</BODY>
</HTML>

⌨️ 快捷键说明

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