PDA

View Full Version : مشكل با بانك اطلاعاتي



majid_vb_2008
پنج شنبه 14 آبان 1388, 16:36 عصر
سلام دوستان اميدوارم اين دفعه حذف نشم

من يك برنامه با بانك اطلاعاتي Sql نوشتم و به مشتري تحويل دادم حالا مي خوام يه نسخه جديد بهش بدم
مشكل اينجايه كه توي بانك اطلاعاتي برنامه تغييرات ايجاد شده حالا نمي دونم چجوري اطلاعاتي رو كه مشتري توي بانك اطلاعاتي ذخيره كرده رو به بانك اطلاعاتي جديد منتقل كنم

كمك كنيد من گيچ شدم :گیج:

DLL_DLL
پنج شنبه 14 آبان 1388, 17:52 عصر
در صورت امکان شما تغییرلت جدید اضافه شده را به بانک اطلاعاتی قبلیت اضافه کن. تا اینکه قیدیمی را به جدید اضافه کنی.

majid_vb_2008
پنج شنبه 14 آبان 1388, 19:29 عصر
در صورت امکان شما تغییرلت جدید اضافه شده را به بانک اطلاعاتی قبلیت اضافه کن. تا اینکه قیدیمی را به جدید اضافه کنی.

مي شه بيشتر توضيح بدي چجوري بانك اطلاعاتي قديمي رو تغيير بدم

Mr_Mahmoud
جمعه 15 آبان 1388, 14:19 عصر
میگم سرچ هم چیز خوبیه ها...:لبخند:
اینجا رو ببین دوست عزیز

http://barnamenevis.org/forum/showthread.php?t=187384

majid_vb_2008
جمعه 15 آبان 1388, 19:28 عصر
میگم سرچ هم چیز خوبیه ها...:لبخند:
اینجا رو ببین دوست عزیز

دوست من منم قبلا اونجا رو ديده بودم ولي به نتيجه نرسيدم
ظما من از sql خود ويژال استديو استفاده مي كنم

من منتظر كمك شما هستم

shahab2025
شنبه 16 آبان 1388, 00:09 صبح
سلام
من از بانک sql در برنامه هام استفاده میکنم و اکثر تغییراتی هم که میدم در تعداد فیلدهای جداول و به طبع پر کردن فیلدهای جدید است. البته برخی اوقات هم پیش میاد که اطلاعات را اصلاح کنم.
میخواستم بگم که برای انتقال تمامی این کار ها از query استفاده میکنم . بدین صورت که یک یا چند query مینویسم سپس اونها را با یک فایل زیپ ارسال کرده و بر روی دیتابیس مشتری پیاده میکنم.

گفتم شاید این کار مشکل شما رو هم حل کنه...:لبخندساده:

majid_vb_2008
شنبه 16 آبان 1388, 10:13 صبح
سلام
من از بانک sql در برنامه هام استفاده میکنم و اکثر تغییراتی هم که میدم در تعداد فیلدهای جداول و به طبع پر کردن فیلدهای جدید است. البته برخی اوقات هم پیش میاد که اطلاعات را اصلاح کنم.
میخواستم بگم که برای انتقال تمامی این کار ها از query استفاده میکنم . بدین صورت که یک یا چند query مینویسم سپس اونها را با یک فایل زیپ ارسال کرده و بر روی دیتابیس مشتری پیاده میکنم.

گفتم شاید این کار مشکل شما رو هم حل کنه...:لبخندساده:


دوست من اگه ميشه بيشتر رام توضيح بده ممنون

shahab2025
شنبه 16 آبان 1388, 13:50 عصر
دوست عزيز
يك نمونه از تغييراتي را كه در بانك دادي و ميخواهي به بانك مشتري انتقال دهي را توضيح بده تا من معادل آنها query بهت معرفي كنم

pourang_us
شنبه 16 آبان 1388, 14:02 عصر
دوست عزیز سلام

اینجا رو بخون

http://www.barnamenevis.org/forum/showthread.php?t=186911

یه نگاهی هم به اون فایل بنداز فکر کنم مشکلت رو حل کنه


موفق باشی

shahab2025
شنبه 16 آبان 1388, 14:29 عصر
سلام
اينم من واست پيدا كردم
مدير بخش sql پاسخگو بوده است

http://www.barnamenevis.org/forum/showthread.php?t=176229

majid_vb_2008
شنبه 16 آبان 1388, 17:44 عصر
دوست عزيز
يك نمونه از تغييراتي را كه در بانك دادي و ميخواهي به بانك مشتري انتقال دهي را توضيح بده تا من معادل آنها query بهت معرفي كنم

دوست من به عنوان مثال من توي بانك اطلاعاتي يك جدول جديد مي سازم يا به جدول قبلي يك فيلد ازافه مي كنم

لطفا توضيح بديد

shahab2025
یک شنبه 17 آبان 1388, 20:00 عصر
به عنوان مثال من توي بانك اطلاعاتي يك جدول جديد مي سازم

به عنوان مثال من یک جدول جدید برای نشان دادن تغییرات ورژن برنامه به برنامه اضافه میکنم


