壹佰网|ERP100 - 企业信息化知识门户

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 2428|回复: 3

[Domino C/S开发] [求助]Notes與VB通訊

[复制链接]
发表于 2005/6/13 16:30:33 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ: 83569622  。

您需要 登录 才可以下载或查看,没有帐号?注册

x
請教各位高手:
      如何實現用編寫VB AP,由User書入資料,再轉入到Notes相關db、套表裏面的域裏去!TKS!



[本贴已被 shuiyuanke 于 2005-6-13 17:11:06 修改过]
 楼主| 发表于 2005/6/15 20:13:18 | 显示全部楼层
自己頂一下!
我的測試代碼:
Private Sub Command1_Click()
    Dim session As New Domino.NotesSession
    Dim PublicNotesDb As New Domino.NotesDatabase
    Dim view As New Domino.NotesView
    Dim doc As Notesdocument.     session.Initialize
    Set PublicNotesDb = session.GetDatabase("[CN]=SHFX01/[O]=FANGXIN", "test.nsf")
    If PublicNotesDb Is Nothing Then
        MsgBox (" PublicNotesDb No OK!")
    Else
        MsgBox ("PublicNotesDb OK!")
    End If
    Set view = PublicNotesDb.GetView("test")
    Set doc = view.GetFirstdocument.     MsgBox doc.GetItemvalue("test001")(0)
End Sub
測試時會提示Set view = PublicNotesDb.GetView("test")這一行有錯誤!
如果將Set PublicNotesDb = session.GetDatabase("", "test.nsf")即用本機的Domino Server測試時沒有任何問題!請指教如何才能使代碼能夠操作遠程Domino Server上的數據庫!還請各位高手幫忙,TKS!
发表于 2009/5/26 08:56:04 | 显示全部楼层
我也在关注此问题,兄弟,我强烈帮顶。。。。
因为我的贴子在CSDN挂了几个论坛,几个月也没人理。。。
ERP100不会比CSDN差吧。。。
请全ERP100的朋友也一起帮忙。。。谢谢!!

同样的例子:http://www.yoke8.com/blog/post/266.html
请大家帮忙分析整个程序,各个部分的功能。。
发表于 2009/5/26 08:57:40 | 显示全部楼层
看到帖子的日期,有点失望了。。。ERP100真的如此。。。?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|小黑屋|手机版|壹佰网 ERP100 ( 京ICP备19053597号-2 )

Copyright © 2005-2012 北京海之大网络技术有限责任公司 服务器托管由互联互通
手机:13911575376
网站技术点击发送消息给对方83569622   广告&合作 点击发送消息给对方27675401   点击发送消息给对方634043306   咨询及人才点击发送消息给对方138011526

GMT+8, 2025/11/29 02:54 , Processed in 0.013417 second(s), 14 queries , File On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表