易截截图软件、单文件、免安装、纯绿色、仅160KB

Delphi使用ini配置文件连接MS SQL数据库

很早做过的一个delphi项目,把里面用到的技术总结一下,主要是针对象我这样的delphi新手,技术上做个积累吧!
假设我们的数据库配置文件ServerInfo.ini内容如下:
[ServerInfo]  
ServerIP=192.168.1.5
SQLDBName=Data 
SQLUserID=sa  
SQLPwd=  
我们定义一个连接数据库的过程DBConnect内容应如下
procedure TDM.DBConnect();
var
  ini:TiniFile;
  Server,User,Pass,DBName:string;
  begin
      ini := TiniFile.Create(ExtractFilePath(Application.ExeName)+'dbconn.ini');  //初始化ini文件
      Server := ini.ReadString('serverinfo','ServerIP','');  //数据库ip地址
      DBName := ini.ReadString('serverinfo','SQLDBName','');   //数据库名
      User := ini.ReadString('serverinfo','SQLUserID','');  //数据库用户名 
      Pass := ini.ReadString('serverinfo','SQLPwd','');  //数据库密码
    try
      DM.ADOConn.ConnectionString := 'Provider=SQLOLEDB.1;Persist Security Info=False;'
      +'User ID='+trim(User)
      +';Password='+trim(Pass)
      +';Initial Catalog='+trim(DB)
      +';Data Source='+trim(Server);
      DM.ADOConn.Open ;
    except
      application.MessageBox('数据库连接失败,请检查INI配置文件','提示',64);
      application.Terminate ;
    end;
end;
相信大家都能看懂,注意使用TiniFile类的函数或过程应引入INIFiles单元。


相关文档:

一次插入多条信息(sql)

注释:只适合单表单列数据,
create database test
go
use test
go
create table users
(
:id int identity(1,1) primary key not null,
:name nvarchar(20)
)
go
create proc sp_Inserts
@Names nvarchar(4000)
as
declare @Name nvarchar(20),@ErrorSum int
:set @ErrorSum = 0
:begin tra ......

SQL日期格式大全

CONVERT
将某种数据类型的表达式显式转换为另一种数据类型。由于某些需求经常用到取日期格式的不同.现以下可在
SQL Server中 将日期格式化.
SQL Server 支持使用科威特算法的阿拉伯样式中的数据格式。
在表中,左侧的两列表示将 datetime 或 smalldatetime 转换为字符数据的 style 值。给 style 值加 100,可获得包 ......

sql server 日志文件的收缩

完全备份或日志备份虽说都有截断日志的功能,但是不会收缩日志文件的空间返回给操作系统.
如果你想将日志文件的空间返回给操作系统的话,只有一种方法,就是收缩数据库(选择日志文件)
ZT一个相关帖子,供参考!
物理日志文件:
    这个比较好理解,实实在在的东西,数据库目录下面的.ldf文件就是,有些人喜欢改后 ......

SQL Server 2000 重命名数据库

某项目之前的数据库有变化,但是以前写的程序是支持老数据库的,新数据库有一些问题,需要修改,但是数据库就重复了,于是就要把开发机上之前的数据库重新命名。
这里记录一下步骤(旧名称:MobileMsg,新名称:MobileMsg_old):
1、关掉企业管理器,打开查询分析器;
2、修改数据库名称:
EXEC sp_dboption 'MobileMs ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号