با سلام
راست ميگه ها اگه يه كم بيشتر توضيح ميدادي بد نبود. اما با توجه به احتمالات موجود برات ميگم:
احتمال اول اينه كه كد connectionstring را اشتباه نوشته باشي پس با كدهاي زير كه براي دلفي و ويبي هست چك كن :
کد:
'-------------------------------------------------------------------------------------------
for delphi 6,7,8
'-------------------------------------------------------------------------------------------
//====================================================
// connect to sql_server database via an ip addres
// ALI reza kavosifar
//====================================================
function ip_constr(ipaddres:string;InitialCatalog:string;uid:string='';psw:string=''):string;overload;
var
constr:string;
begin
constr:='Data Source=' + ipaddres + ';Network Library=DBMSSOCN;';
constr:=constr + 'UID=' + uid + ';PWD=' + psw ;
constr:=constr +';Initial Catalog=' + InitialCatalog ;
ip_constr:=constr;
end;
//====================================================
// connect to sql_server database standard
// ALI reza kavosifar
//====================================================
function client_constr(InitialCatalog:string;uid:string='';psw:string=''):string;overload;
var
constr:string;
begin
constr:='Provider=SQLOLEDB.1;Integrated Security=SSPI;';
constr:=constr + 'User ID=' + uid + ';PASSWORD=' + psw ;
constr:=constr +';Initial Catalog=' + InitialCatalog ;
client_constr:=constr;
end;
'-------------------------------------------------------------------------------------------
for vb and vb.net
'-------------------------------------------------------------------------------------------
'====================================================
' connect to sql_server database via an ip addres
' ALI reza kavosifar
'====================================================
function ip_constr(byval ipaddres as string,byval InitialCatalog as string , bayval uid as string, byval psw as string) as string
dim constr as string
constr="Data Source=" + ipaddres + ";Network Library=DBMSSOCN;"
constr=constr + "UID=" + uid + ";PWD=" + psw
constr=constr +";Initial Catalog=" + InitialCatalog
ip_constr=constr
end function
'====================================================
' connect to sql_server database standard
' ALI reza kavosifar
'====================================================
function client_constr(byval InitialCatalog as string,byval uid as string,byval psw as string) as string
dim constr as string
constr="Provider=SQLOLEDB.1;Integrated Security=SSPI;"
constr=constr + "User ID=" + uid + ";PASSWORD=" + psw
constr=constr +";Initial Catalog=" + InitialCatalog
client_constr=constr
end function
احتمال دوم اينه كه service mannenger روي سيستمت فعال نباشه پس فعالش كن تا عكس يه play روي systry ويندوزت بياد
احتمال بعدي اينه كه commandet اشتباه باشه يا نوع اونو اشتباه انتخاب كرده باشي مثلا اگر از
storedprocedure استفاده ميكني commandtype حتما بايد روي cmdstoredproc تنظيم شه و
اما احتمال چهارم عمرا احتمال ديگه اي نيست و محاله كه مشكل ديگه اي وجود داشته باشه
بازم ما درخدمتيم
قربون همه ايران ويجي ها