当前位置:首页 » 参考文献 » delphi数据库mysql

delphi数据库mysql

发布时间: 2021-03-18 20:43:49

A. delphi备份mysql数据库怎么做

你用CMD写一个BAT文件就行的,系统运行,每天固定的时间,把数据库里的数据文件拷到另外一个文件夹

B. delphi连接mysql数据库问题

建议使用三方组件,连接MYSQL专用的。。delphi盒子就有下载!连接方法如下:
MyConnection1.Connected:=false;
MyConnection1.Database:=‘数据库’;
MyConnection1.Username:=‘账号’;
MyConnection1.Password:=密码;
MyConnection1.Port:=3306//MYSQL端口;
MyConnection1.Server:=‘IP’;
MyConnection1.LoginPrompt:=false;
MyConnection1.Connected:=true;

C. DELPHI 如何用ADO连接MYSQL数据库

提供MYSQL连接字符专串属
----------------------
AdoConnection1.ConnectionString:= 'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=aa;Password=bb;Initial Catalog=BaseManage;Data Source= '192.168.0.1 ';

D. delphi 如何连接 mysql

delphi 连接MySQL数据库
由于在Delphi 7中并没有提供对应MySQL4.0以上版本的dbexpress驱动(虽然在Borland的CodeCentral中有相关的驱动下载,但我却使用不了,不知道是否是我的方法不对),所以在使用前先下载MySQL 3.23.x的驱动libmysql.dll,下载后的
由于在Delphi 7中并没有提供对应MySQL4.0以上版本的dbexpress驱动(虽然在Borland的CodeCentral中有相关的驱动下载,但我却使用不了,不知道是否是我的方法不对),所以在使用前先下载MySQL 3.23.x的驱动libmysql.dll,下载后的libmysql.dll请放在Delphi安装目录的bin文件夹或者系统目录下或您的程序的目录中,否则dbexpress将无法找到它(出现错误提示:not load "libmysql.dll")。另外,如果libmysql.dll的版本不对会出现"invalid username/password"的错误提示。
TSQLConnection连接参数设置:
DriverName: MySQL
Host:本地:localhost;安装MySQL的计算机名/IP地地址
远程:安装MySQL的计算机名/IP地地址
Database:数据库名
UserName:MySQL用户名
Password:MySQL用户密码
LoginPrompt:false //不出现登录对话框

在使用前需要确定用户名和用户密码在MySQL中对于对应的数据库是否合法、有效。
数据组件:
推荐使用TSQLDataSet+TDataSetProvider+TclientDataSet+TdataSource+Data Control;或TSimpleDataSet+TdataSource+Data Control。

注意:不能使用TSQLDataSet+TdataSource+Data Control,否则在使用某些数据感知组件时会出现“operation not allowed on a unidirectional dataset”的错误提示,因为TSQLDataSet是单向的。
如果使用TSQLTable来使用数据有可能无法在TableName中列出所有的表名来。TSQLQuery和TSQLTable还是少用为妙。

如果那个DLL文件版本不对,可以考虑用ADO
TADOConnection的ConnectionString = 'DRIVER={MySQL ODBC 3.51

Driver};SERVER=MySQL数据库服务器;DATABASE=数据库名字;USER=用户

名;PASSWORD=密码;OPTION=3;'

DRIVER={MySQL ODBC 3.51

Driver};SERVER=192.168.1.22;DATABASE=rule;USER=WJH;PASSWORD=123456;OP

TION=3;
如果连接数据库后,dbgrid中会显示乱码,则在TADOConnection的

AfterConnect事件中增加代码:
ADOConnection1.Execute('set character_set_connection=gbk',cmdText);
ADOConnection1.Execute('set character_set_results=gbk',cmdText);
ADOConnection1.Execute('set character_set_client=gbk',cmdText);

本篇文章来源于:开发学院 http://e.codepub.com 原文链接:http://e.codepub.com/2010/0319/21181.php

E. delphi中连接mysql数据库,数据源要怎么建

参考使用MysqlDac控件,有破解版下载。就想用ado连接sqlserver一样,不需建立数据源之类的。
Connection: TmySQLDatabase; //连接
Connection := TmySQLDatabase.Create(nil);
Connection.DatabaseName := DBName;
Connection.Host := DBAdrr;
Connection.UserName := UserName;
Connection.UserPassword := PassWord;
Connection.LoginPrompt := False;

if Connection.Connected = True then
Connection.Connected := False;
try
Connection.Open;
except
Result := False;
SetISConnected(False);
fLogIni.WriteString(DateTimeToStr(Now),'CONDATABASEERR','FALSE');
Exit;
end;

pQuery := TmySQLQuery.Create(nil);
pQuery.Database := fServerDB.Connection;
pQuery.SQL.Text :=
pQuery.Open;
while not pQuery.Eof do
begin
pQuery.FieldByName
。。。。。。。

F. 如何在DELPHI中访问远程的MYSQL数据库

Delphi6新增的DBExpress专门用来对付Mysql,DB2,Interbase,Oracle等数据库,使用时注意将libmysql.dll

拷贝到当前目录或系统目录(98:system,NT:system32)下,并保证您的3306端口与远程服务器是相通的。

源程序:
interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DBXpress, DB, SqlExpr, StdCtrls, ComCtrls, FMTBcd, Grids,
DBGrids, Provider, DBClient, DBLocal, DBLocalS, DBTables;

