局域网络版设备管理程序vba+sql2000(奉送全部源码)

stgdlinqi · 发表于 2018-1-19 11:24

可不可以帮我们指导开发一个excel +sql server2012的

szkejing · 发表于 2018-2-4 11:12

下来学习一下！

Zidone · 发表于 2018-6-17 17:25

SQL2005或者2008R2可以用吗？

mfjc · 发表于 2018-7-15 15:50

下来学习一下！

asl725 · 发表于 2018-7-22 16:26

学习了！！！谢谢

powercord · 发表于 2018-10-25 23:51

2728911088 发表于 2016-9-8 19:08
大侠们帮忙看下，我的怎么用不了，感谢！！

同遇此问题，推测是数据库sql服务有个密码，没有加到代码中。待找方法。

eve21000 · 发表于 2018-12-10 11:35

楼主，表格的用户名和密码是多少呀，帮忙分享下，谢啦！

229657993 · 发表于 2019-3-24 15:04

谢谢楼主分享

duyong6730 · 发表于 2019-10-18 08:58

感谢分享，大神厉害

刘同更 · 发表于 2021-11-6 10:29

很学习一下老师代码，发现这个函数，未通过编译：
Public Function getid(str As String) As String
      Dim id As String, i As Integer
      Dim sql As String
      Dim rs As New ADODB.Recordset
      sql = "select * from " & str & " where fid=(select max(fid) from " & str & ")"
      Set rs = mtot.rssqlexecute(sql)
      i = rs.RecordCount    '运行到这句时，报错：类型不匹配。请各位老师看一下
      If i = 0 Then                                     ' 该如何修正，多谢指教！
         id = 1
      Else
         id = rs.Fields(0) + 1
      End If
      getid = id
End Function

		自动登录	找回密码
密码			免费注册

[原创] 局域网络版设备管理程序vba+sql2000(奉送全部源码)