Копирование файлов с использованием NSBasic / CE 7.0 - PullRequest
1 голос
/ 05 марта 2010

Я использую NSBasic / CE 7.0 и мне нужно скопировать файл, но я не знаю, как копировать с помощью этой программы, но в то время у меня уже было это:

AddObject "cecomdlg.commondialog.1", "ComSvDlg", 0, 0, 0, 0

Sub saveDialog()
  ComSvDlg.CancelError = 0
  ComSvDlg.DialogTitle = "Copy"
  ComSvDlg.Filter = "All Files|*.*"
  ComSvDlg.ShowSave
  If Err.Number = 0 Then
    txtFileName = ComSvDlg.FileName
    MsgBox txtFileName
    ElseIf Err.Number = 32755 Then
      MsgBox "Canceled"
  End If
  KillFocus
End Sub

Sub mnuSave_Click
  saveDialog
  txtOutput.Text = ComSvDlg.FileName
End Sub

Но одна из самых важных (копия) я не знаю, как сделать. Не могли бы вы помочь мне скопировать файл из \test.txt в ComSvDlg.Filename?

1 Ответ

1 голос
/ 06 марта 2010

Согласно информации на веб-сайте NS Basic / CE, он включает в себя следующие объекты, которые обеспечивают функциональность управления файловой системой:

Чтобы скопировать файл, вы можете использовать метод FileSystem.FileCopy или метод SFMain.CopyFile. Код должен выглядеть следующим образом (не проверено, поскольку у меня нет NS Basic):

''# Using the FileSystem object
AddObject "FileSystem", "FS"
FS.FileCopy "\test.txt", ComSvDlg.FileName

''# Using the SFMain object
AddObject "newObjects.utilctls.SFMain", "FS"
FS.CopyFile "\test.txt", ComSvDlg.FileName
...