CREATETABLE [GnrVersion](
[Serial] [int] NOTNULL,
[VerNo] [nvarchar](20)NULL,
[VerDate] [nchar](10)NULL,
[Script] [text] NULL,
[Dsc] [nvarchar](255)NULL,
CONSTRAINT [PK_GnrVersion] PRIMARYKEYCLUSTERED
(
[Serial] ASC
)WITH (PAD_INDEX=OFF,STATISTICS_NORECOMPUTE=OFF,IGNORE_D UP_KEY=OFF,ALLOW_ROW_LOCKS=ON,ALLOW_PAGE_LOCKS=ON) ON [PRIMARY]
)ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO




به جدول قبلي يك فيلد ازافه مي كنم



ALTER TABLE dbo.gnrversion ADD new_Col VARCHAR(20) NULL ;
GO
EXEC sp_help gnrversion ;
GO

majid_vb_2008
یک شنبه 17 آبان 1388, 20:21 عصر
به عنوان مثال من یک جدول جدید برای نشان دادن تغییرات ورژن برنامه به برنامه اضافه میکنم


CREATETABLE [GnrVersion](
[Serial] [int] NOTNULL,
[VerNo] [nvarchar](20)NULL,
[VerDate] [nchar](10)NULL,
[Script] [text] NULL,
[Dsc] [nvarchar](255)NULL,
CONSTRAINT [PK_GnrVersion] PRIMARYKEYCLUSTERED
(
[Serial] ASC
)WITH (PAD_INDEX=OFF,STATISTICS_NORECOMPUTE=OFF,IGNORE_D UP_KEY=OFF,ALLOW_ROW_LOCKS=ON,ALLOW_PAGE_LOCKS=ON) ON [PRIMARY]
)ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO



ALTERTABLE dbo.gnrversion ADD new_Col VARCHAR(20)NULL;
GO
EXECsp_helpgnrversion ;
GO


من اينجوري متوجه نمي شم
عزيزم اگه مي توني برام كد vb بزاري

Mr_Mahmoud
یک شنبه 17 آبان 1388, 23:38 عصر
جالبه...این همه کد وی بی دیگه...فک کنم ما مشکل شما رو متوجه نمیشیم....:متفکر:

shahab2025
دوشنبه 18 آبان 1388, 18:44 عصر
عزيزم اگه مي توني برام كد vb بزاري

سلام
خیلی سخت نیست . اینا کدهای sql است میتونی بزاری جلوی sql command و اجراشون کنی

ولی دقت کن این دستورات غالباً یک بار بر روی دیتابیس مشتری اجرا میشن پس بهتره به صورت کدهای sql برن ولی اگه اصرار داری یه دگمه به فرم اضافه کن و اینا رو بزار توش اسمشم بزار update:خجالت:

به همین راحتی:بامزه:

majid_vb_2008
شنبه 30 آبان 1388, 14:29 عصر
سلام دوستان
يعني هيچ كس نمي دونه كه اين دستورات رو چجوري از توي vb اجرا كنم

من منتظرم

shahab2025
شنبه 30 آبان 1388, 18:27 عصر
يعني هيچ كس نمي دونه كه اين دستورات رو چجوري از توي vb اجرا كنم

سلام دوست من

من احساس ميكنم كه خيلي ساده و روان راه حل مشكل را توضيح دادم . نميفهمم كجاي حرف من گنگ بوده است ؟؟؟؟:گیج:

اگر شما تا حالا دستورات sql را در برنامه ات اجرا كرده باشي كه اين هم مثل همان است . اما اگر اين كار را نكرده اي هم مهم نيست بگو تا برايت نمونه بگذارم...:لبخندساده:

majid_vb_2008
شنبه 30 آبان 1388, 19:19 عصر
دوست من يعني مثل همان دستورات select و delete بايد اجرا شود

اگه مي شه يك كد كچولو برام بزار

shahab2025
یک شنبه 01 آذر 1388, 01:07 صبح
دوست من يعني مثل همان دستورات select و delete بايد اجرا شود

اره عزيز جان دقيقاً ...:چشمک:

majid_vb_2008
یک شنبه 01 آذر 1388, 15:06 عصر
اره عزيز جان دقيقاً ...:چشمک:


دوست من قرار شد يك نمونه كد كوچولو هم بزاري


بازم ممنون

shahab2025
یک شنبه 01 آذر 1388, 16:54 عصر
Dim con As New SqlConnection(s1)
Dim cmd As New SqlCommand("", con)
Try
cmd.CommandText = "CREATE TABLE [GnrVersion]( " & _
"[Serial] [int] NOTNULL,[VerNo] [nvarchar](20)NULL,[VerDate] [nchar](10)NULL,[Script] [text] NULL," & _
"[Dsc] [nvarchar](255)NULL,CONSTRAINT [PK_GnrVersion] PRIMARYKEYCLUSTERED ([Serial](Asc))" & _
"WITH (PAD_INDEX=OFF,STATISTICS_NORECOMPUTE=OFF,IGNORE_D UP_KEY=OFF,ALLOW_ROW_LOCKS=ON,ALLOW_PAGE_LOCKS=ON) ON " & _
"[PRIMARY](""))ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]"
If con.State = ConnectionState.Closed Then con.Open()
cmd.ExecuteNonQuery()
con.Close()
ProgressBar1.Value = ProgressBar1.Value + 5
Catch ex As Exception
MsgBox(ex.Message)
btnExit.Enabled = True
Exit Sub
End Tryبفرما عزيز جان . اينم يه نمونه بابت درست كردن table