1. 视图(View)查询 ... Set view = db.GetView("ViewName") Set doc = view.GetFirstDocument While Not doc Is Nothing ... Set doc = view.GetNextDocument(doc) Wend 2. NotesDocumentCollection 查询 1.文档处理 ... Dim dc As NotesDocumentCollection Set dc=db.Unpro…
CREATE PROCEDURE [dbo].[生成表结构数据库文档]ASBEGIN -- SET NOCOUNT ON added to prevent extra result sets from -- interfering with SELECT statements. SET NOCOUNT ON; -- Insert statements for procedure here SELECT 表名 = Case When A.colorder=1 Then D.name Else ''…