毕业论文开发语言企业开发JAVA技术.NET技术WEB开发Linux/Unix数据库技术Windows平台移动平台嵌入式论文范文英语论文
您现在的位置: 毕业论文 >> 企业开发 >> 正文

lotus如何修改文档中的数据

更新时间:2013-11-12:  来源:毕业论文

文档中数据:
张三 13
李四 15
王五 18
然后有个按钮a,按钮a如何能达到把张三一列的13改为12?

update 表名 set 数值=12 where 姓名='张三'

方法1:
按钮的click事件调用javascript,document.all.xxx.value ="12"
按钮的click事件调用公式@SetField("域名";"12");
此方法只适用于以编辑模式打开的文档
方法2:
按钮的click事件调用公式@Command([ToolsRunMacro];"代理名") 通过运行LS代理修改文档的值
关键代码如下:

Dim tempdoc As NotesDocument Dim SearchKey() As String ReDim SearchKey(0) SearchKey(0) = Trim(doc.name(0)) '用张三做搜索关键字 Set view = db.GetView("视图名") '建个视图,第一列以姓名排序 Set vc = view.GetAllDocumentsByKey(SearchKey,true)  If Not tempdoc Is Nothing Then     Call tempdoc.Replaceitemvalue("域名","12")     tempdoc.fieldname = "12" end if
应该是Set tempdoc = view.GetDocumentByKey(SearchKey,true)

最直接的方式就是A按钮执行公式 @Command([EditDocument])
点击按钮A后,文档成为编辑状态,你自己手动去把13 改成 12 ,当然 13 必须在 可编辑域中才能被编辑。
然后再点按钮B,按钮B执行公式 @Command([FileSave])
用代理也可以,假设13在 "F_num" 域中.按钮A执行代理 @Command([ToolsRunMacro];"agxxx")

Sub Initialize Dim ss As New NotesSession Dim doc As NotesDocument Set doc=ss.DocumentContext '获得当前文档 doc.F_num(0) = "12" '假设F_num是文本 call doc.save(false,false) End Sub

设为首页 | 联系站长 | 友情链接 | 网站地图 |

copyright©youerw.com 优尔论文网 严禁转载
如果本毕业论文网损害了您的利益或者侵犯了您的权利,请及时联系,我们一定会及时改正。