博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2008年10月21日

摘要: Public Function ufmRecordSet(ByVal bstrSQL As String) As Recordset Dim pcnnCn As New ADODB.Connection Dim precRS As New ADODB.Recordset If mstrConnect = "" Then MsgBox "连接字符串为... 阅读全文

posted @ 2008-10-21 17:54 佟艿芙 阅读(1065) 评论(0) 推荐(0)