Discussion :

[budkiller]

Bonjour,

Je développe une application en local qui utilise une base sql server.(enfin qui devrais). la base est situé sur un serveur en local.

J'ai essayé plusieurs chaine de connexion qui me retourne toutes des erreurs à part celle ci :

Code :

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

Provider=MS Remote;Data Source=nombase; Remote Server=10.10.10.10;Uid=login;Pwd=pass

Et quand j'essaye de récupérer les données de ma requête, j'ai le droit à cette erreur : "4100 : Impossible de créer un objet Business."

Voici mon code

Code :

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

1
2
3
4
5
6
7
8
9
10
 
1. Set cn = Server.CreateObject("ADODB.Connection")
2. Set rs = Server.CreateObject("ADODB.Recordset")
3. cn.Open  "Provider=MS Remote;Data Source=nombase; Remote Server=10.10.10.10;Uid=login;Pwd=pass"
4. on error resume next 
5. rs=cn.execute("SELECT * FROM MAGASIN")
6. if err.number <> 0 then 
7. response.write err.number & " : " & err.description 
8. end if
9. cn.close

L'erreur étant à la ligne 5.

Merci d'avance pour votre aide.

[Gwenn]

Tentes avec

Code :

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

Server=127.0.0.1

si ton serveur est sur ton poste

[budkiller]

il est sur un autre serveur dont j'ai l'adresse IP

[Gwenn]

chez moi j'utilise la chaine suivante si ca peut t'aider :

Code :

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

connstring= "Provider=SQLOLEDB ; Data Source=@IP;Initial Catalog=Nomcatalogue; User Id=login; Password=pwd"

[budkiller]

si je mets ça ça me marque

Code :

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

-2147467259 : [DBNMPNTW]Serveur SQL spécifié non trouvé.

sur la ligne de l'ouverture de la base.

[Immobilis]

Salut,

Le provider est

Provider=MS Remote

Pourquoi précises-tu

une application en local qui utilise une base sql server.(enfin qui devrais).

?

A+

[budkiller]

si c'est le "enfin qui devrais" c'etait juste une petite note d'humour parce que j'arrive pas à utiliser la base.

sinon je vois pas trop ce que tu veux me dire

[Immobilis]

Quelle est la base de donnée tout simplement SQL Server, ... ?

[Damish]

salut essaye

Code :

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

1
2
3
4
5
6
7
set BaseLink=Server.CreateObject("ADODB.Connection")
	    BaseLink.Open "nomdelabase", "login", "motdepasse"
 
                 requete
 
                 Set RS= Server.CreateObject("ADODB.RecordSet")
                 RS.Open requete, BaseLink

[budkiller]

il me retourne

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Gestionnaire de pilotes ODBC] Source de données non trouvée et nom de pilote non spécifié
/projet_CA_FDC/test.asp, line 29

la ligne 29 étant

Code :

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

BaseLink.Open "nomdelabase", "login", "motdepasse"

[Gwenn]

Ha bin oui mais la, il manque le type, le nom, l'adresse :

http://www.connectionstrings.com/
http://www.carlprothman.net/Default.aspx?tabid=81

[budkiller]

avec

Code :

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

Provider=SQLOLEDB ; Data Source=10.10.10.10;Initial Catalog=editionCA; User Id=editionCA; Password=pass

j'ai cette erreur :

Microsoft OLE DB Provider pour SQL Server (0x80004005)
[DBNMPNTW]Serveur SQL spécifié non trouvé.
/projet_CA_FDC/test.asp, line 29 (ligne de connexion à la base)



et avec

Code :

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

Provider=MS Remote;Data Source=editionCA; Remote Server=10.10.10.10;Uid=editionCA;Pwd=pass

j'ai cette erreur :

Microsoft ADO/RDS (0x800A1004)
Impossible de créer un objet Business.
/projet_CA_FDC/test.asp, line 34 (ligne d'execution de la requete)

[budkiller]

pour information il s'agit d'un SQL SERVER 2000 standard

[Immobilis]

Tu devrais bien trouver ton bonheur ici:http://www.developpez.net/forums/showthread.php?t=890

[budkiller]

la connection marche enfin je pense mais impossible de récupérer les données

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Dim conn
 
Set conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
 
on error resume next 
conn.Open "Provider=MS Remote;Data Source=editionCA; Remote Provarider=SQLOLEDB ; Remote Server=10.10.10.10;Uid=editionCA;Pwd=pass"
if err.number <> 0 then 
	response.write err.number & " : " & err.description &"<br>"
else
	on error resume next 
	'rs=conn.execute("SELECT * FROM MAGASIN")
	rs.Open "SELECT * FROM MAGASIN", conn
	if err.number <> 0 then 
		response.write err.number & " : " & err.description &"<br>"
	end if
end if

et j'ai toujours l'erreur au niveaux de

Code :

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

1
2
'rs=conn.execute("SELECT * FROM MAGASIN")
	rs.Open "SELECT * FROM MAGASIN", conn

[Immobilis]

Salut,

J'ai qd mm l'impression qu'il y a des fautes de frappe dans ta chaine de connection.

"Provider=MS Remote;Data Source=editionCA; Remote Provarider=SQLOLEDB ; Remote Server=10.10.10.10;Uid=editionCA;Pwd=pass"

Jette un oeil ici : http://support.microsoft.com/kb/q240838/

A+

[budkiller]

bon ça marche si je teste directement sur le serveur donc je vais bosser la dessus

merci à tous

si je trouve une solution je viendrais la poster

[Immobilis]

Si tu developpes sur ton serveur, il faut lui mettre 127.0.0.1 comme IP ou alors (local).