type
TForm1 = class(TForm)
SQLConnection: TSQLConnection;
StatusBar1: TStatusBar;
Label1: TLabel;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
GroupBox1: TGroupBox;
Label2: TLabel;
Password: TEdit;
User_Name: TEdit;
HostName: TEdit;
Label3: TLabel;
Label4: TLabel;
Button1: TButton;
GroupBox2: TGroupBox;
Label5: TLabel;
ESQL: TEdit;
Label6: TLabel;
Database: TEdit;
ButtonGo: TButton;
SQLClientDataSet: TSQLClientDataSet;
procere Button1Click(Sender: TObject);
procere ButtonGoClick(Sender: TObject);
procere FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procere TForm1.Button1Click(Sender: TObject);
begin
with SQLConnection do
begin
Close;
Params.Values['HostName']:=HostName.Text;
Params.Values['UserName']:=User_Name.Text;
Params.Values['Password']:=Password.Text;
Params.Values['Database']:=Database.Text;
try
Connected:=True;
Statusbar1.Panels[0].Text:='Connect OK';
ButtonGo.Enabled:=True;
except
MessageDlg('Connect Error',mtError,[mbyes],0);
end;
end;

end;

procere TForm1.ButtonGoClick(Sender: TObject);
begin
with SQLClientDataSet do
begin
Close;
CommandText:=ESQL.Text;
Open;
end;
end;

procere TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
SQLConnection.Close;
end;
end.

G. delphi中连接mysql数据库,数据源要怎么建

参考使用MysqlDac控件,有破解版下载。就想用ado连接sqlserver一样,不需建立数据源之类的。
Connection: TmySQLDatabase; //连接
Connection := TmySQLDatabase.Create(nil);
Connection.DatabaseName := DBName;
Connection.Host := DBAdrr;
Connection.UserName := UserName;
Connection.UserPassword := PassWord;
Connection.LoginPrompt := False;

if Connection.Connected = True then
Connection.Connected := False;
try
Connection.Open;
except
Result := False;
SetISConnected(False);
fLogIni.WriteString(DateTimeToStr(Now),'CONDATABASEERR','FALSE');
Exit;
end;

pQuery := TmySQLQuery.Create(nil);
pQuery.Database := fServerDB.Connection;
pQuery.SQL.Text :=
pQuery.Open;
while not pQuery.Eof do
begin
pQuery.FieldByName
。。。。。。。

H. 想用delphi做一个远程数据库,MSSQL还是MYSQL好

第一 看你是自己公司用 还是 要卖出去盈利
自己用肯定是MS
第二 如果你要用mysql 不如用 asp C#来做

MS的东西绝对比MYSQL好,好不止一点点。
可惜是收费的,楼主如果不怕律师函的话,尽管用MSSQL

I. mysql怎么让数据库的表显示到delphi中

使用时注意将libmysql.dll拷贝到当前目录或系统目录(98:system,NT:system32)下,并保证您的3306端口与远程服务器是相通的。

源程序:
interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DBXpress, DB, SqlExpr, StdCtrls, ComCtrls, FMTBcd, Grids,
DBGrids, Provider, DBClient, DBLocal, DBLocalS, DBTables;

type
TForm1 = class(TForm)
SQLConnection: TSQLConnection;
StatusBar1: TStatusBar;
Label1: TLabel;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
GroupBox1: TGroupBox;
Label2: TLabel;
Password: TEdit;
User_Name: TEdit;
HostName: TEdit;
Label3: TLabel;
Label4: TLabel;
Button1: TButton;
GroupBox2: TGroupBox;
Label5: TLabel;
ESQL: TEdit;
Label6: TLabel;
Database: TEdit;
ButtonGo: TButton;
SQLClientDataSet: TSQLClientDataSet;
procere Button1Click(Sender: TObject);
procere ButtonGoClick(Sender: TObject);
procere FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procere TForm1.Button1Click(Sender: TObject);
begin
with SQLConnection do
begin
Close;
Params.Values['HostName']:=HostName.Text;
Params.Values['UserName']:=User_Name.Text;
Params.Values['Password']:=Password.Text;
Params.Values['Database']:=Database.Text;
try
Connected:=True;
Statusbar1.Panels[0].Text:='Connect OK';
ButtonGo.Enabled:=True;
except
MessageDlg('Connect Error',mtError,[mbyes],0);
end;
end;

end;

procere TForm1.ButtonGoClick(Sender: TObject);
begin
with SQLClientDataSet do
begin
Close;
CommandText:=ESQL.Text;
Open;
end;
end;

procere TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
SQLConnection.Close;
end;

end.

怀疑你没有启动Mysql的服务?或者服务没有安装上?
尝试 net start mysql,如果服务不存在,请检查Mysql是否正常安装了?

晕~~~
net start mysql就是打开3306端口

热点内容
涂鸦论文 发布:2021-03-31 13:04:48 浏览:698
手机数据库应用 发布:2021-03-31 13:04:28 浏览:353
版面217 发布:2021-03-31 13:04:18 浏览:587
知网不查的资源 发布:2021-03-31 13:03:43 浏览:713
基金赎回参考 发布:2021-03-31 13:02:08 浏览:489
悬疑故事范文 发布:2021-03-31 13:02:07 浏览:87
做简单的自我介绍范文 发布:2021-03-31 13:01:48 浏览:537
战略地图参考 发布:2021-03-31 13:01:09 浏览:463
收支模板 发布:2021-03-31 13:00:43 浏览:17
电气学术会议 发布:2021-03-31 13:00:32 浏览:731