📄 baobiao.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 sSelectedDate = Request.QueryString["date"].ToString();//
String sDepartment=Request.QueryString["department"].ToString();
//
String sCon="server=localhost;database=_hospital;uid=sa;pwd=;Trusted_Connection=yes";
String sSql="SELECT SUBSTRING(CONVERT(varchar(10), TBA.AutoDate, 112), 7, 2) AS Expr0,";
sSql+="SUM(WMedicine) AS Expr1,";
sSql+="SUM(CWMedicine) AS Expr2,";
sSql+="SUM(CMedicine) AS Expr3,";
sSql+="SUM(Material) AS Expr4,";
sSql+="SUM(Diagnosis) AS Expr5,";
sSql+="SUM(Examine) AS Expr6,";
sSql+="SUM(Inspection) AS Expr7,";
sSql+="SUM(BWaveExamine) AS Expr8,";
sSql+="SUM(Cardiogram) AS Expr9,";
sSql+="SUM(XRay) AS Expr10,";
sSql+="SUM(Treatment) AS Expr11,";
sSql+="SUM(Nurse) AS Expr12,";
sSql+="SUM(Bed) AS Expr13,";
sSql+="SUM(Surgery) AS Expr14,";
sSql+="SUM(Register) AS Expr15,";
sSql+="SUM(Others) AS Expr16,";
sSql+="SUM(Total) AS Expr17";
sSql+=" FROM tb_ExpenditureReg TBA,tb_Doctor TBB WHERE (SUBSTRING(CONVERT(varchar(10), TBA.AutoDate, 112), 1, 6) = '"+sSelectedDate+"' and PayFlag='y' and TBB.AutoId=TBA.DoctorId and TBB.OfficeDepartment='"+sDepartment+"') GROUP BY SUBSTRING(CONVERT(varchar(10), TBA.AutoDate, 112), 7, 2)";
SqlConnection OCon=new SqlConnection(sCon);
SqlCommand OCmd=new SqlCommand(sSql,OCon);
OCmd.Connection.Open();
SqlDataReader dr;
dr=OCmd.ExecuteReader();
idStr.Value="";
int i=0;
String sFieldName="";
while(dr.Read())
{
for(i=0;i<17;i++)
{
sFieldName="Expr"+i.ToString();
idStr.Value+=(dr[sFieldName].ToString()+"è");
}
sFieldName="Expr"+i.ToString();
idStr.Value+=(dr[sFieldName].ToString()+"é");
}
dr.Close();
OCon.Close();
//
}
</script>
<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">
<!--
function _initBaoBiao()
{
parent._callShowBaoBiaoTable(idStr.value);
}
//-->
</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="_initBaoBiao()">
<INPUT TYPE="text" id="idStr" style="display:none;" runat="server"/>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -