إنتقال للمحتوى

  • تسجيل الدخول عبر الفيس بوك تسجيل الدخول عبر تويتر Log In with LinkedIn Log In with Google      تسجيل دخول    
  • إنشاء حساب

صورة
- - - - -

ربط أوراكل 10 G Express Eddtion مع فيجوال بيسك 2005


1 رد (ردود) على هذا الموضوع

#1 الأمل المنتظر

الأمل المنتظر

    عضو

  • الأعضــاء
  • 1 مشاركة

تاريخ المشاركة 11 May 2007 - 09:11 AM

السلام عليكم ورحمة الله
لدي سؤال آمل أن يكون بسيطا لما له سابق خبرة وتعامل مع الأوراكل
أنا أعمل على فيجوال بيسك 2005 وأريد استرجاع بيانات من القاعدة, لكن المشكلة أني قرأت الكثير من الدروس ولم أفلح في تطبيق أي منها خاصة وأن الكثير منها تتكلم عن الربط بنسخ أخرى والتي لم تعمل على ما أعمل عليه .,,
أتمنى إرشادي بالخطوات فأنا مبتدئة ، أو إرشادي إلى روابط مفيدة,,
وجدت هذا الكود لكن لا أعرف أين وكيف أستخدمه :)
مدوا لي يد العون لا حرمتم الأجر


[quote name='الأمل المنتظر' post='99505' date='May 11 2007, 08:58 AM']
السلام عليكم ورحمة الله
لدي سؤال آمل أن يكون بسيطا لما له سابق خبرة وتعامل مع الأوراكل
أنا أعمل على فيجوال بيسك 2005 وأريد استرجاع بيانات من القاعدة, لكن المشكلة أني قرأت الكثير من الدروس ولم أفلح في تطبيق أي منها خاصة وأن الكثير منها تتكلم عن الربط بنسخ أخرى والتي لم تعمل على ما أعمل عليه .,,
أتمنى إرشادي بالخطوات فأنا مبتدئة ، أو إرشادي إلى روابط مفيدة,,
وجدت هذا الكود لكن لا أعرف أين وكيف أستخدمه :rolleyes:
مدوا لي يد العون لا حرمتم الأجر
[/quote]

نسيت أن أضع الكود
Just call startup


Imports System.Data			  ' VB.NET
Imports Oracle.DataAccess.Client ' ODP.NET Oracle managed provider
Imports Microsoft.Win32

Public Module modOracleConnect
	'Global variables
	Public gstrDBConn As String
	Public gosessCBankerSession As OracleConnection   'Object
	Public gstrDBServer As String
	Public Function StartUp() As Boolean

		Dim str1 As String


		StartUp = True

		If Not gosessCBankerSession Is Nothing Then
			If gosessCBankerSession.State = ConnectionState.Open Then Exit Function
		End If

		gstrDBServer = "helpme"
		str1 = "User Id=username;" _
			 & "Password=password"


		gstrDBConn = "Data Source=" & gstrDBServer & ";" & str1 & ";"
		' & "Statement Cache Size = 20; Statement Cache Purge = true;"

		Try
			gosessCBankerSession = New OracleConnection(gstrDBConn)

			gosessCBankerSession.Open()
			gosessCBankerSession.Close()

			gosessCBankerSession.Open()

		Catch e As OracleException
			StartUp = False
			Throw e
		End Try

	End Function

[quote name='الأمل المنتظر' post='99505' date='May 11 2007, 09:01 AM']
السلام عليكم ورحمة الله
لدي سؤال آمل أن يكون بسيطا لما له سابق خبرة وتعامل مع الأوراكل
أنا أعمل على فيجوال بيسك 2005 وأريد استرجاع بيانات من القاعدة, لكن المشكلة أني قرأت الكثير من الدروس ولم أفلح في تطبيق أي منها خاصة وأن الكثير منها تتكلم عن الربط بنسخ أخرى والتي لم تعمل على ما أعمل عليه .,,
أتمنى إرشادي بالخطوات فأنا مبتدئة ، أو إرشادي إلى روابط مفيدة,,
وجدت هذا الكود لكن لا أعرف أين وكيف أستخدمه :ph34r:
مدوا لي يد العون لا حرمتم الأجر

