lotus模糊查询

原创 2007年09月28日 16:16:00

 

我这个是有 louts 代理写的一个模糊查询的函数
这是我今天花了半天的时间才搞顶的。感觉网上信息少了点,就贴出来了,呵呵……

1。首先 弹出对话框 ,用户在该对话框中 输入要查询的用户名字
2。获得输入信息,然后在数据库中 进行模糊查询
3。关键是查询语句(文中黑体字所示),他语句大家可以不管
4。其代码如下

Sub Initialize 
 
 '定义变量
 Dim workspace As New NotesUIWorkspace
 Dim response As Variant '获取用户输入数据
 Dim dialogBox As String  'messagebox的标题
 Dim userName As String '示例的用户名
 Dim seach_userName As String '具体进行搜索的用户名
 '指定数据库
 Dim db As New NotesDatabase("devserver1/Demo/HZSZF/CN","esoa/document/fileinner.nsf")
 Dim collection As NotesDocumentCollection
 Dim count_read As Integer
 Dim count_noread As Integer
 '初始化变量
 count_read=0
 count_noread=0
 userName = "曹胜男"
 dialogBox = "查询结果"
 
 
 '跳出一个prompt,让用户输入 名字 ,按确定后进行查询
 response = workspace.Prompt (PROMPT_OKCANCELEDIT,"输入名称", "例如:"+userName, username)
 '根据输入情况,进行处理 
 If Isempty (response) Then'用户点击,取消 按钮
  Messagebox  "你没有进行查询!", , dialogBox
 Elseif  response="请输入你要统计的人员名称" Or response="" Then'用户点击,取消 按钮
  Messagebox  "请输入人员名称!", , dialogBox
 Else
  username=response
  
  '设置查询语句,查询的是 已读信息
  '其中视图为:FileReceive_Form;查询条件为:该视图中的browserQueryOS中含有 username
  searchFormula = |Form = "FileReceive_Form" & @contains(browserQueryOS;"|+username+|")|
  Set collection = db.Search(searchFormula,Nothing,0) 
  count_read=collection.Count
  
  searchFormula = |Form = "FileReceive_Form" & @contains(browserPostOS;"|+username+|")|
  Set collection = db.Search(searchFormula,Nothing,0)
  count_noread=collection.Count
  
  '输出结果
  Messagebox userName &" 已读:" & count_read & "件 未读:" & count_noread & "件", , dialogBox
  
  
 End If
 
End Sub 

SQL 多字段模糊匹配关键字查询

http://www.west.cn/info/html/wangluobiancheng/Mssql/20080505/72303.html 我们开发数据库应用时,常常需要用到模糊...

ztree模糊查询

  • 2017年09月12日 09:27
  • 834KB
  • 下载

类似百度搜索时的模糊查询

AutoCompleteExtender提供了类似百度的模糊查询列表 小弟使用它搞了一个“根据用户已经输入的内容”列表中列出从数据库中获得模糊查询的需求(由于刚开始接触Js,大家体谅了啊) 仅仅是...

全库模糊查询

  • 2016年01月18日 16:09
  • 794B
  • 下载

模糊查询的例子

  • 2014年03月21日 11:09
  • 310KB
  • 下载

基于HTML5 Bootstrap搭建的后台模板,分页,模糊查询已经全部JS实现,无需编码,嵌入数据即可开发,内置8款皮肤,欧美风格,非常好用!

基于HTML5 Bootstrap搭建的后台模板,分页,模糊查询已经全部JS实现,无需编码,嵌入数据即可开发,内置8款皮肤,欧美风格,非常好用! 源代码下载地址:http://www.zuidaima...

无刷新模糊查询

  • 2013年07月09日 11:17
  • 4KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:lotus模糊查询
举报原因:
原因补充:

(最多只允许输入30个字)