|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同,ASP拥有应用系统所有权,用户拥有使用权,应用系统集中放在ASP的数据中心中,集中管理,分散使用,以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务,实现规模效益。函数|语句<!--#includefile="conn.asp"-->
<html>
<head>
<title>UntitledDocument</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
</head>
<body>
<%Dimrs,sql,rsname
setrs=server.createobject("adodb.recordset")
onerrorresumenext
sql="select*fromyour_table"
rs.Opensql,conn
rsname=RS(0).name
fori=1toRS.Fields.Count-1
rsname=rsname&chr(9)&RS(i).name
rsname=rsname&","&RS(i).name
next
rsname=rsname&chr(13)
rs.close
setrs=nothing
conn.close
setconn=nothing
Functione(w)
Dimh
Dimmy_array,my_array1
my_array=Split(w,",")
my_array1=Split(w,",")
Dimi
Fori=0ToUBound(my_array)
my_array(i)=my_array(i)&"="&chr(39)&chr(34)&Chr(38)&my_array(i)&chr(38)&chr(34)&Chr(39)
Next
Fori=0ToUBound(my_array)
my_array1(i)=chr(39)&chr(34)&Chr(38)&my_array1(i)&chr(38)&chr(34)&Chr(39)
Next
e="<P>"&w&"<p>"&"update:"&"<br>"&"updateyour_tableset"&Join(my_array,",")&"where前提"&"<p>"&"insert:"&"<br>"&"insertintoyour_table("&w&")values("&Join(my_array1,",")&")"
EndFunction
response.writee(rsname)%>
</body>
</html>
</p>ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用 |
|