易截截图软件、单文件、免安装、纯绿色、仅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 SERVER中一些特别地方的特别解法

--1.关于where筛选器中出现指定星期几的求解
SQL code
--环境
create table test_1
(
id int,
value varchar(10),
t_time datetime
)
insert test_1
select 1,'a','2009-04-19' union
select 2,'b','2009-04-20' union
select 3,'c','2009-04-21' union
select 4,'d','2009-04-22' union
s ......

一次插入多条信息(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

使用 CONVERT:
CONVERT (data_type[(length)], expression [, style])
select CONVERT(varchar, getdate(), 120 )
2004-09-12 11:06:08
select replace(replace(replace(CONVERT(varchar, getdate(), 120 ),\'-\',\'\'),\' \',\'\'),\':\',\'\')
20040912110608
select CONVERT(varchar(12) , getdate(), 111 ) ......

常用SQL面试题 (二)

Student(S#,Sname,Sage,Ssex) 学生表
Course(C#,Cname,T#) 课程表
SC(S#,C#,score) 成绩表
Teacher(T#,Tname) 教师表
问题:
1、查询“001”课程比“002”课程成绩高的所有学生的学号;
  select a.S# from (select s#,score from SC where C#='001') a,(select s#,score
  fr ......

SQL数据库恢复模型(日志)

----------------------------------------------------------------------
1、SQL数据库恢复模型
----------------------------------------------------------------------
1)完全恢复模型
-----------------
(1)备份时要备份数据库的数据文件和日志文件
(2)还原时使用数据库的备份的数据文件副本和全部日志信 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号