如何让用户输入文档然后保存该文档?

How do I get a user to input a document and then save that document?

所以我有点坚持我的项目,我正在使用 Visual Studio 并在 Visual Basic 中编码,如果有帮助的话,我还使用带有 SQL 的 Microsoft Access。

我需要的是允许用户从 OpenFileDialog select 文档,然后将该文档保存到实际程序中,以便在下一个程序运行时它就在那里 运行。

下面的代码是在按下按钮时触发的,我目前拥有的是...

    saveDocumentDialog.Filter = "Document Files|*.docx;*.doc;*.dot;*.txt;*.rtf;*.pdf;*.ppt;*.pptx;*.xls;*.xlsx"
    saveDocumentDialog.FileName = "Untitled"
    saveDocumentDialog.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.Desktop
    saveDocumentDialog.ShowDialog()

    If saveDocumentDialog.ShowDialog = Windows.Forms.DialogResult.OK Then

        fullFilename = saveDocumentDialog.FileName

    End If

    Using openDocumentDialog As New SaveFileDialog

        Dim filename As String = IO.Path.GetFileName(fullFilename)
        openDocumentDialog.FileName = "Untitled"
        openDocumentDialog.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.Desktop
        openDocumentDialog.Title = "Select Save Location"
        openDocumentDialog.Filter = "All Files (*.*)|*.*"

        If openDocumentDialog.ShowDialog = Windows.Forms.DialogResult.OK Then

            Try

                My.Computer.FileSystem.CopyFile(fullFilename, openDocumentDialog.FileName)

            Catch ex As Exception

                MessageBox.Show("Could not copy the file." & Environment.NewLine & ex.Message, "Error copying file.", MessageBoxButtons.OK, MessageBoxIcon.Error)

            End Try

        End If

一种方法是为程序指定一个特定的文件夹(例如 Public Documents),然后将文件保存在那里,并在程序重新启动时从文件夹中重新加载它们。您可以对路径进行硬编码,也可以在程序中进行设置,让用户指定他们喜欢的文件夹。