?? modclass.asp
字號:
<!--#include virtual="manage/include/conn.asp"-->
<%
If Session("flag")<>1 Then
Response.Write "<script language=javascript>window.history.back();</script>"
Response.End()
End If
id=request.QueryString("Id")
action=request("action")
if id="" then
%>
<script language="javascript">
alert("請選擇類別名稱!");
setTimeout("window.close;",1);
</script>
<%
else
if action="mod" then
set rs0=conn.execute("select * from tb_MedicineType where TypeId="&id)
%>
<form action="/manage/goods/savemod.asp?Id=<%=id%>" method="post" name="form2" onsubmit="return chkfields();">
<input type="text" value="<%=rs0("TypeName")%>" name="TypeName" size="15" style="border:1px solid;border-color:000000">
<input type="submit" value="修 改" style="border:1px solid;border-color:#CC33FF;background-color:#CCff33" >
</form>
<%
end if
if action="del" then
set rs1=conn.execute("select * from tb_MedicineName where TypeId="&id)
if rs1.eof and rs1.bof then
set rs=conn.execute("delete from tb_MedicineType where TypeId="&id)
%>
<script language="javascript">
alert("刪除類別成功!");
setTimeout("window.close();",10);
opener.location.reload();
</script>
<%else%>
<script language="javascript">
alert("該類別已存在相對應(yīng)的藥品信息,請刪除藥品信息后再刪除該類別!");
setTimeout("window.close();",10);
</script>
<%end if
end if
end if
%>
<script language="javascript">
function chkfields(){
if(document.form2.TypeName.value==''){
alert("請?zhí)砑宇悇e名稱!");
form2.TypeName.focus();
return false;
}
return true;
}
</script>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -