📄 拷贝于 finddrug.asp

📁 这是个完整的SQL SEVER与asp.net结合的医院管理系统的源代码

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<%
dim drugs_pin,drugs_no,drugs_name
drugs_pin=Request("pinyinma")
drugs_no=Request("drug_no")

drugs_name=Request("name")
set conn=server.createobject("ADODB.connection") 
conn.open="driver={sql server};server=FF-CK1W5O4NH1L9;uid=s;pwd=123;database=hospital3;"
sql="select * from drug_info where drug_no='drugs_no' and drug_name='drugs_name' and drug_spell='drugs_pin'"
 set rs=conn.execute(sql)
 
form1.dan1.value=rs.("drug_no")
form1.dan2.value=rs("drug_name")
form1.dan3.value=rs("drug_spec")
form1.dan4.value=rs("whole_unit")
form1.dan5.value=rs("sale_unit")
form1.dan6.value=rs("in_price")
form1.dan7.value=rs("out_price")
form1.dan8.value=rs("trade_price")
form1.dan9.value=rs("drug_sort")
form1.dan10.value=rs("fee_sort")
form1.dan11.value=rs("drug_spell")
form1.dan12.value=rs("drug_pro_area")
form1.dan13.value-rs("deadline")
%>
</body>
</html>



















































































































































.
.

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -