关闭

Excel VBA循环访问SQL Server的错误80004005

标签: sql serverexcelvbainsert服务器sql
2145人阅读 评论(0) 收藏 举报

ExcelADO来访问SQL Server 2000,程序在本地的时候,没有任何问题。但是在一个局域网内,做如下的Insert循环的时候,在n=66时客户端始终出现下面问题,而且修改原是需要插入的数据,总是在n=66时出现。

While (Sheets(1).Cells(n, 1).Value2 <> "" Or Sheets(1).Cells(n, 2).Value2 <> "")

            strSQL = "insert into h_khdj (khbh, khmc) values (" + _

                        "'" + CStr(Sheets(1).Cells(n, 1).Value2) + "'," + _

                        "'" + CStr(Sheets(1).Cells(n, 2).Value2)

            cmdTD.CommandText = strSQL           

             Set rsResult = cmdTD.Execute

             n = n + 1

        Wend

 

       我的直觉是服务器端的什么资源用完了。我朋友的服务器是个很破的机器,因此可以理解。

       后来,通过http://support.microsoft.com/defaul...4&Product=sql2k,通过修改ConnectString,增加DB Services= -2选项即可解决。

0
0

猜你在找
【直播】机器学习&数据挖掘7周实训--韦玮
【套餐】系统集成项目管理工程师顺利通关--徐朋
【直播】3小时掌握Docker最佳实战-徐西宁
【套餐】机器学习系列套餐(算法+实战)--唐宇迪
【直播】计算机视觉原理及实战--屈教授
【套餐】微信订阅号+服务号Java版 v2.0--翟东平
【直播】机器学习之矩阵--黄博士
【套餐】微信订阅号+服务号Java版 v2.0--翟东平
【直播】机器学习之凸优化--马博士
【套餐】Javascript 设计模式实战--曾亮
查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:26433次
    • 积分:399
    • 等级:
    • 排名:千里之外
    • 原创:15篇
    • 转载:0篇
    • 译文:0篇
    • 评论:2条
    文章分类
    最新评论