| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1111 人关注过本帖
标题:有关导入、导出和修改,删除表请GGJJ们指点!!
取消只看楼主 加入收藏
MM0929
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-4-29
收藏
 问题点数:0 回复次数:2 
有关导入、导出和修改,删除表请GGJJ们指点!!

在下用Delphi7+SQL Server 2000编一小程序,对SQL有一定基础,刚接触学D7大概10天
想通过如图的“清空表”这个按钮把SQL数据库表清空,通过“导入表”按钮把*.txt格式或者*.xls格式的表导入到SQL表,经过处理后的表通过“另存为”按钮保存为Excel表格。现在的问题是“清空表”这个按钮根据书里学的知识已经编好代码,但运行有错,“导入和导出”按钮不知道怎么做,请高手帮看看我写的“清空表”按钮代码错在哪?还有“导入和导出”到底用到那些知识,如详细告诉步骤更好,在此感激不尽!!!!!


unit Unit11;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB, Grids, DBGrids, StdCtrls, Buttons;

type
TForm1 = class(TForm)
ADOConnection1: TADOConnection;
DBGrid1: TDBGrid;
DataSource1: TDataSource;
BitBtn1: TBitBtn;
Button1: TButton;
ADOQuery1: TADOQuery;
Button2: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
with ADOQuery1 do
begin
Close;
with SQL do
begin
clear;
Add('delete from mmbb');
end;
ExecSQL;
end ;
end;
end.

运行“清空表”时错误提示为:

“Access violation at address 1F487CAB in module 'msado15.dll' write of address 01118024”

图片附件: 游客没有浏览图片的权限,请 登录注册

[此贴子已经被作者于2006-5-15 0:05:05编辑过]



aosarR1j.jpg (114.52 KB)
图片附件: 游客没有浏览图片的权限,请 登录注册
搜索更多相关主题的帖子: GGJJ 删除 
2006-05-15 00:01
MM0929
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-4-29
收藏
得分:0 
那导入导出怎么实现呢(导入我希望用Excel和记事本TXT两种格式,导出能用Excel就可以)?请指点?/
2006-05-17 18:04
MM0929
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-4-29
收藏
得分:0 
谢谢你!我看一下!!
2006-05-18 20:07
快速回复:有关导入、导出和修改,删除表请GGJJ们指点!!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.051231 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved