问题描述
C/S下表单中有namegenderage三个域一个按钮输入name值点击按钮后运行代理ODBC连接数据库在数据库中得到该姓名人的genderage赋值给这两个域怎样才能点击按钮后genderage域显示出来值?DimworkspaceAsNewNotesUIWorkspaceDimuidocAsNotesUIDocumentDimconnAsNewODBCConnectionDimqryAsODBCQueryDimresultAsODBCResultSetDimsAsNewnotessessionDimdbAsnotesdatabaseSetdb=s.currentdatabaseDimdocAsNotesDocumentSetdoc=NewNotesDocument(db)Ifconn.ConnectTo("test","admin","password")ThenSetqry.Connection=connqry.SQL="select*fromuserswherename='q4279134'"'使用SQL语句来向数据源发送查询或其他操作Setresult.Query=qryCallresult.Execute()Doresult.NextRowSetdoc.gender=result.getValue("gender")Setdoc.age=result.getValue("age")LoopUntilresult.IsEndOfDataresult.Close(DB_CLOSE)Msgbox"sqldone"Callconn.Disconnect()'与数据源断开连接Msgbox"连接到数据库!"ElsePrint"Couldnotconnecttoserver"Msgbox"没有连接到数据库!"EndIfSetuidoc=workspace.CurrentDocumentCalluidoc.Refresh不管用呜呜
解决方案
解决方案二:
建议你先不要执行sQL取值,先直接取得Uidoc的Document,并用doc.age="dd"赋值,也不用Uidoc.refresh看看结果
解决方案三:
我已经解决了C/S下DimconnAsNewODBCConnectionDimqryAsODBCQueryDimresultAsODBCResultSetCallconn.Disconnect()Setqry=NewODBCQuerySetresult=NewODBCResultSetDimwsAsNewNotesUIWorkspace,sessionAsNewNotesSessionDimdbAsNotesDatabase,uidocAsNotesUIDocumentDimdocAsNotesDocumentSetdb=session.CurrentDatabaseSetuidoc=ws.CurrentDocumentSetdoc=uidoc.DocumentIfconn.ConnectTo("test","admin","PASSWORD")Then'数据源名Setqry.Connection=connqry.SQL="select*fromUSERwhereNAME='name'"'使用SQL语句来向数据源发送查询或其他操作Setresult.Query=qryCallresult.Execute()Doresult.NextRowdoc.gender=result.getValue("gender")LoopUntilresult.IsEndOfDataresult.Close(DB_CLOSE)Msgbox"sqldone"Callconn.Disconnect()'与数据源断开连接Msgbox"连接到数据库!"ElsePrint"Couldnotconnecttoserver"Msgbox"没有连接到数据库!"EndIfExitSubErrorHandler:MsgboxErl&"行Error"&Str(Err)&":"&Error$EndSub
解决方案四:
先是照你的做的有查了帮助搞出来了还是谢谢!
解决方案五:
没遇到过这种情况.
解决方案六:
不知,帮顶
解决方案七:
顶