Discussion :

[Dikimb]

bonjour,
j'utilise delphi 7 et sql server 2000 pour developper mes applications.
comme composant de connection, j'utilise ado connection.
quand je tente d'executer l'exe construit à partir d'une autre machine, j'ai des messages du genre le serveur n'existe pas.
Que puis-je faire?
Merci pour votre disponibilité et votre aide.Merci

[philnext]

Tu peux essayer de nous fournir la connection string que tu utilises...

[Dikimb]

voici la connection string:"Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Compte client"

[Andry]

Je pense que ta connectioString manque quelque chose : je ne vois pas ou est inscrit le serveur.
VOici une fonction que j'utilise tout le temps pour se connecter à SQL Server via un ADOConnection:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
function Connect_SQL(adoConn: TADOConnection; Serveur, Bdd: String; Out Msg : String): Boolean;
begin
  Result := False;
  if Assigned(adoConn) and (Serveur <> '') and (Bdd <> '') then
  try
    adoConn.Close;
    adoConn.ConnectionString := Format('Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=%s;Data Source=%s',[BDD,Serveur]);
    adoConn.Open;
    Result := adoConn.Connected;
  except
    on E: Exception do Msg := E.Message;
  end;
end;

Dans c
A toi de le modifier pour gérer l'authentification SQL Server car j'utilise l'authentification windows

A+

[Dikimb]

Merci,je tente puis je te dis koi

[aityahia]

salut,

moi pour mes connexion j'utilise toujours un fichier udl ou est difinit ma connection string, c'est très pratique.


Salutations.

[Dikimb]

bonjour,
je suis tenté d'en savoir plus sur votre procedure avec utilisation de fichier udl. je pense que je peux compter sur vous.
Merci

[Dikimb]

bonjour andry(et vous tous qui me lisez bien sur)
j'ai pris ton modèle de connectionstring mais les choses n'ont pas évolué.
je te prie de vérifier si je me suis trompé klk part:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
function connect_sql(compteclient:TAdoconnection;Serveur,Bdd:string;Out Msg:string):Boolean;
    begin
        result:=false;
        if assigned(compteclient) and (serveur<>'DIKIMB') and (Bdd<>'compte client')then
        try
          compteclient.Close;
          compteclient.ConnectionString:= Format('Provider=SQLLOEDB.1;Integrated security=SSPI;Persist Security Info=false;Initial catalog=%s;data source=%s',[BDD,SERVEUR]);
          compteclient.Open;
          result:=compteclient.Connected;
        except
          on E:exception do msg:=E.Message;
        end;
 
end;

compteclient est le nom du adoconnection.

Merci

[Andry]

Alors, est ce que le problème est exactement celui de la première fois.
Est ce que ton serveur SQL est bien paramétré.
Quelle est le mode d'accès à ton serveur : SQL ou windows ?
Est ce que tu y as accès ?
ET je ne comprends pas trop cette ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if assigned(compteclient) and (serveur<>'DIKIMB') and (Bdd<>'compte client')then

[Dikimb]

merci pour votre assistance.
en effet, il fallait choisir une authentification sql servir au lieu de l'auth NT de windows puisqu je n'utilise pas de domaine mais un groupe de travail.
Puis sur sql serveur, accepter l'authentification sql dans les proprietes du serveur.
ainsi,je dois utiliser des utilisateurs definis pour chaque base de données.

Encore une fois, merci!!!!