ASP网页设计一个存储历程完成拔出，更新，删除

在实现ERP等高端的ASP应用时，用户需要提供核心的经营资料，需要ASP商有很高的信用度。楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。拔出|存储历程1.数据表
CREATETABLE[Nta_our_travelco](
[travelco_id][int]IDENTITY(1,1)NOTFORREPLICATIONNOTNULL,
[travelco_name][varchar](80)COLLATEChinese_PRC_CI_ASNULL,
[travelco_linkman][varchar](20)COLLATEChinese_PRC_CI_ASNULL,
[travelco_phone][varchar](20)COLLATEChinese_PRC_CI_ASNULL,
[travelco_mobile][varchar](20)COLLATEChinese_PRC_CI_ASNULL,
[travelco_check][char](1)COLLATEChinese_PRC_CI_ASNULL,
[travelco_website][varchar](80)COLLATEChinese_PRC_CI_ASNULL,
[travelco_email][varchar](50)COLLATEChinese_PRC_CI_ASNULL,
[travelco_fax][char](20)COLLATEChinese_PRC_CI_ASNULL,
[travelco_address][varchar](200)COLLATEChinese_PRC_CI_ASNULL,
[travelco_intro][varchar](1000)COLLATEChinese_PRC_CI_ASNULL,
[travelco_TLicenseNo][varchar](30)COLLATEChinese_PRC_CI_ASNULLCONSTRAINT

[DF_Nta_our_travelco_travelco_TLicenseNo]DEFAULT(交不雅甲号),
[travelco_QLicenseNo][varchar](30)COLLATEChinese_PRC_CI_ASNULLCONSTRAINT

[DF_Nta_our_travelco_travelco_QLicenseNo]DEFAULT(品保(北)字号),
[travelco_ename][varchar](80)COLLATEChinese_PRC_CI_ASNULL,
[travelco_LicenseNo][varchar](10)COLLATEChinese_PRC_CI_ASNULL,
[travelco_AgentCEO][varchar](20)COLLATEChinese_PRC_CI_ASNULL,
[username][varchar](20)COLLATEChinese_PRC_CI_ASNULL,
[password][varchar](32)COLLATEChinese_PRC_CI_ASNULL,
CONSTRAINT[PK_Nta_our_travelco]PRIMARYKEYCLUSTERED
(
[travelco_id]
)ON[PRIMARY]
)ON[PRIMARY]
GO


2.存储历程
SETQUOTED_IDENTIFIEROFF
GO
SETANSI_NULLSOFF
GO

ALTERPROCEDURENta_our_travelco_Update
@actionint,
@travelco_idint=null,
@travelco_namevarchar(80)=null,
@travelco_linkmanvarchar(20)=null,
@travelco_phonevarchar(20)=null,
@travelco_mobilevarchar(20)=null,
@travelco_websitevarchar(80)=null,
@travelco_emailvarchar(50)=null,
@travelco_faxchar(20)=null,
@travelco_addressvarchar(200)=null,
@travelco_introvarchar(500)=null,
@travelco_TLicenseNovarchar(30)=null,
@travelco_QLicenseNovarchar(30)=null,
@travelco_enamevarchar(80)=null,
@travelco_LicenseNovarchar(10)=null,
@travelco_AgentCEOvarchar(20)=null,
@usernamevarchar(20)=null,
@passwordvarchar(32)=null,
@sessionidint=null,--办理员session
@password_md5varchar(32)
AS

if@action=1---偕行注册
begin
ifexists(select*fromNta_our_travelcowhereusername=@username)
select10--用户存在
else--用户不存在，疾速注册
begin
insertintoNta_our_travelco(
travelco_name,
travelco_linkman,
travelco_phone,
travelco_mobile,
travelco_website,
travelco_email,
travelco_fax,
travelco_address,
travelco_intro,
travelco_TLicenseNo,
travelco_QLicenseNo,
travelco_ename,
travelco_LicenseNo,
travelco_AgentCEO,username,password
)
values(
@travelco_name,
@travelco_linkman,
@travelco_phone,
@travelco_mobile,
@travelco_website,
@travelco_email,
@travelco_fax,
@travelco_address,
@travelco_intro,
@travelco_TLicenseNo,
@travelco_QLicenseNo,
@travelco_ename,
@travelco_LicenseNo,
@travelco_AgentCEO,@username,@password_md5
)
select1--注册乐成
end
end

if@action=2--偕行修正注册信息
updateNta_our_travelcoset
travelco_id=@travelco_id,
travelco_name=@travelco_name,
travelco_linkman=@travelco_linkman,
travelco_phone=@travelco_phone,
travelco_mobile=@travelco_mobile,
travelco_website=@travelco_website,
travelco_email=@travelco_email,
travelco_fax=@travelco_fax,
travelco_address=@travelco_address,
travelco_intro=@travelco_intro,
travelco_TLicenseNo=@travelco_TLicenseNo,
travelco_QLicenseNo=@travelco_QLicenseNo,
travelco_ename=@travelco_ename,
travelco_LicenseNo=@travelco_LicenseNo,
travelco_AgentCEO=@travelco_AgentCEO
where
travelco_id=@travelco_id
select2--更新乐成

if@action=3--考核偕行
if@sessionid=null
begin
select5--不是办理员ID，没法考核偕行
end
else
begin
updateNta_our_travelcoset
travelco_check=1
where
travelco_id=@travelco_id</p>Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来；