vb-adocd-excel 急SOS，在线等。分虽不高，已荡产~~

Question

第一次用数据库，实在是不会啊
我用VB做了个上位机界面实时采集数据，数据先写入excel但没有保存（用户选择保存才保存），同时通过adodc1把数据通过datagrid显示下面是建立的excel
  Set xlApp = CreateObject("Excel.Application")   'excel初始化
  Set xlBook = Nothing
  Set xlsheet = Nothing
  Set xlBook = xlApp.Workbooks().Add
  Set xlsheet = xlBook.Worksheets("sheet1")问题是我怎么通过adodc1连接到该数据库通过datagrid显示？希望有代码

Answer 1

我用VB做了个上位机界面实时采集数据，数据先写入excel但没有保存（用户选择保存才保存），同时通过adodc1把数据通过datagrid显示可否改成这样子：
1、采集数据
2、写入数据库
3、显示数据到DATAGRID上
4、同步显示数据到EXCEL
5、界面显示可选择项，保存或不保存EXCEL，退出时根据这个选择项，决定是否保存EXCELPS：DATAGRID显示的内容有限，超过三千行操作会很慢很慢

Answer 2

应该说数据已经写入excel,但excel没有保存
那么怎么通过adodc1连接到excel呢，绑定不是要指向文件的路径吗

Answer 3

我现在手动把数据直接写入MSHFlexGrid，方法是苯了点，但总算是解决了

Answer 4

数据先写入excel但没有保存   ????是采集数据没有保存到数据库中,还是这个EXCEL没有保存?
如果是没有保存到数据库中的话,就使用网格控件一条一条的显示在空件里面,
如果已经保存到数据库里面了,就把ADODC设置好,再设置网格控件的数据原设置上就OK了

Answer 5

我用最笨的方法解决了。ADODC实在是不会用啊
我现在改成
1，采集数据
2，显示在表格上
3，“保存”command,则建立excel，直接把表格里的数据读到excel内结帖了