访问数据库代理

原创 2006年05月30日 16:51:00

Sub Initialize
 Dim con As New odbcconnection
 Dim qry As New odbcquery
 Dim result As New odbcresultset
 Dim ss As New  notessession
 Dim db As notesdatabase
 Dim docA,docB As notesdocument
 Dim Empid As String
 Dim sql As String
 Dim publick As Integer
 
 On Error Goto errorHandler
 
 Set docA=ss.documentcontext
 
 
 Set db=ss.currentdatabase
 
 Set docA=ss.documentcontext
 
 Set qry.Connection = con
 Set result.Query = qry
 
 
 If Not con.ConnectTo("ハセンヤエテ﨤ニ") Then
  Print "イサトワチエスモオスハセンヤエ」ャーエ" & "<a href=history.go(0)> " & "ユ簑・/a>" & "キオサリ" 
  
  Exit Sub
 End If
  
          'ユ簑・ヌミ゙クト
         qry.SQL = "update administrator.Remind set READ=1 where DID="&"'"&docA.parentID(0)&"'"&" and                                        person="&"'"&docA.username(0)&"'"
 
 result.Execute
 
 result.UpdateRow
 
 result.Close(DB_CLOSE)
 con.Disconnect
 
 
 Exit Sub
errorHandler:
 Print result.GetExtendedErrorMessage,, result.GetErrorMessage
 Exit Sub

 

ユ篋エオスエ惕昉トoptionsタ・
Uselsx "*LSXODBC"

代理模式设计只能内网访问线上数据库

CleverCode最近在看代理模式。 1 模式介绍    在直接访问对象时带来的问题,比如说:要访问的对象在远程的机器上。在面向对象系统中,有些对象由于某些原因(比如对象创建开销很大,或者某些操作需...

外网代理连接数据库

  • 2017年11月14日 11:24
  • 12.14MB
  • 下载

SQL自动异地备份、删除、还原数据库(利用代理作业)

--备份脚本 /*xp_cmdshell 设置改为开启*/ EXEC sp_configure N'show advanced options', N'1' RECONFIGURE WITH...

通过ls代理压缩数据库

  • 2017年01月11日 19:19
  • 762B
  • 下载

数据库代理系统

  • 2014年06月12日 14:53
  • 64KB
  • 下载

[转] 淘宝数据库分布式代理层TDDL剖析

TDDL淘宝根据自己的业务特点开发了TDDL(Taobao Distributed Data Layer 外号:头都大了 ©_Ob)框架,主要解决了分库分表对应用的透明化以及异构数据库之间的数据复制,...

java 服务代理及数据库使用

  • 2016年05月19日 23:22
  • 54.81MB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:访问数据库代理
举报原因:
原因补充:

(最多只允许输入30个字)