如何实现连接sql 2000(跪求代码)(100分)

  • 主题发起人 主题发起人 skyline00
  • 开始时间 开始时间
S

skyline00

Unregistered / Unconfirmed
GUEST, unregistred user!
新手上路,希望大家帮帮我,谢谢了
 
ADOConnection1.ConnectionString := 'Provider=SQLOLEDB.1;Password=用户密;Persist Security Info=True;User ID=用户名;Initial Catalog=数据库名;Data Source=IP或机器名';
ADOConnection1.Connected := True;
给分吧!
 
ADOConnection1.ConnectionString := 'Provider=SQLOLEDB.1;Password=用户密码;Persist Security Info=True;User ID=用户名;Initial Catalog=数据库名;Data Source=IP或机器名';
让他给抢先了,只能少接点分了!
 
按上面操作就可以了。
 
男儿膝下有"黄金万两"啊,跪小心沾上了[:D]
 
这些东西你可以可视化的操作之后,把他的CONNECTIONSTRING取出来看看就知道了
 
使用datesource table 组件也可以,只要设定属性就行了
 
procedure TMAINForm.FormCreate(Sender: TObject);
const
cntstr='Provider=SQLOLEDB.1;Password=%s;Persist Security Info=True;User ID=%s;Initial Catalog=%s;Data Source=%s';
var
Readini:Tinifile;
connectingstr:Widestring;
server,user,password,databases:string;
begin
Readini:=Tinifile.Create(ExtractFileDir(application.ExeName)+'/STOCKTRINK.ini');
server:=Readini.ReadString('connection','server','wang');
user:=ReadIni.ReadString('connection','user','sa');
password:=ReadIni.ReadString('connection','password','1234');
databases:=ReadIni.ReadString('connection','databases','dbfood');
connectingstr:=format(cntstr,[password,user,databases,server]);
ADOConnection.ConnectionString:=connectingstr;
ADOConnection.LoginPrompt:=false;
Readini.Free;
end;
 
还不散分等待何时!!!
 
ADO 连 MSSQL 2000==============================
在你的机器上建一文本文件,然后随便起个名,比如SQLCON,然后把其扩展名改为 .udl
,全名也就为SQLCON.udl,打开后,选择“提供者”选项卡,选择“Microsoft OLE DB Provider for SQL Server”,下一步,输入服务器名或IP,用户名和密码,再把“允许保存密码”的复选框选上,再选择你所要的数据库,按确定。
最后再用记事本打开这个文件就能看到你所要连接的SQL的语句了。
ODBC 连 MSSQL 2000==============================
打开“控制面版”,然后打开“管理工具”,接着双击“数据源(ODBC)”,打开后点右面的“添加(D)..”,选择"SQL Server",输入名称,在“服务器(S)”选择或添写服务器名或其IP,下一步,再选择“使用用户输入登录ID 和密码的 SQL Server验证(S)”,在下面写上用户名和密码,下一步后,先上“更改默认的数据库为(D)”,选择你所需的数据库名称,下一步,再点击完成,在弹出的界面点击“测试数据源”,如果成功就则显示OK,再点“确定”即可.
 
to:清新空气,怎么出现这个错误啊   [Fatal Error] Could not create output file 'C:/Program Files/Borland/Delphi7/Projects/Project1.exe'
 
用户名:sa,密码:1,IP:192.168.1.187
数据库名:USER012006
恳请大家给出全部连接步骤啊,实在不会!!谢谢了
 
ADOConnection1.ConnectionString :='Provider=SQLOLEDB.1;Password=1;Persist Security Info=False;User ID=sa;Initial Catalog=USER012006;Data Source=192.168.1.187';
 
ADOConnection1.ConnectionString :='Provider=SQLOLEDB.1;Password=1;'
+'Persist Security Info=False;User ID=sa;'
+'Initial Catalog=USER012006;Data Source=192.168.1.187'';
ADOConnection1.Connected := True;
 
天啊.
ADOConnection1.ConnectionString :='Provider=SQLOLEDB.1;Password=1;Persist Security Info=False;User ID=sa;Initial Catalog=USER012006;Data Source=192.168.1.187';
 
对下面提问的回答:
to:清新空气,怎么出现这个错误啊   [Fatal Error] Could not create output file 'C:/Program Files/Borland/Delphi7/Projects/Project1.exe'
回答:检查windows任务管理器,关闭进程Project1
对于怎么做的回答:
1.添加控件ADOConnection1(在ADO组件里)
2.在ADOConnection1上双击,点Building...按钮
3.选择Microsoft OLEDB Provider fro Sql server ,点下一步
4.选择你的服务器和数据库,如果没有选项就手书,然后测试连接看看是否成功。
其实楼上的大哥们介绍了很多用代码实现的方法。
 
多人接受答案了。
 
后退
顶部