第二次发贴：为何程序调用数据源为ODBC的水晶报表时，每次都提示要输入ODBC的密码？？？
来源：csdn
【我做了一个水晶报表，数据源为ODBC，
然后用程序调用这个报表，每次调用都弹出一个窗口，该窗口已经有ODBC的用户名，要我输入密码，为什么会这样，
怎么使这窗口不弹出来，直接打开水晶报表？？？？
我是在ERP中调用的，这个ERP叫Epicor，是基于.net（vb） 语法的，程序可以在ERP中编写，很多东西和.net的都不一样了，
'//**************************************************
'// Custom VB.NET code for ReceiptEntryForm
'// Created: 12/04/:30
'//**************************************************
Imports System
Imports System.Data
Imports System.Diagnostics
Imports System.Windows.Forms
ponentModel
Imports Microsoft.VisualBasic
Imports Epicor.Mfg.UI
Imports Epicor.Mfg.UI.FrameWork
Imports Epicor.Mfg.UI.ExtendedProps
Imports Epicor.Mfg.UI.FormFunctions
Imports Epicor.Mfg.UI.Customization
Imports Epicor.Mfg.UI.Adapters
Imports Epicor.Mfg.UI.Searches
Imports Epicor.Mfg.BO
Imports epicor.mfg.ui.inspectionprocessingentry
Module Script
'// ** Wizard Insert Location - Do Not Remove 'Begin/End Wizard Added Module Level Variables' Comments! **
'// Begin Wizard Added Module Level Variables **
'// End Wizard Added Module Level Variables **
'// Add Custom Module Level Variables Here **
dim host as string
dim company as string
dim port as string
dim conPro as string
Sub InitializeCustomCode()
'// ** Wizard Insert Location - Do not delete 'Begin/End Wizard Added Variable Initialization' lines **
'// Begin Wizard Added Variable Initialization
AddHandler RcvDtl_Column.ColumnChanged, AddressOf RcvDtl_AfterFieldChange
'// End Wizard Added Variable Initialization
'// Begin Wizard Added Custom Method Calls
AddHandler epiButton1.Click, AddressOf Script.epiButton1_Click
'// End Wizard Added Custom Method Calls
dim s as string= OTrans.Session.AppServer
host = Mid(s, InStrRev(s, "//") + 2, InStrRev(s, ":") - InStrRev(s, "//") - 2)
port = Strings.Right(s, Len(s) - InStrRev(s, ":"))
port = Mid(port, 1, 2) + CStr(Int(Mid(port, 3, 1)) + 5) + CStr(Int(Mid(port, 4, 1)) - 1)
'txtBillno.text=""
conPro="Driver={Progress OpenEdge 10.1C driver};DB=UID=PWD=HOST="+host+";PORT="+Port
Sub DestroyCustomCode()
'// ** Wizard Insert Location - Do not delete 'Begin/End Wizard Added Object Disposal' lines **
'// Begin Wizard Added Object Disposal
RemoveHandler epiButton1.Click, AddressOf Script.epiButton1_Click
RemoveHandler RcvDtl_Column.ColumnChanged, AddressOf RcvDtl_AfterFieldChange
'// End Wizard Added Object Disposal
'// Begin Custom Code Disposal
'// End Custom Code Disposal
Private Sub epiButton1_Click(ByVal sender As Object, ByVal args As System.EventArgs)
' ** Place Event Handling Code Here **
dim company as string
dim epidv_RcvDtl As EpiDataView = CType(oTrans.EpiDataViews("RcvDtl"), EpiDataView)
dim PackSlip as string
PackSlip=epidv_RcvDtl.dataview(0)("PackSlip")
Dim frm As New CrystalPrint.Form1
dim rptpath as string
rptpath ="\\"+host+"\Epicor904\report\receive_goods.rpt"
dim sql as string
sql = "select * from pub.RcvDtl " + _
" where PackSlip='"+ PackSlip + "'"
frm.PrintView("vantage",host, port, rptpath, sql)
frm = nothing
End Module】
1：这段代码对问题没什么帮助，关键性的 PrintView 事件没有贴出来
2：我在前一个帖子里给了你一个例子，你试过吗？
阿泰大侠，你那个例子和我这问题没什么联系，
阿泰大侠，几个月前就看过你那例子了，
阿泰大侠，几个月前就看过你那例子了，
Epicor 9 中如何通过ODBC取数据后调用水晶报表显示出来
humingshen:
数据源的问题!
免责声明：本站部分内容、图片、文字、视频等来自于互联网，仅供大家学习与交流。相关内容如涉嫌侵犯您的知识产权或其他合法权益，请向本站发送有效通知，我们会及时处理。反馈邮箱&&&&。
学生服务号
在线咨询，奖学金返现，名师点评，等你来互动查看:4698|回复：16
Windows Server 2003+SQL Server 2008
公司A地域控服务器(域名)使用的ERP数据库,拷到B地新的域控服务器(域名)上使用。全新安装非GHOST操作系统，都使用DATASERVER为服务器名称。SQL也是正常安装。SQL Server和Windows身份验证模式，sa用户或域管理员用户可正常打开SQL Server Management Studio,将数据库（ERPDB-DG)附加上去后可以查看、修改以前A地使用的数据（图1）。ERP程序也正常安装。
问题来了，设置好ERP客户端参数后测试连接OK（图2），但使用ERP用户却登录不了，出现以下提示（图3、4）：
连接失败：
SQLState:'08001'
SQL Server 错误：17
[DBNETLIB][ConnectionOpen (Connect()).]SQL Server 不存在或拒绝访问
度娘找了很久，上面基本上写的都是客户端连接不上SQL Server Management Studio的操作方法。。。
让人蛋疼的是以前有遇到这个问题，自己百度了很久偶然看到解决方法把问题解决了，但现在忘记是在哪个位置修改了一个参数就搞定，这两天一直找度娘，无果。
希望有过类似经历的兄弟能有提示，小弟在此谢过。
本帖最后由 nikezhou520 于
12:02 编辑
数据库开放远程访问了吗
另外图挂了看不到
&&职场人生交流QQ群
引用:原帖由 Call_me_Hover 于
09:39 发表
数据库开放远程访问了吗
另外图挂了看不到 我直接在服务器上使用ERP客户端登录的。
引用:原帖由 Call_me_Hover 于
09:39 发表
数据库开放远程访问了吗
另外图挂了看不到 配置管理器里有指定了1433端口。
(83.38 KB)
客户端连接问题的常见原因与对策
MCITP/MCSE/MCT/MVP&&SQL Server
那些年，我们一起追过的MS SQL Server
http://jimshu.
引用:原帖由 jimshu 于
10:49 发表
http://jimshu./5199
客户端连接问题的常见原因与对策 这些都没问题。
哪位高手有时间可以加我Q，帮我远程看看，谢谢！
你那个ERP程序是哪个年代的？
据你所言，你是把ERP客户端与SQL Server安装在同一台电脑上，这种情况下ERP不能访问SQL Server，我想不出还有什么可能的原因。
MCITP/MCSE/MCT/MVP&&SQL Server
那些年，我们一起追过的MS SQL Server
http://jimshu.
引用:原帖由 jimshu 于
14:37 发表
你那个ERP程序是哪个年代的？
据你所言，你是把ERP客户端与SQL Server安装在同一台电脑上，这种情况下ERP不能访问SQL Server，我想不出还有什么可能的原因。 ... 我这个ＥＲＰ是公司请人开发的，现在总公司这边正常使用着。
现在是把数据库拷到分公司使用。３月份刚装的时候也遇到这个问题，当时我是在百度找到方法，就是忘记是在数据库管理器里修改对应的数据包属性参数，还是在注册表里修改一个地方搞定的。原本是想着把总公司的历史数据清完后再作个备份的，结果弄完后重启服务器蓝屏，任何模式都进不去。叫同事按我下面的方法操作：
1、首先使用windowsPE进入到服务器电脑，备份C:\WINDOWS\system32\config\software这个文件
2、打开系统盘找C:\WINDOWS\repair\software这个文件
３、把该文件复制粘贴到C:\WINDOWS\system32\config目录下，将原software原文件替换掉，然后重启服务器能正常进入系统。第二天上班我远程过去发现原来的数据库原文件包没了，试过好多文件恢复方法，能找回Ｎ年前的资料，就是找不到数据包，无奈之下只有重新做服务器。
引用:原帖由 jimshu 于
14:37 发表
你那个ERP程序是哪个年代的？
据你所言，你是把ERP客户端与SQL Server安装在同一台电脑上，这种情况下ERP不能访问SQL Server，我想不出还有什么可能的原因。 ... 仔细想想也是不太可能呀，可为什么就是ＥＲＰ连不上。刚在ＯＤＢＣ里把数据源重新设一遍，再试一下ＥＲＰ登录，提示密码错误，真是激动人心呀，终于能联上去了。还是感谢大哥您，这问题我整整折腾了三天三夜了。把图片贴出来供参考吧。
１、我这个是域服务器，打开管理工具－数据源(ODBC)，在第二项系统DSN把自己的ERP数据源添加进来。选中数据源后配置，因为SQL服务器各项都正常，这里默认的我不更改直接下一步。（服务器那里可直接用IP或选择服务器名）如图１：
２、选择SQL　Server验证，输入用户及密码后再点击“客户端配置”，确保是使用TCP/IP以及非动态端口1433.其他我都是使用服务器IP。如图２
３、我这里更改默认数据库为我开始配置时选中的数据源对应的数据库，其他地方不作修改下一步至完成。点击数据源测试－－“成功”。图３－４
４、然后再试登录ERP，提示密码错误，证明已经成功连上服务器了。如图５.。。很奇怪，我装完SQL并且把数据库附加进来后，有在ODBC里设置数据源的，但为什么一直都不行，哪里出问题？百思不得其解。
(101.6 KB)
系统数据源添加上我的数据库
(100.88 KB)
客户端配置确认是TCP/IP并且端口是非动态1433
(60.54 KB)
默认数据库
(77.41 KB)
完成后数据源测试成功
(18.78 KB)
本帖最后由 nikezhou520 于
15:38 编辑
新问题，重启服务后，SQL都联不上了。
(53.72 KB)
现在服务器上的ERP能联上去了，但是同内网的电脑ERP联不上去。
真搞不懂怎么回事，服务器防火墙是已经关掉的，内网就是联不上。现在有个方法能使ERP客户端连接上。
客户端程序的连接地址设置成: “服务器IP，1433\SQL2008” 就可以了。
继续研究是否可以跟以前一样，客户端程序连接地址只要服务器IP就能连。
引用:原帖由 nikezhou520 于
11:06 发表
真搞不懂怎么回事，服务器防火墙是已经关掉的，内网就是联不上。现在有个方法能使ERP客户端连接上。
客户端程序的连接地址设置成: “服务器IP，1433\SQL2008” 就可以了。
继续研究是否可以跟以前一样，客户端程序连接地址只 ... 是不是NamedInstance？
Microsoft SQL Server MVP
引用:原帖由 nikezhou520 于
16:12 发表
新问题，重启服务后，SQL都联不上了。 错误号4064:无法打开用户默认数据库。登录失败。
可能是这个默认数据库不存在，或者这个用户没有这个默认数据库的访问权限
SQL Server MCITP, MVP, MCT, DBA
优秀技术经理
这是有多么古老的ERP
“无法打开用户默认数据库。登录失败。”
这么明显的提示，说明SQL Server身份验证已经通过，只是这个帐号对应的默认数据库不存在或者没有权限。
MCITP/MCSE/MCT/MVP&&SQL Server
那些年，我们一起追过的MS SQL Server
http://jimshu.加入找软件交流QQ群：一起聊聊找软件那些事
ERP系统真的能解决工厂五大不正常现象吗？
　　当今时代，在全球竞争激烈的大市场中，无论是流程式还是离散式的制造业，无论是单件生产、多品种小批量生产、少品种重复生产还是标准产品大量生产的制造；制造业内部管理都可能遇到以下一些问题：如企业可能拥有卓越的销售人员推销产品，但是生产线上的工人却没有办法如期交货，人员则抱怨说采购部门没有及时供应他们所需要的原料；实际上，采购部门的效率过高，仓库里囤积的某些材料10年都用不完，仓库库位饱和，资金周转很慢；许多公司要用6～13个星期的时间，才能计算出所需要得物料量，所以订货周期只能为6～13个星期；订货单和采购单上的日期和缺料单上的日期都不相同，没有一个是肯定的；财务部门不信赖仓库部门的数据，不以它来计算制造成本。　　不能否认，以上情况是工厂常出现的现象，具体可归纳为五类，然而，针对这五个现象，我们又能有什么有效的办法来解决它呢？这些都可通过ERP管理软件解决，不信你来看：　　现象1、盲目生产，料没来就先做已经来料了的产品。　　然而那些眼看交期快到了，物料还是无法如期而至，最后交货期到了，产品无法如期交货，只有走空运一条路，从中又增加了巨大的成大。然而仓货中却堆满了未到出货期的产品，仓库人员为了保管这些货是苦不堪言。这种现象在鞋厂就更为突出了，他们的鞋子出货时，饰扣都生锈了，皮也发霉了，给公司造成了巨大的损失。为什么会出现这一现象的，原因就是没有计划的生产。　　现象2、责任不清。　　很多企业管理人员，眼看着公司的效益提不上去，整天忙碌着各部门的监督工作，然而始终查不清楚是那个环节出了问题。　　在和客户谈讨的时候，高管们也只能望而叹息的说，公司的流程太乱，没办法理清。然而ERP可以解决这一问题，原因是ERP是环环相扣的，将各部门串联在一起，一个环节没做到位，下一个环节就没办法进行，从中就反应出了各部门人员对工作的负责态度。当上一个部门工作了以后，下一个部门无法工作时，管理者就很容易发现问题。举一个简单的例子，出货期越来越接近了，然后大货生产还没有进行，原因是什么呢？生产指令表（工单）没有到生产部，谁都不敢生产。生产指令表为什么没到生产部呢？原因是BOM没有出来，BOM为什么没出来呢？原因是技转的全套纸板没放出来，技转为什么放不出来呢？原因是开发的确认样没有打出来？这时候管理者就不难发现原来是开发出了问题，从中做正确的决策调整，及时的解决此问题。　　现象3、库存不清。　　走进仓库放眼望去，只看到堆积如山的物料，问仓库人员，你们这里都是些什么料，都有那些料，仓库人员不知如何回答，因为没有一个人员知道仓库的准确数量。这是因为工厂物料的叫法各异，生产部门拿着生指产指令表去领料，然而仓库却发现没有此料，又让采购购买此物料，然而仓库中该物料还有好几百码？等等这些现象的出现导致仓存的积压，因为没人能准确的知道库存，采购人员无法及时的了解到仓库的准确信息，无法将仓存及时的扣除。然而ERP却能觖决这一问题，ERP每个月强制要求做一次月结，做完月结，系统会清楚的告诉各部门，上个月各物料的库存是多少，本个月进、出了多少，还剩下多少，各种数据展现在大家而前。　　现象4、采购数据难管理。　　采购经理每个月要把各采购员的数据录入到EXCEL中，便于统计，这种打字工作相当费时，有时候加班到很晚才能把各数据统计进EXCEL中，还要担心电脑中毒问题。然而ERP又能解决这一问题，ERP及时的统计了各操作人员的数据，到月底，无论时想看那一位操作员的采购情况，还是整个部门的采购情况，只要5分钟就能把各种数据体现出来，比如：看张三的采购情况，只要输入张三就可以了，张三一个月或几个月的采购情况立刻出现在界面。ERP又解决了中毒的问题，因为ERP是基于B/S，各数据保留在服务器中，数据库每个月（自主设定时间）又会自动备份，从而又免除了害怕数据丢失这一恼心事。　　现象5、流程不顺，手工的随意性太大。　　然而ERP又能解决这方面的问题，因为ERP将各部门串联在了一起，环环相扣，将公司的业务流程固化到ERP中。最后ERP正运作时，各部门人员想不按流程走都不行，因为上一环节的工作没做好，下一环节将不能运作，这就是为什么ERP能整理工厂流程的原因。　　总之，能带来巨大的经济效益，据美国生产与库存控制学会APICS（美国生产与库存管理协会American　Inventory　Control　Society　Inc.创建于1957年）统计，使用一个MRPII/ERP系统，可时库存下降30％～50％、延期交货减少80％、采购提前期缩短50％、停工待料减少60％、制造成本降低12％、管理水平提高，管理人员减少10％，生产能力提高10％～15％。
相关软件推荐
找软件交流群
Brand authorization
The original guarantee
招商电话：
购买咨询：400-900-9878
增值电信业务经营许可证：京100262 京ICP备号 京公网安备17