基于ASP技术开发Web数据库检索程序
出处:论文网
时间:2007-01-18
’输出该数据库中满足条件的记录个数:
There are " & Str$(collection.Count) & " matching
documents
’下列循环从满足条件的记录集中读取记录并输出:
For i% = 1 To collection.Count
Set MatchDoc = collection.GetNthDocument(i%)
’如果文档包含Subject或Title,则输出Subject或Title:
Set item =MatchDoc.GetFirstItem( "Subject" )
If ( item Is Nothing ) Then
Set item = MatchDoc.GetFirstItem( "Title" )
End If
If Not (item Is Nothing) Then
" & item.Name & ": & item.Text
End If
’如果文档包含Categories,则输出Categories:
Set item = MatchDoc.GetFirstItem( "Categories" )
If Not (item Is Nothing) Then
Print item.Name & ": " & item.Text
End If
’输出文档产生日期和作者:
createDate = MatchDoc.Created
Document create date: &createDate
Authors:
Forall aAuthor In MatchDoc.Authors
Print aAuthor
End Forall
Next
Next
Out:
Exit Sub
EmptyQuery:
Search query can not be empty
Resume Out
BadQuery:
Query is not understandable: " & doc.Query(0) & {"
Resume Out
End Sub
5 总 结
5.1 Web服务的应用越来越广,其数据索引也随之有增无减。同时,在编写Web数据库检索代码时,既要考虑其安全性,又要确保应用的高质量,致使及时开发相应的数据库检索程序越来越迫切。
5.2 ASP技术是中小型自主开发网上数据库服务系统工具。本文从Web网上数据库检索系统的设计出发,探讨了如何利用ASP技术进行有效的网上数据库检索系统的开发利用,具有较强的现实意义。
参考文献:
[1] 刘云生.数据库设计与分析[M].武汉:华中理工大学出版社,1993.
[2] 严蔚敏,吴伟民.数据结构[M].北京:清华大学出版社,2001.
[3] 郑若忠,宁洪.数据库原理[M].湖南:国防科技大学出版社,1998.
[4] 李大友.数据库原理及应用[M].北京:清华大学出版社,1993.
- 上一篇:子网掩码与子网划分
- 下一篇:浅谈校园网安全控制策略