偷偷摘套内射激情视频,久久精品99国产国产精,中文字幕无线乱码人妻,中文在线中文a,性爽19p

簡單實現(xiàn)VB.NET打開Notes數據庫

開發(fā) 后端
VB.NET打開Notes數據庫的實現(xiàn),在程序開發(fā)中是一個比較重要的操作步驟。那么初學者們就應該在學習的過程中對數據庫的操作加強注意。

VB.NET編程語言可以幫助我們輕松的實現(xiàn)各種數據庫的操作,比如今天為大家介紹的VB.NET打開Notes數據庫這一方法,就可以通過本文介紹的方法輕松的實現(xiàn)。下面大家就一起來看看具體操作方法。#t#

一、前言

acerun: yes"> Visual Basic是微軟(中國)有限公司在中國力推的編程工具,它具有易學易用、編程簡潔、程序集成化程度高等特點。Lotus Notes是Lotus公司推出的群件系統(tǒng),它不僅僅是個應用軟件,更是一個開發(fā)平臺。

Notes數據庫是文檔型數據庫,它使用LotusScript編寫相應的代碼完成設計者的需求。LotusScript語法類似于Visual Basic的語法,兩者之間有什么聯(lián)系呢?如何使用 Visual Basic 應用與Notes數據之間進行交互呢?Visual Basic也能像在Notes中一樣輕松訪問Notes類。本文討論了使用Visual Basic 中訪問Notes類的方法。

二、設計VB.NET打開Notes數據庫思路

Visual Basic中可以通過OLE功能來使用Notes.NotesUIWorkspace 和 Notes.NotesSession訪問Notes類。使用CreatObject得到NotesUIWorkspace 和NotesSession對象。下面幾行Visual Basic代碼得到當前計算機上一個名為“testdb.nsf”的數據庫對象。

 

  1. Dim session As Object  
  2. Dim db As Obiect  
  3. Dim doc As Obiect  
  4. Set session = CreatObject
     (“Notes.NotesSession”)  
  5. Set db = session.Get
    Database(“”,”testdb.nsf”) 

 

要通過Visual Basic 在桌面上打開Notes 數據庫,應先得到NotesUIWorkspace對象,然后通過openDatabase 函數打開相應的數據庫即可。

1. 在 Visual Basic 中不能像在LotusScript 中那樣創(chuàng)建新的Notes對象,因此只能通過NotesUIWorkspace 和 NotesSession 這兩個頂類層訪問其他Notes對象。LotusScipt中的Notes類提供了一個非常完整的遍歷整個層次結構的方法,我們完全可以用這個方法得到任何需要的Notes類。

2. 在Visual Basic中所有的Notes變量都應聲明為Object類型。

3. 在Visual Basic 中訪問Notes類,首先Visual Basic必須與notes裝在同一臺計算機上。

4. 使用上面的方法打開notes數據庫時,會出現(xiàn)無法將notes窗口移到前端的情況。調用Windows API中的ShellExecute即可解決這個問題。

三、VB.NET打開Notes數據庫的程序實現(xiàn)

下面這段程序打開一個Notes數據庫并把它移到最前面,使用戶看到這個數據庫。

 

  1. Public Declare Funcrion Shell
    Execute Lib “Shell32.dll” Alias
     “ShellExecuteA”_  
  2. (byval hWnd As long, byval 
    IpOperation As String , byval 
    IpFile As String,_  
  3. Byval IpParameters As String, 
    byval IpDirectory As Long,_  
  4. Byval nShowCmd As Long ) As Long  
  5. ‘將Notes對象聲明為Object  
  6. dim session as object  
  7. dim uiWs as object  
  8. dim dbname as string  
  9. dim servername as string  
  10. dim iRet as integer  
  11. ‘在此填入你要打開的數據庫和服務器名  
  12. dbname = “ciphercipher.nsf”  
  13. servername = “rtpswgsserver”  
  14. ‘創(chuàng)建NotesSession 對象,如果Notes
    已經運行,這句程序將打開Notes窗口;
    如果沒有運行Notes,則啟動它  
  15. set session = CreateObject 
    (“Notes.NotesSession”)  
  16. ‘通過調用Windows API 函數使Notes
    窗口在前臺打開  
  17. iRet = ShellExecute(Me.hWnd,
    ”open”,”notes.exe”,vbNullString ,_  
  18. dummystring , SW_SHOWNORMAL)  
  19. ‘創(chuàng)建NotesUIWorkspace對象  
  20. set uiWs = CreateObject 
    (“Notes.NotesUIWorkspace”)  
  21. ‘打開數據庫  
  22. call OpenDatabase (servername , dbname)  
  23. ‘要以特定的視圖打開表單時使用  
  24. call OpenDatabase (servername , 
    dbname , “viewname”) 

VB.NET打開Notes數據庫的相關操作方法就為大家介紹到這里。

責任編輯:曹凱 來源: zdnet.com.cn
相關推薦

2010-01-12 10:40:58

VB.NET數據庫壓縮

2009-10-14 13:15:09

VB.NET數據綁定

2009-10-14 13:56:05

VB.NET數據窗體

2010-01-08 10:37:50

VB.NET數據庫

2009-10-13 17:31:50

VB.NET Acce

2009-10-28 17:08:57

VB.NET數據庫開發(fā)

2009-10-28 17:00:30

VB.NET數據庫

2009-10-16 13:26:53

VB.NET Exce

2009-10-09 15:20:26

VB.NET連接數據庫

2010-01-15 19:24:42

2009-10-28 16:47:26

VB.NET訪問數據庫

2009-10-13 09:33:49

VB.NET Web

2009-10-13 14:42:30

VB.NET靜態(tài)成員

2009-10-28 10:51:32

VB.NET默認屬性

2009-10-15 11:11:08

VB.NET Text

2009-11-04 09:32:12

VB.NET Auto

2009-10-15 16:39:00

VB.NET讀取INI

2009-10-30 11:20:54

VB.NET Proc

2009-10-12 13:19:14

VB.NET線程同步

2009-10-12 13:11:48

VB.NET使用線程
點贊
收藏

51CTO技術棧公眾號