标题：金字塔可否从sql数据库读取数据？

金字塔可否从sql数据库读取数据？

参考 http://www.weistock.com/bbs/dispbbs.asp?boardid=5&Id=401&page=2

以及多参考 该高级研发区的精华帖子

可以的，使用VBA写，非常方便。

楼上可否给个例子或者推介一些资料？

public SqlConn

Sub ConnToSql()    '连接Sql Server数据库
 On Error Resume Next
 If SqlConn.CAdodb.Connection")
    SqlConn.Open "Provider=sqloledb;Server=" & SvrIP & ";Database=数据库名;Uid=用户名;Pwd=密码"
 End if
End Sub

 

'读取数据库中记录

Sub ReadData()

    strSql="Select AccountID,StartDate,EndDate,UserName From tblMyUser"
    strSql=strSql & " Where AccountID='" & AccountCode & "'"
    Set rstTmp=CreateObject("ADODB.RecordSet")
    ConnToSql
    rstTmp.Open strSql,SqlConn

    aa=rstTmp("AccountID")

End Sub

 

'执行Sql server存储过程

Sub RunProc()

    ConnToSql

    SqlConn.Execute "spTest "                '构筑参数字符串

    '如果直接执行语句可以这么写

    SqlConn.Execute "Update tblAccount Set AccountName='" & TestName & "'"

End Sub

 

赞一个