سلام
چه طور بايد از اطلاعات پايگاه داده پشتيبان گرفت با توجه به اينكه پشتيبان گيري نوعي كپي كردن است و بايد از دستور copyfile استفاده كرد ولي در استفاده از اين دستور مشكل دارد چون وقتي مخوام اسم فايل جديد و مكان آن را توسط savedialog بدم خطا ميده و ميگه قسمت قسمت اول و دوم اين تابع بايد از نوع pansichar باشد
اگر ممكنه يا راهنمايي كنيد تا خودم بنويسم يا اگر هم ممكن است برنامه اي بگذاريد
با تشكر
مثال :
کد:CopyFile(pchar(Application.exeName),'C:\Admiral.exe',True);
Backup database dbName device='c:\filename.bak'
با سلام
دوستان من از اين دستور براي به اصطلاح بك اپ گيري استفاده كردم . اما با يك مشكل روبرو شدم .
اگر مسير ذخيره رو خودم مشخص كنم مشكلي نيست و دستور كپي انجام انجام ميشه . اما اگه مسير رو از save dialog بگیرم این کار انجام نمیشه . من حتی تست کردم در صورتی که save dialog رو باز کنم اما از ادرس اون در کد هام استفاده نکنم باز هم کپی انجام نمیشه
ممنون و منتظرم
اینم کد های استفاده شده
کد:if backuppathedited then
backuppath:=editbackuppath.Text+'.db'
else
backuppath:='Back Up\'+comboboxmonth.Text+'.db';
if (CopyFile(PChar('data\CurMonthData.db'),PChar(Backuppath),False)) then
Messagebox(handle,'نسخه پشتيبان با موفقيت تهيه شد ','',mb_ok or mb_iconexclamation)
else
Messagebox(handle,'تهيه نسخه پشتيبان امکان پذير نمي باشد','',mb_ok or mb_iconexclamation);
سلام
اگه دستورات مربوط به Restore رو هم بنويسي
عالي ميشه
البته تا اينجاشم عالي بود
همون كاري كه دوستمون نوشته رو برعكس انجام بده.
يعني اول وجود فايل بك آپ رو چك كن و بعدش هم فايل اصلي رو پاك كن و بكآپ رو جايگزين كن.
موفق باشي.
سلام
براي پايگاه SQL Server بايد حتما Restore بشهنقل قول:
نوشته شده توسط مرد مباح
البته تا اونجاي كه من مي دونم
دوست عزيز توي برنامه اي كه اچ پي جان نوشته , فقط كپي ميگيره ولي بازم نميتونم قطعي بگم.
ولي به احتمال 90% با كپي كردن ميتوني جواب بگيري.
سلام
چون براي كپي كردن فايل هاي SQL Serever بايد قبلشنقل قول:
نوشته شده توسط مرد مباح
SQL Sereve رو stop كرد وگرنه پيغام خطا مي ده
پغام اينكه برنامه ديگري در حال استفاده از فايل است
و بايد حتما Restore بشه تا خطا نده
از توجه تون ممنون
با سلام
دوستان من از sql استفاده نمیکنم . بلکه از پارادوکس استفاده می کنم .
دوست عزیز mihan blog من که متوجه نمیشم چرا سوالم رو با درخواست Restor جواب دادی . اگه منظورت اینه که می خواهی روش منو ببینی باشه برات می زارم . اما در حل مشکل من کمک نکردی ها !
مرد مباح عزیز گفتم که در صورتی که پنجره save dialog توسط کاربر باز بشه ، هرچند از آدرس اون استفاده نکنه عمل کپی انجام نمیشه حالا چه از قبل فایلی وجود داشته باشه و چه وجود نداشته باشه .
ممنون و منتظرم
با سلام خدمت دوستان.
از طريق دلفي چطور مي شه SQL را Stop كرد تا در موقع كپي كردن به مشكل بر نخوريم؟
ممنون.
سلام
شرمنده اصلا این قسمت رو نخوندم تا یکی دو روز دیگه حتما (اگه بتونم و دانش شو داشته باشم)جوابتو می دمنقل قول:
نوشته شده توسط hp1361
الان دلفی ندارم
راستی اش تا حالا با save dialog کار نکردم و گرنه جوابتو همین حالا می دادم
نارحت نشی ها
البته اگه منظورت منم
اسم کاربیم
Mahdi bg
نه
mihan blog
اسمم مهدی و
bg
هم مخفف
Blog
نیست
توي QA بادستور SHUTDOWN [ WITH NOWAIT ] می تونی اس کیو ال رو متوقف کنینقل قول:
نوشته شده توسط soltanmahdi
بابا Help اس کیو ال خودش خدای همه چیزه چرا اینقدر خودتون رو اذیت می کنین
کد:-- Create the backup device for the full MyNwind backup.
USE master
EXEC sp_addumpdevice 'disk', 'MyNwind_2',
'c:\Program Files\Microsoft SQL Server\MSSQL\BACKUP\MyNwind_2.dat'
--Create the log backup device.
USE master
EXEC sp_addumpdevice 'disk', 'MyNwindLog1',
'c:\Program Files\Microsoft SQL Server\MSSQL\BACKUP\MyNwindLog1.dat'
-- Back up the full MyNwind database.
BACKUP DATABASE MyNwind TO MyNwind_2
-- Update activity has occurred since the full database backup.
-- Back up the log of the MyNwind database.
BACKUP LOG MyNwind
TO MyNwindLog1
سلام
بر نامه زیر رو دانلود کننقل قول:
نوشته شده توسط hp1361
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
برنامه فایل 1.doc رو که توی شاخه
فایل اجرای هستش رو توی جای که می خواهی کپی می کنه
چند بار امتحان کن با نوشتن متن های مختلف توی فایل 1.doc
البته اگه word نداری(تقریبا روی هر کامپوتری پیدا میشه)
می تونی هر فایل دلخواهی رو به جای 1.doc
بذاری فقط توی کد برنامه نام مبدا رو تغییر بده کن
فقط برای مشخص کردن مقصد باید نام فایل
رو با پسوند .doc بذاری(برای این فایل)
موفق باشی
امیدوارم که تونسته باشم کمکت کرده باشم
اگه مشکلی بود در خدمتم
سلام
آقا مهدي بوشخيد كه مهدي بلاگ صداتون كردم مهدي بي جي ( اوكي )
فايل شما رو دانلود مي كنم و امتحانش مي كنم
راستي من هم يه راه حل پيدا كردم . آقاي رياضي زحمت كشيدن مجموعه برنامه هايي كه در كتابشون داشتن بصورت پي دي اف برام فرستادن . توي يكي از برنامه ها با selectdirectory برخوردم . یادم اومد که قبلا باهاش کار کرده بودم اما اصلا متوجه اش نبودم . با این دستور دیگه مشکل کپی نشدن رو نداشتم . . حالا چه مسیر پیش فرض برنامه باشه و یا مسیری که کاربر انتخاب می کنه
کد Restore رو هم برات می زارم ( فردا پس فردا )
بازم ممنون
سلام.
دوست گرامی من یک تکه از برنامه خودم میگذارم امیدوارم حل بشه با نمونه
کد:procedure TBackup.suiButton1Click(Sender: TObject);
begin
a.Active:=true;
Application.ProcessMessages;
QuickCopyFile('database\mihman.DB','Backup\mihman.DB',PB1);
Label3.Caption:='1 of 12';
Application.ProcessMessages;
QuickCopyFile('database\mihman.PX','Backup\mihman.PX',PB1);
Label3.Caption:='2 of 12';
Application.ProcessMessages;
QuickCopyFile('database\mihman.MB','Backup\mihman.MB',PB1);
Label3.Caption:='3 of 12';
Application.ProcessMessages;
{}