<%response.expires =0
session("author")="ncaids"
if session("cdcuser")<>1 or session("chkuser")="" then
  response.redirect "index.asp"
end if
%>
<!--#include file="config.asp" -->
<%
keshiname=session("chkkeshi")
logonname=trim(request.form("logonnamesd"))
truename=trim(request.form("truenamesd"))
if logonname="" then 
   response.redirect "vip_keshigl.asp"
end if
if truename="" then
   response.redirect "vip_keshigl.asp"
else
	sql ="select * from viplist"
	openrs rs,sql,1,2	
	rs.addnew
	rs("vip_name")=logonname
	rs("truename")=truename
	rs("科室")=keshiname
	rs("vip_pwd")="000000"
	rs("新通知")=1
	rs.Update 
	rs.close
end if
response.redirect "vip_keshigl.asp"
%>