Just call startup


Imports System.Data			  ' VB.NET
Imports Oracle.DataAccess.Client ' ODP.NET Oracle managed provider
Imports Microsoft.Win32

Public Module modOracleConnect
	'Global variables
	Public gstrDBConn As String
	Public gosessCBankerSession As OracleConnection   'Object
	Public gstrDBServer As String
	Public Function StartUp() As Boolean

		Dim str1 As String


		StartUp = True

		If Not gosessCBankerSession Is Nothing Then
			If gosessCBankerSession.State = ConnectionState.Open Then Exit Function
		End If

		gstrDBServer = "helpme"
		str1 = "User Id=username;" _
			 & "Password=password"


		gstrDBConn = "Data Source=" & gstrDBServer & ";" & str1 & ";"
		' & "Statement Cache Size = 20; Statement Cache Purge = true;"

		Try
			gosessCBankerSession = New OracleConnection(gstrDBConn)

			gosessCBankerSession.Open()
			gosessCBankerSession.Close()

			gosessCBankerSession.Open()

		Catch e As OracleException
			StartUp = False
			Throw e
		End Try

	End Function
[/quote]


[quote name='الأمل المنتظر' date='May 11 2007, 09:06 AM' post='99505']
السلام عليكم ورحمة الله
لدي سؤال آمل أن يكون بسيطا لما له سابق خبرة وتعامل مع الأوراكل
أنا أعمل على فيجوال بيسك 2005 وأريد استرجاع بيانات من القاعدة, لكن المشكلة أني قرأت الكثير من الدروس ولم أفلح في تطبيق أي منها خاصة وأن الكثير منها تتكلم عن الربط بنسخ أخرى والتي لم تعمل على ما أعمل عليه .,,
أتمنى إرشادي بالخطوات فأنا مبتدئة ، أو إرشادي إلى روابط مفيدة,,
وجدت هذا الكود لكن لا أعرف أين وكيف أستخدمه :(
مدوا لي يد العون لا حرمتم الأجر


Just call startup


Imports System.Data			  ' VB.NET
Imports Oracle.DataAccess.Client ' ODP.NET Oracle managed provider
Imports Microsoft.Win32

Public Module modOracleConnect
	'Global variables
	Public gstrDBConn As String
	Public gosessCBankerSession As OracleConnection   'Object
	Public gstrDBServer As String
	Public Function StartUp() As Boolean

		Dim str1 As String


		StartUp = True

		If Not gosessCBankerSession Is Nothing Then
			If gosessCBankerSession.State = ConnectionState.Open Then Exit Function
		End If

		gstrDBServer = "helpme"
		str1 = "User Id=username;" _
			 & "Password=password"


		gstrDBConn = "Data Source=" & gstrDBServer & ";" & str1 & ";"
		' & "Statement Cache Size = 20; Statement Cache Purge = true;"

		Try
			gosessCBankerSession = New OracleConnection(gstrDBConn)

			gosessCBankerSession.Open()
			gosessCBankerSession.Close()

			gosessCBankerSession.Open()

		Catch e As OracleException
			StartUp = False
			Throw e
		End Try

	End Function



لا أدري ما الذي حدث وتكرر 3 مراااااات !!!!!!!!!!!!!!!!!!!!!!!!!!!!
أعتذر,,

#2 جلال شواقفه

جلال شواقفه

    عضو مميز

  • الأعضــاء
  • 2,559 مشاركة
  • البـلـد: Country Flag

تاريخ المشاركة 11 May 2007 - 11:49 AM

**استعملي ODBC الموجود في Administrative Tools
ارجو من يستفيد من مشاركاتي الدعاء لوالدي ولاموات المسلمين بالمغفره والرحمه......

جلال محمود شواقفه
مدير دائرة الحاسوب
بلدية المفرق الكبرى
المملكه الاردنيه الهاشميه.