ASP网站制作之Exchange Server关于文档属性扩大
asp，你就只能等着微软给你解决，它不乐意你就只好悲催。而且asp跑在windows服务器上，windows服务器跟linux比起来简直弱爆了！server1,自界说一个内容类如:urn:contentclasses:document1个中有自界说属性:Clicknumber
2,所建的文档的内容类界说为1的。
3,创建一个窗体注册
urn:schemas-microsoft-com:office:forms#contentclass为1创建的urn:contentclasses:document1
urn:schemas-microsoft-com:office:forms#cmd为*
urn:schemas-microsoft-com:office:forms#formurl为chkopen.asp
urn:schemas-microsoft-com:office:forms#executeurl为chkopen.asp
urn:schemas-microsoft-com:office:forms#bindingserver
4,list.asp
<%
FunctionAddQuotes(strValue)
ConstQUOTE=""""
AddQuotes=_
QUOTE_
&Replace(strValue,QUOTE,QUOTE"E)_
"E
EndFunction
DimcnnAsADODB.Connection
DimrstAsADODB.Recordset
DimurlFldAsString
DimstrSQLAsString
urlFld="http://aaa.com/fld1/"
Setcnn=CreateObject("ADODB.Connection")
Withcnn
.Provider="exoledb.datasource"
.OpenurlFld
EndWith
strSQL="Select"&_
AddQuotes("DAV:displayname")&","&_
AddQuotes("DAV:contentclass")&","&_
AddQuotes("Clicknumber")&","&_
AddQuotes("DAV:href")
strSQL=strSQL&_
"FROMSCOPE(SHALLOWtraversalof"&_
AddQuotes(urlFld)&")"
strSQL=strSQL&_
"WHERE"&AddQuotes("DAV:contentclass")&_
"=urn:contentclasses:document1"
strSQL=strSQL&_
"ORDERBY"&AddQuotes("DAV:displayname")
Setrst=CreateObject("ADODB.Recordset")
Withrst
.OpenstrSQL,cnn
EndWith
response.Write"<table>"
DoUntilrst.EOF
response.Write"<tr><tdwidth=200>"
%>
<ahref="../fld1/<%=rst.Fields("DAV:displayname")%>"></a>
<%
response.Write"</td></tr>"
rst.MoveNext
Loop
response.Write"</table>"
rst.Close
cnn.Close
Setrst=Nothing
Setcnn=Nothing
%>
5,chkopen.asp
<%
Dimrec
dimii
Dimcnn
DimstrUrl
strDataUrl=request.querystring("dataurl")
Setcnn=CreateObject("adodb.connection")
Withcnn
.Provider="exoledb.datasource"
.OpenstrDataUrl
EndWith
Setrec=server.CreateObject("adodb.record")
rec.OpenstrDataUrl,cnn,3adModeReadWrite
ii=rec.fields("Clicknumber")
rec.fields("Clicknumber")=ii+1
rec.fields.update
rec.close
%>
openitem........
运转list.asp
点击文件时挪用chkopen.asp使Clicknumber+1同时翻开该文件.其URL由strDataUrl=request.querystring("dataurl")完成.
强大的可扩展性。ASP具有强大的扩展性，可以实现与多种网络、硬件设备的连接：通过专用的通讯线路远程接入企业；通过远程拨号服务器为远程拨号客户提供服务；通过WAP为移动电话互联网客户服务。 学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点: 另外因为asp需要使用组件，所以了解一点组件的知识(ADODB也是组件) 完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: 多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。 完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。 ASP（ActiveServerPages）是Microsfot公司1996年11月推出的WEB应用程序开发技术，它既不是一种程序语言，也不是一种开发工具，而是一种技术框架，不须使用微软的产品就能编写它的代码，能产生和执行动态、交互式、高效率的站占服务器的应用程序。 接下来就不能纸上谈兵了，最好的方法其实是实践。实践，只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好，因为你还没有熟练的能力去综合各种技术，这样只能使你自己越来越迷糊。
页:
[1]