518
社区成员
- 主页
...全文
请发表友善的回复…
发表回复
csouth 2003-04-01
用regsvr32是可以注册使用nlsxbe.dll的,但在你的VB脚本中创建NOtesSession对象链接到服务器时要求要有ID认证,就是要求客户端有user.id文件,所以还是要装notes,你的办法是行不通的．换一种思路做吧
xlwy 2003-03-26
mark
ijianbo 2003-02-25
up
ijianbo 2003-02-24
我知识想参照下面的做法：
http://www.csdn.net/Develop/Read_Article.asp?Id=16973
通过Domino COM实现Web的痕迹保留设计思路 davidnim（原作）
关键字 痕迹保留
总体思路：
实现步骤：
1，客户端注册NOTES COM控件。（
regsvr32 c:\lotus\notes\DOMOBJ.TLB）
regsvr32 c:\lotus\notes\nlsxbe.dll
2，在公文数据库中，保存一些已经定制好的公文模板。已供新建公文时使用。
3，表单上加入VBScript将附件从服务器拆离到本地，然后起用WORD。(Word的宏安全性设为中)
4，公文模板中，WORD的文档的退出事件中加入VBA代码，实现文件上传到服务器。
注：为避免启动COM时出现提示口令输入框，可以通过API制作一个DLL来避开。(参考：API例子的)
相关代码：
表单上的VBScript代码：
<SCRIPT LANGUAGE="VBScript">
Sub Button1_OnClick
dim s, dir, db, doc, eo, no, word, worddoc
Set s = CreateObject("Lotus.NotesSession")
Call s.Initialize
Set db = s.GetDatabase("sh_server","intranet\webtemp.nsf")
Set doc = db.getDocumentByUNID("30C11B03D279463548256C7D000DDD74")
Set eo = doc.getAttachment("普通公文.doc")
Call eo.ExtractFile( "C:\Temp\test.doc")
'Create the Word object:
Set word = CreateObject("Word.Application") 'Create Word object
Call word.documents.open( "C:\Temp\test.doc" )
Set worddoc = word.activedocument 'Get a handle for the active document
word.visible = True
'Call eo.remove
'Set ritem = doc.getFirstItem("rtfAttachment")
'Set no = ritem.EmbedObject(1454, "" , "C:\Temp\test.doc" )
'Call doc.save(True,False)
'MsgBox db.filename + " & " + db.server,, "Databases on " + db.server
End Sub
</SCRIPT>
表单上的按钮代码：
<INPUT NAME="Button1" TYPE="BUTTON" VALUE="编辑正文">
Word模板上的VBA代码：
Private Sub Document_Close()
ActiveDocument.Save
Dim s, dir, db, doc, eo, no, word, worddoc
Set s = CreateObject("Lotus.NotesSession")
Call s.Initialize
Set db = s.GetDatabase("sh_server", "intranet\webtemp.nsf")
Set doc = db.GetDocumentByUNID("C47E90193C0E4D3248256C780006A73E")
Set eo = doc.GetAttachment("普通公文.doc")
Call eo.Remove
Set ritem = doc.GetFirstItem("rtfAttachment")
Set no = ritem.EmbedObject(1454, "", "C:\Temp\test.doc")
Call doc.Save(True, False)
MsgBox db.FileName + " 文件已上传至服务器！& " + db.Server, , "Databases on " + db.Server
End Sub
所以，我不想在客户端安装client（因为我发现，只有安装了client才可以注册nlsxbe.dll，否则无法注册！），就直接使用ie把数据库的doc文档下载到本地，处理后再上传！
http://www.csdn.net/Develop/Read_Article.asp?Id=16973
通过Domino COM实现Web的痕迹保留设计思路 davidnim（原作）
关键字 痕迹保留
总体思路：
实现步骤：
1，客户端注册NOTES COM控件。（
regsvr32 c:\lotus\notes\DOMOBJ.TLB）
regsvr32 c:\lotus\notes\nlsxbe.dll
2，在公文数据库中，保存一些已经定制好的公文模板。已供新建公文时使用。
3，表单上加入VBScript将附件从服务器拆离到本地，然后起用WORD。(Word的宏安全性设为中)
4，公文模板中，WORD的文档的退出事件中加入VBA代码，实现文件上传到服务器。
注：为避免启动COM时出现提示口令输入框，可以通过API制作一个DLL来避开。(参考：API例子的)
相关代码：
表单上的VBScript代码：
<SCRIPT LANGUAGE="VBScript">
Sub Button1_OnClick
dim s, dir, db, doc, eo, no, word, worddoc
Set s = CreateObject("Lotus.NotesSession")
Call s.Initialize
Set db = s.GetDatabase("sh_server","intranet\webtemp.nsf")
Set doc = db.getDocumentByUNID("30C11B03D279463548256C7D000DDD74")
Set eo = doc.getAttachment("普通公文.doc")
Call eo.ExtractFile( "C:\Temp\test.doc")
'Create the Word object:
Set word = CreateObject("Word.Application") 'Create Word object
Call word.documents.open( "C:\Temp\test.doc" )
Set worddoc = word.activedocument 'Get a handle for the active document
word.visible = True
'Call eo.remove
'Set ritem = doc.getFirstItem("rtfAttachment")
'Set no = ritem.EmbedObject(1454, "" , "C:\Temp\test.doc" )
'Call doc.save(True,False)
'MsgBox db.filename + " & " + db.server,, "Databases on " + db.server
End Sub
</SCRIPT>
表单上的按钮代码：
<INPUT NAME="Button1" TYPE="BUTTON" VALUE="编辑正文">
Word模板上的VBA代码：
Private Sub Document_Close()
ActiveDocument.Save
Dim s, dir, db, doc, eo, no, word, worddoc
Set s = CreateObject("Lotus.NotesSession")
Call s.Initialize
Set db = s.GetDatabase("sh_server", "intranet\webtemp.nsf")
Set doc = db.GetDocumentByUNID("C47E90193C0E4D3248256C780006A73E")
Set eo = doc.GetAttachment("普通公文.doc")
Call eo.Remove
Set ritem = doc.GetFirstItem("rtfAttachment")
Set no = ritem.EmbedObject(1454, "", "C:\Temp\test.doc")
Call doc.Save(True, False)
MsgBox db.FileName + " 文件已上传至服务器！& " + db.Server, , "Databases on " + db.Server
End Sub
所以，我不想在客户端安装client（因为我发现，只有安装了client才可以注册nlsxbe.dll，否则无法注册！），就直接使用ie把数据库的doc文档下载到本地，处理后再上传！
ijianbo 2003-02-24
up
ijianbo 2003-02-21
up
junesmily 2003-02-21
那不需要在客户端注册啊
难道，你还打算安装在client上？？？
在服务器上安装、注册
在要用到的地方，做代理调用，方法声明也在代理里。
难道，你还打算安装在client上？？？
在服务器上安装、注册
在要用到的地方，做代理调用，方法声明也在代理里。
ijianbo 2003-02-19
up
ijianbo 2003-02-18
没人可以帮我么？
ijianbo 2003-02-18
我就是用regsvr32命令，在无法注册注册使用nlsxbe.dll
ijianbo 2003-02-18
我的意思是服务器还是安装domino
但客户端不装notes，在b/s下通过nlsxbe.dll来访问domnio的数据库！
但客户端不装notes，在b/s下通过nlsxbe.dll来访问domnio的数据库！
outwindow 2003-02-18
nlsxbe.dll本身是对DOMINO/NOTES的二次开发包，没有domino你要它干吗呀。
即使你是开发B/S应用，开发客户端也还是需要安装NOTES。
即使你是开发B/S应用，开发客户端也还是需要安装NOTES。
wandyhui 2003-02-17
用regsvr32注册
lsh22 2003-02-17
一般Dll的注册你可以用reg..32.exe(你可以在查找一下,记的不清楚)
然后用这个命令加 Dll的路径即可...
不知道帮没帮上你....
然后用这个命令加 Dll的路径即可...
不知道帮没帮上你....