الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

نسخ قاعدة البيانات و تغيير اسمها في Sql Server بالكود

بدأه alimf في 5 مارس 2009 · 13 رد · 1,212 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

عندي قاعدة بيانات من sql server 2000 اريد ان انسخها بسم اخر في نفس السيرفر بحيث تكون قابلة للاستخدم طبعا هذا كلة عنطريق الكود vb6 علشان انقل فيها البيانات الجديد لسنة الجديدة مش مشكلة البيانات المشكلة عمل نسخة من القاعدة بالكود انا بسراحة لفيت عليها كثير وجدة بعض الحلول بس مش كاملة يعني مافي شرح مفصل او كود يعمل كمثال

/index.php?showtopic=47070

المهم انا اتمنا ممن عندة ولوا فكرة بسيطة يطرحها علنا نستفيد منها و الي عنده الحل لا يبخل علينا به

وشكرا سلفاً

برنامج البدر للفنادق

برنامج اداري ومحاسبي و خدمي و سنترال

afalqi@hotmail.com

#2

انا عندى فكره مادام انت عارف القاعدة والجدول المطلوبين يبقى تقدر تنشأهم من اول وجديد بس

لو الحل ده مناسب ليك قولى ابعتلك الكود

اوكى

00
 

فاضى 

 

00

#3

شكرا اخي الفاضل على التجاوب معي

وياريت تبعتلي الكود لنه يفي بالغرض بزيادة

بارك الله فيك

برنامج البدر للفنادق

برنامج اداري ومحاسبي و خدمي و سنترال

afalqi@hotmail.com

#4

هنرفض انك انت عندك قاعدة بيانات بإسمcust والجدول بإسم emp وبداخل الجدول 4 حقول emp1 من نوع char وemp2 من نوع number و emp3 من نوع date و emp4 من نوع varchar

الاول مش هتصل بأى قاعدة يانات يدوب السيرفر وبس

هنقول لانشاء قاعدة البيانات

cn.execute"create database cust"

طبعا لابد من الاتصال بقاعدة البيانات اللى انا عملتها

علشان انشئ جدول بالمواصفات اللى فوق دى هعمل

cn.Execute "CREATE TABLE cust (emp1 char(20) ,emp2   number(10),emp3 date,emp4 varchar)"

بالتوفيق ان شاء الله

00
 

فاضى 

 

00

#5

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

شكراً جزيلا اخي الفاضل على التواصل معاي

انا عملت زي ماقلت في الاتصال بالسيرفر فقط ولكن اداني خطا في السطر الاخير من الكود وهذا الكود

Dim Cn1 As New ADODB.Connection
	ServerName = "alimf"

	Cn1.ConnectionTimeout = 25
	Cn1.Provider = "sqloledb"
	Cn1.Properties("Data Source").Value = ServerName
	Cn1.Properties("Integrated Security").Value = "SSPI"
Cn1.Execute "CREATE database cust"

برنامج البدر للفنادق

برنامج اداري ومحاسبي و خدمي و سنترال

afalqi@hotmail.com

#6

اخى تفضل وعزرنى على الاخطاء الماضية

cn.Execute "CREATE TABLE emp (emp1 char ,emp2 numeric,emp3 datetime ,emp4 varchar)"

00
 

فاضى 

 

00

#7

عادي مافي مشكلة

بس موضوع انشاء قاعدة البيانات مازبط معاي في الكود الاول

Cn1.Execute "CREATE database cust"

وبرضوه جربي الكود الثاني بتاع الجدول ما شتغل مع العلم اني جربته على قاعدة بيانات موجودة مسبقا

فمادري اش المشكلة الي عندي

برنامج البدر للفنادق

برنامج اداري ومحاسبي و خدمي و سنترال

afalqi@hotmail.com

#8

انت تابعة الكلام اللى انا كاتبة فوق ؟؟؟

يعنى مثلا قبل ماتيجى تنسخ قاعدة البيانات تتصل بالسيرفر

cn.open"provider=sqloledb;server=.;uid=sa;pwd=123"

وده كود انشاء قاعدة البيانات

cn.execute "create datebase cust"

علشان ننشئ الجدول نتصل بقاعدة بيانات اللى هننشئ بداخلها الجدول

cn.open"provider=sqloledb;server=.;uid=sa;pwd=123;database=cust"

cn.Execute "CREATE TABLE emp (emp1 char ,emp2 numeric,emp3 datetime ,emp4 varchar)"

وإذا لم يتم ابعتلى مشروع صغير واربطه بالسيرفر بتاعك وابعته

00
 

فاضى 

 

00

#9

اسف جداً

انا غلط نسيت سطر الفتح

cn1.open

كلة شغال كويس بس ابقى منك شغلة كمان كيف ممكن في انشاء قاعدة البيانات احدد المسار القاعدة و خيارات اللغة العربية في الخصائص مثل couation name

معليش حتعبك معاي شوي

بالاضافة الى البريمري كي في الجدول وشكرا جزيلا 

برنامج البدر للفنادق

برنامج اداري ومحاسبي و خدمي و سنترال

afalqi@hotmail.com

#10

معيش عندي سوال يسهل علينا المشوار الي هو

كيف اسجل قاعدة بيانات في sql server بالكود

يعني مثلاً ممكن انسخ قاعدة البيانات بعد ما خلص من التصميها في اي جهاز انزل فيه البرنامج يكون عندي نسخة فاضيه من قاعدة البيانات بعدين لما احاجها ااغير اسمها وبعدين اضيفها بالكود في sql server بكذا يكون سهلت على نفسي المشوار

برنامج البدر للفنادق

برنامج اداري ومحاسبي و خدمي و سنترال

afalqi@hotmail.com

#11

قصدك ايه مش فاهمك يعنى انت عايز تعمل لقاعدة البيانات اتاتش ؟.؟؟؟؟؟؟؟؟؟؟؟

00
 

فاضى 

 

00

#12

بارك الله فيك

خلاص وصلت للي ابقاه الاتاتش

اش سويت عملت نسخة من الداتا ثابتة لما احتاج اسوي داتا انسخها و النسخة الجديدة اعملها اتاتش بالاسم الي عاوزة

ووصلة لفكرة خصائص الداتا و المسار انا عكيت اليوم وامس لحد ماوصلت للي ابغاة و البركة فيك حتيطني على اول الطريق وانا اعجبك

الف الف شكر على التواصل معاي والله يكثر من امثالك

برنامج البدر للفنادق

برنامج اداري ومحاسبي و خدمي و سنترال

afalqi@hotmail.com

#13

تعجبنى طبعا B) B) :clapping: :clapping: :clapping:

بارك الله فيك طبعا عملة الاتاتش بالكود ؟

00
 

فاضى 

 

00

#14

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

Dim Cn1 As New ADODB.Connection
	ServerName = "alimf"

	Cn1.ConnectionTimeout = 25
	Cn1.Provider = "sqloledb"
	Cn1.Properties("Data Source").Value = ServerName
 Cn1.Properties("Integrated Security").Value = "SSPI"
Cn1.Open
Cn1.Execute "EXECUTE sp_attach_db [db12],  N'e:\db11_data.mdf'"

طبعاً طلعت الكود من برنامج

Query Analyzer بس ببعض التعديلات

شكرا جزيلاً

afalqi@hotmail.com

تم تعديل هذه المشاركة بواسطة alimf في 9 مارس 2009 في 12:36

برنامج البدر للفنادق

برنامج اداري ومحاسبي و خدمي و سنترال

afalqi@hotmail.com

مواضيع مشابهة