delphi4arab منتديات دلفي للعرب
ربط أوراكل مع الدلفي - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : ربط أوراكل مع الدلفي (/showthread.php?tid=3202)



ربط أوراكل مع الدلفي - hmourad85 - 16-06-2011

السلام عليكم ورحمة الله وبركاته.

قمت بانشاء برنامج يتصل مع قاعدة بيانات اوراكل ولكن لم اتمكن من ايجاد طريقة ليعمل على الشبكة علما اني ربطت القاعدة بواسطة مكونات dbexpress ونفس الطريقة جربتها من قبل مع قاعدة بيانات sqlserver ونجحت والسبب ان مكون sqlconnection عندما اربطه مع sql server فإنه يحتوي على الخاصية HostName بينما عندما اربطه مع الاوراكل فانه (sqlconnection ) لا يحتوي على هذه الخاصية.

الصور لمزيد من التوضيح.
[صورة: attachment.php?attachmentid=2767&d=1308253677]
[صورة: attachment.php?attachmentid=2768&d=1308253697]


ربط أوراكل مع الدلفي - kachwahed - 17-06-2011

وعليكم السلام ورحمة الله
انظر:
http://www.delphi4arab.net/forum/showpost.php?p=27504&postcount=4
بالتوفيق.



ربط أوراكل مع الدلفي - Lam.Abdeldjalil - 17-06-2011

السلام عليكم

في Oracle شيئ مثل :
كود :
var Conn: TSQLConnection; Query: TSQLQuery; begin Conn := TSQLConnection.Create(nil); Query := TSQLQuery.Create(nil); try try Conn.DriverName := 'Oracle'; [COLOR=Black] Conn.Params.Add('DataBase=[COLOR=DarkGreen]localhost:1521/orcl[/COLOR]');[/COLOR] Conn.Params.Add('User_Name=scott'); Conn.Params.Add('Password=tiger'); Conn.Connected := True; Query.SQLConnection := Conn; //..... except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; finally Query.Free; Conn.Free; end; end.
بالتوفيق


ربط أوراكل مع الدلفي - hmourad85 - 19-06-2011

السلام عليكم ورحمة الله وبركاته

شكرا جزيلا على الأجوبة، ولكن للأسف لم تصلح معي

وهذا الكود الذي استعملته:
كود :
procedure TForm1.ConnetBtnClick(Sender: TObject); begin SQLConn.DriverName := 'Oracle'; SQLConn.LibraryName := 'dbexpora.dll'; SQLConn.VendorLib := 'oci.dll'; SQLConn.GetDriverFunc := 'getSQLDriverORACLE'; SQLConn.Params.Add('DataBase=localhost:1521/GESTARCH'); SQLConn.Params.Add('User_Name=system'); SQLConn.Params.Add('Password=manager'); SQLConn.Connected := True; end;

وعند النقر على الزر يظهر الخطأ التالي:

ORA-06401: NETCMN : désignation de lecteur non valide

وشكرا.