mortezamhd
جمعه 24 مهر 1388, 01:48 صبح
سلام
من وقتی میخوام از بانکم کپی بگیرم ارور میده (اصلا یادم نیست چه ارروری میداد) البته این مشکل رو توی سیستم خودم ندارم ولی توی سیستم های دیگه اشکال داره
میشه بگید مشکلش از چیه ؟
اینم کدم :
Imports System.IO
sfd1.Filter = "Microsoft Access Database (*.mdb)|*.mdb"
sfd1.FileName = "Database"
If sfd1.ShowDialog = Windows.Forms.DialogResult.OK Then
File.Copy(path, sfd1.FileName, True)
If File.Exists(sfd1.FileName) Then
MsgBox("عملیات پشتیبان گیری از بانک با موفقیت انجام شد", MsgBoxStyle.MsgBoxRight + MsgBoxStyle.MsgBoxRtlReading + MsgBoxStyle.Information, "پشتیبان گیری تمام شد")
Else
MsgBox("عملیات پشتیبان گیری از بانک با مشکل روبه رو شده . لطفا دوباره سعی کنید ", MsgBoxStyle.MsgBoxRight + MsgBoxStyle.MsgBoxRtlReading + MsgBoxStyle.Critical, "خطا در پشتیبان گیری")
EndIf
EndIf
من وقتی میخوام از بانکم کپی بگیرم ارور میده (اصلا یادم نیست چه ارروری میداد) البته این مشکل رو توی سیستم خودم ندارم ولی توی سیستم های دیگه اشکال داره
میشه بگید مشکلش از چیه ؟
اینم کدم :
Imports System.IO
sfd1.Filter = "Microsoft Access Database (*.mdb)|*.mdb"
sfd1.FileName = "Database"
If sfd1.ShowDialog = Windows.Forms.DialogResult.OK Then
File.Copy(path, sfd1.FileName, True)
If File.Exists(sfd1.FileName) Then
MsgBox("عملیات پشتیبان گیری از بانک با موفقیت انجام شد", MsgBoxStyle.MsgBoxRight + MsgBoxStyle.MsgBoxRtlReading + MsgBoxStyle.Information, "پشتیبان گیری تمام شد")
Else
MsgBox("عملیات پشتیبان گیری از بانک با مشکل روبه رو شده . لطفا دوباره سعی کنید ", MsgBoxStyle.MsgBoxRight + MsgBoxStyle.MsgBoxRtlReading + MsgBoxStyle.Critical, "خطا در پشتیبان گیری")
EndIf
EndIf