复制文件使用NSBasic/CE 7.0

Question

我使用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？

Answer 1

据有关NS基本/ CE网站的信息，它包括提供文件系统管理功能中的下列对象：

• FileSystem
• newObjects.utilctls.SFMain（需要NewObjectsPack1.dll库）

要复制文件，可以使用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