代码搜索：connectionString
找到约 2,829 项符合「connectionString」的源代码
代码结果 2,829
www.eeworm.com/read/132372/14096117
~pas udata.~pas
unit Udata;
interface
uses
Windows, SysUtils,Forms, Dialogs,Registry,U_DM;
var
Regr,Regw,Regs: TRegistry;
SServerName,SDataUser,SdataPassword,Spath : string; //系统数据库参数
UserId,User
www.eeworm.com/read/132372/14096118
pas udata.pas
unit Udata;
interface
uses
Windows, SysUtils,Forms, Dialogs,Registry,U_DM;
var
Regr,Regw,Regs: TRegistry;
SServerName,SDataUser,SdataPassword,Spath : string; //系统数据库参数
UserId,User
www.eeworm.com/read/132372/14096329
~pas sys_datamodal.~pas
unit SYS_DataModal;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Db, ADODB,Gys_Kh_TLB, ComObj;
type
TDM1 = class(TDataModule)
ADOCon1
www.eeworm.com/read/132372/14096529
pas uaccept.pas
unit uAccept;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Grids, DBGrids, ComCtrls, StdCtrls, Buttons, ExtCtrls, ADODB, Db, Mask,
DBCtrls,Me
www.eeworm.com/read/132372/14096605
pas import1.pas
unit import1;
interface
uses
Windows,Classes,ADODB;
{$IFNDEF PENNIESLIB}
procedure SetReport(AHandle: THandle;strcon:WideString;RepOrder,MCode1: String);StdCall;
//----------
www.eeworm.com/read/234543/14107344
dfm datadmp.dfm
object DataDm: TDataDm
OldCreateOrder = False
OnCreate = DataModuleCreate
Left = 192
Top = 107
Height = 293
Width = 293
object ConUfsystem: TADOConnection
ConnectionString =
www.eeworm.com/read/234543/14107460
~dfm datadmp.~dfm
object DataDm: TDataDm
OldCreateOrder = False
OnCreate = DataModuleCreate
Left = 192
Top = 107
Height = 293
Width = 293
object ConUfsystem: TADOConnection
ConnectionString =
www.eeworm.com/read/234480/14111282
dfm dmunit.dfm
object dm: Tdm
OldCreateOrder = False
Left = 246
Top = 146
Height = 150
Width = 215
object ADOConnection: TADOConnection
ConnectionString =
'Provider=SQLOLEDB.1;Persist
www.eeworm.com/read/234223/14118415
bas module1.bas
Attribute VB_Name = "Module1"
Public adoCon As ADODB.Connection
Public adoRS As ADODB.Recordset
Public Sub connectDB()
Set adoCon = New ADODB.Connection
adoCon.ConnectionString = "Provider=SQLOLE