Salut à tous
je n arrive pas à me contacter à distance à partir de PERL j ai tjrs des messages d erreurs, Voici comment j ai procedé:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
my $server_name = "myServer";
my $server_ip = "xx.xx.x.xxx:1433";
my $db_name = "myDB";
my $db_user = "user";
my $db_pass = "user";
my $DSN = "driver={SQL Server};server=$server_name;tcpip=$server_ip;database=$db_name;uid=$db_user;pwd=$db_pass;";
print $DSN;
my $dbh = DBI->connect("dbi:ODBC:$DSN") || die "Couldn't open database: $DBI::errstr\n";
Je recois tjrs l erreur:
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
 
DBI connect('driver={SQL Server};server=myServer;tcpip=xx.xx.x.xxx:1433;dat
abase=myDB;uid=user;pwd=user;','',...) failed: [Microsoft][ODBC SQL Serv
er Driver][DBNETLIB]SQL Server does not exist or access denied. (SQL-08001) [sta
te was 08001 now 01000]
[Microsoft][ODBC SQL Server Driver][DBNETLIB]ConnectionOpen (Connect()). (SQL-01
000) [state was 01000 now 01S00]
[Microsoft][ODBC SQL Server Driver]Invalid connection string attribute (SQL-01S0
0) at Neu.pl line 16
Couldn't open database: [Microsoft][ODBC SQL Server Driver][DBNETLIB]SQL Server
does not exist or access denied. (SQL-08001) [state was 08001 now 01000]
[Microsoft][ODBC SQL Server Driver][DBNETLIB]ConnectionOpen (Connect()). (SQL-01
000) [state was 01000 now 01S00]
[Microsoft][ODBC SQL Server Driver]Invalid connection string attribute (SQL-01S0
0)
driver={SQL Server};server=myServer;tcpip=xx.xx.x.xxx:1433;database=myDB;
uid=user;pwd=user;
Avec vous une idee?
Merci d avance