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

📄 baobiaoaskdrugmsg.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 sId="";
	String sName="";
	String sPyCode="";
	String sType="";
	String sBatchCode="";
	String sToDate="";
	String sProductAddress="";
	String sStoreCount="";
	String sABType="";

	String sWhereStr="Where Unit<>'' ";

	sId=Request.Form["idDrugId"].ToString();
	sId.Trim();
	sWhereStr+=(sId==""?"":"and AutoId="+sId+" ");

	sName=Request.Form["idName"].ToString();
	sName.Trim();
	sWhereStr+=(sName==""?"":"and Name like '%"+sName+"%' ");

	sPyCode=Request.Form["idPYName"].ToString();
	sPyCode.Trim();
	sWhereStr+=(sPyCode==""?"":"and PYName like '%"+sPyCode+"%' ");

	sType=Request.Form["idType"].ToString();
	sType.Trim();
	sWhereStr+=(sType=="全部"?"":"and Type like '%"+sType+"%' ");

	sBatchCode=Request.Form["idBatch"].ToString();
	sBatchCode.Trim();
	sWhereStr+=(sBatchCode==""?"":"and BatchCode like '%"+sBatchCode+"%' ");

	sToDate=Request.Form["idToDate"].ToString();
	sToDate.Trim();
	sWhereStr+=(sToDate==""?"":"and ToDate like '%"+sToDate+"%' ");

	sProductAddress=Request.Form["idProductAddress"].ToString();
	sProductAddress.Trim();
	sWhereStr+=(sProductAddress==""?"":"and ProductAddress like '%"+sProductAddress+"%' ");

	sStoreCount=Request.Form["idStoreCount"].ToString();
	sStoreCount.Trim();
	sWhereStr+=(sStoreCount==""?"":"and StoreCount<"+sStoreCount+" ");

	sABType=Request.Form["idABType"].ToString();
	sABType.Trim();
	sWhereStr+=(sABType=="全部"?"":"and ABType like '%"+sABType+"%' ");


//
	String sCon="server=localhost;database=_hospital;uid=sa;pwd=;Trusted_Connection=yes";
	String sSql="";
	if(sWhereStr=="Where Unit<>'' ")
		sSql="select * from tb_DrugStore";
	else
		sSql="select * from tb_DrugStore "+sWhereStr;

	SqlConnection OCon=new SqlConnection(sCon);
	SqlCommand OCmd=new SqlCommand(sSql,OCon);
	OCmd.Connection.Open();
	SqlDataReader dr;
	dr=OCmd.ExecuteReader();

	String sValStr="";
	int nRow=0;
	while(dr.Read())
	{
		nRow++;
		sValStr+=(nRow.ToString()+"è");
		sValStr+=(dr["AutoId"].ToString()+"è");
		sValStr+=(dr["Name"].ToString()+"è");
		sValStr+=(dr["PYName"].ToString()+"è");
		sValStr+=(dr["Type"].ToString()+"è");
		sValStr+=(dr["BatchCode"].ToString()+"è");
		sValStr+=(dr["ToDate"].ToString()+"è");
		sValStr+=(dr["ProductAddress"].ToString()+"è");
		sValStr+=(dr["StoreCount"].ToString()+"è");
		sValStr+=(dr["ABType"].ToString()+"é");
	}

	dr.Close();
	OCon.Close();
	//
	idInputDrugMsgStr.Value=sValStr;

}
</script>
<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">
<!--
function _initBaoBiaoAskDrugMsg()
{
	parent._askConditionWndHide();
	//
	var htmlStr="<table bgcolor='#ffffff' width='943' border='1' cellpadding='0' cellspacing='0' style='border-collapse:collapse;' bordercolor='#009900'>  <tr align='center' bgcolor='#CDEDD2'>    <td width='66' height='25'>序号</td>    <td width='89'>药品ID号</td>    <td width='184'>药品名称</td>    <td width='73'>拼音码</td>    <td width='72'>类别</td>    <td width='96'>批号</td>    <td width='96'>有效期至</td>    <td width='95'>产地</td>    <td width='75'>库存量</td>    <td width='75'>类型</td>  </tr>";

	var str=idInputDrugMsgStr.value;

	var strSplit=str.split('é');
	for(i=0;i<strSplit.length;i++)
	{
		htmlStr+=("<tr>");
		var subStrSplit=strSplit[i].split('è');
		for(j=0;j<subStrSplit.length;j++)
		{
			htmlStr+=("<td align='center'>"+subStrSplit[j]+"</td>");
		}
	}
	htmlStr+="</table>";
	//
	parent.idTable.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="_initBaoBiaoAskDrugMsg()">
<INPUT TYPE="text" id="idInputDrugMsgStr" style="display:none;" runat="server"/>
</BODY>
</HTML>

⌨️ 快捷键说明

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