|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
使用cdonts,可以发送、查看邮件,实现webmail的功能。结合wsh,可以实现对nt主机的管理,如nt用户管理、iis虚拟主机设置、exchange邮箱设置等等,就像管理本地机一样方便。用表格输入数据库了局是常有的事,表格有多层布局,外层是table再套tr(实践另有tbody),再套td,各td之间又大概互相影响,以是研讨一下ASP输入表格的算法仍是对照风趣的。
table是最外层元素,不轮回,利用就对照复杂了,先看只要一列的表格示例,我们以RecordSet工具rs为数据源,天生的了局保留在str中。
dimstr
str=""
dowhilenotrs.eof
str=str&"<tr><td>"&rs("fld")&"</td></tr>"
rs.MoveNext
loop
ifstr""then
str="<table>"&str&"</table>"
endif
一列的情形挺复杂的,毫无可圈可点的地方,多列就庞大多了,这个示例中我们以数组作为数据源。次要思索一行的开首、一行的开头、增补最初一行的列。
dimarr(3)
arr(0)=1
arr(1)=2
arr(2)=3
arr(3)=4
dimmaxColsCnt一行的最年夜列数
maxColsCnt=3
dimcolsCnt统共已天生了几列
colsCnt=0
dimstr
str=""
dimi
i=0
dowhilei<=UBound(arr)
ifcolsCntmodmaxColsCnt=0then
一行的开首
str=str&"<tr>"
endif
str=str&"<td>"&arr(i)&"</td>"
colsCnt=colsCnt+1
ifcolsCntmodmaxColsCnt=0then
一行的开头
str=str&"</tr>"
endif
i=i+1
loop
ifcolsCntmodmaxColsCnt0then
增补最初一行的列
dowhilecolsCntmodmaxColsCnt0
str=str&"<td> </td>"
colsCnt=colsCnt+1
loop
str=str&"</tr>"
endif
ifcolsCnt>0then
str="<table>"&str&"</table>"
endif楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。 |
|