jiaofeimodifydb.aspx

来自「医院进行药品进货,划价,派单等功能的系统」· ASPX 代码 · 共 48 行

ASPX

48 行

<%@ 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;
	sSheetId=Request.QueryString["sheetid"].ToString();
	String sPrinted;
	sPrinted=Request.QueryString["printed"].ToString();

	if(sPrinted=="y")
	return;

	String sCon="server=localhost;database=_hospital;uid=sa;pwd=;Trusted_Connection=yes";
	String sSql="";
	sSql="Update tb_ExpenditureReg set PayFlag='y' where AutoId="+sSheetId;
	SqlConnection OCon=new SqlConnection(sCon);
	SqlCommand OCmd=new SqlCommand(sSql,OCon);
	OCmd.Connection.Open();
	OCmd.ExecuteNonQuery();

	sSql="Update TBA Set TBA.StoreCount=TBA.StoreCount-TBB.DrugUseContent from tb_DrugStore TBA,tb_DrugUse TBB Where TBA.AutoId = TBB.DrugId AND TBB.ToExpenditureRegId = '"+sSheetId+"'";
	OCmd=new SqlCommand(sSql,OCon);
	OCmd.ExecuteNonQuery();

	OCon.Close();
}
</script>
<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">
<!--
function _initModifyDB()
{
	parent._onMoneyItemTableWndHide();
	parent._changeItemFace();

	alert("--- 缴费成功！---");

}
//-->
</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="_initModifyDB()">
</BODY>
</HTML>

jiaofeimodifydb.aspx - 源码说明

本页面展示了「医院进行药品进货,划价,派单等功能的系统」中的 jiaofeimodifydb.aspx 源码文件，采用 ASPX 编程语言编写，共 48 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与医院管理系统相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?