استدعاء قاعدة بيانات موجودة على server

يا أخى وضح بالضبط قاعدة البيانات التي تود العمل عليها

وشكراً

اقتباس

السؤال الاول:

اود الاستفسار عن طريقة استدعاء قاعدة بيانات موجودة على سيرفير من خلال برنامج فيجول بيسك حيث ان البرنامج اقوم من خلاله بستدعاء قاعدة البيانات من اجل الاضافة والتعديل والتخزين والعرض والطباعة وارجو ان تكون الاجابة من خلال مثال  

You can do that using ADO RecordSet

Dim rs as new RecordSet
Set rs = new RecordSet
rs.open "Select*from Table","Provider=SQLOLEDB;Server=154.87.45.20;uid=sa;pwd=;database=MyDatabase",3,3

change 154.87.45.20 to your SQL Server IP Address or computer name if using LAN.

Now you wil able to add,delete,update using ADO RecordSet methods

اقتباس

السؤال الثاني:

يوجد قاعدة بيانات مخزنه على جهاز تابع لشبكة واريد عمل backup لهذة القاعدة على السيرفر ارجو ان تدلوني على الحل

[/quotes]

Here is the back up code

Dim SQLSvr As new SQLDMO.SQLServer

Dim Backup As New SQLDMO.Backup

Set SQLSvr =  new SQLDMO.SQLServer

Set Backup = New SQLDMO.Backup



SQLSvr.Connect "154.87.45.20", "sa",""



Backup.Database = "Ecommerce"

Backup.Files = "c:Ecommerce.bak" 

Backup.SQLBackup SQLSvr



SQLSvr.DisConnect

Set SQLSvr =nothing

Set Backup = nothing

sa is the password while "" is the empty password.Change this values as necessary

السلام عليكم

أخ madani إنك تعطي هذا الحل، حيث استخدام قاعدة بيانات SQL Server ولكن الأخ لم يوضح ما هي قاعدة البيانات التي يعمل معها

وشكراً