منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : من لذيه مثال عن فيجوال بيسك6 مربوط مع سيكيول سيرفر 2008
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ...من لذيه مثال مبسط عن برنامج بفيجوال بيسك6 مربوط بقاعدة بيانات سيكيول سيرفر 2008

وشكرا جزيلا لاخواننا المبرمجين
PHP كود :
Option Explicit
'=============================
'
VB4ARAB.COM
' Created By Lion_Ksa
'
2015
'Note:
'
If you have SQL EXPRESS you need use .\SQLEXPRESS
'Or severname\SQLEXPRESS;
'
If EnterPRISE etc use only .\;
'Or servername;
'
Good luck
'=============================
Public db As New ADODB.Connection
Public Rs As New ADODB.Recordset
Private Sub Command1_Click()
If db.State Then db.Close
With db
.Open "PROVIDER=MSDataShape;" & _
"Data Provider=SQLOLEDB.1;" & _
"Data Source=.\SQLEXPRESS;" & _
"Initial Catalog=master;" & _
"Integrated Security=SSPI;Persist Security Info=true;" & _
"User ID=;" & _
"Password=;" & _
" providerName=System.Data.SqlClient"
End With
Rs.Open "MSreplication_options", db, 1, 3
MsgBox Rs.RecordCount
End Sub 
المثال مرفق
[attachment=7715]
[attachment=7716]
دعواتك
جزاك الله خير يا اخي وشكرا جزيلا
اخي مشكور اشتغل معي الاتصال بقاعده البيانات اشتغل برنامجي مثلا البحث شغال بس بعض الاوامر لم تشتغل خصوصا التي تحتوي علي تاريخ حسب ما قرات بالنت انه اوامر التاريخ في قاعده البيانات اكسس تختلف عن الاسكيوال سيرفر

مثلا انا لذي هذا الامر كيف ممكن ان يعدل ليشتغل مع قاعدة البيانات الاسكيوال سيرفر

كود :
rs5.Open "select * from tt_is where name like '" & Text1.Text & "%' and date >= #" & Format(CDate(DTPicker1.Value), "mm/dd/YYYY") & "# and date <= #" & Format(CDate(DTPicker2.Value), "mm/dd/YYYY") & "#;", conn5, adOpenStatic, adLockOptimistic

رسالة الخطأ التي تظهر هي:

Run-time error '-2147217900 (80040e14)': incorrect syntax near'#'.
تم حل المشكله وهي ازلت علامة المربع من الجهتين واشتغل الكود.....شكرا جزيلا
العفو
# تستخدمها اذا الحقل نوع تاريخ فقط !!
بالمناسبة اذا اردت شكر احد ما
عليك فقط ان تضغط على شكرا فقط دوت العناء لكتابة اي جملة
بالتوفيق
السلام عليكم ..كود الاتصال الاسكيوال سيرفر شغال معي علي نفس السيرفر بس اذا حاولت ان اشبك من كمبيوتر ثاني (كلينت) ما يشتغل يعطي الرساله التابية

invalid connection string attribute

ماذا افعل لاجعله يشتفل من كمبيوتر المستخدم..وشكرا
بارك الله فيك ... بالتوفيق