VB的保存路径

用VB上传文件，怎么写文件的保存路径，保存在D盘文本文件夹中 --------------------编程问答-------------------- 直接 "d:\txt\" 不行么? --------------------编程问答-------------------- 不行，要不我发过去你帮我改改吧 --------------------编程问答-------------------- Sub uploadfile(ByVal f1 As FileUpload, ByVal filesize As Integer, ByVal filepath As String, ByVal filetype As String)
        '参数说明        'f1上传控件FileUpload ID ; filesiz 限制上传文件大小，以M为单位；        'filepath上传文件存放相对于页面的目录，如果是本目录请留空；        'filetype　允许上传文件的类型，例如　"jpg,gif,jpeg,rar"　；
        If f1.HasFile Then
            Dim allowtype As String = filetype
            Try
                Dim upfile As Array = Split(f1.FileName, ".") '以数组的方式获取上传文件名
                Dim i As Integer = Split(f1.FileName, ".").Length '获取数组的元素个数
                'Dim bFind As Boolean = Array.Find(Of String)(allowtype2, AddressOf find)
                Dim errstr = "对不起，您上传的文件不合法"
                If f1.PostedFile.ContentLength > (1024 * 1024 * filesize) Then
                    Response.Write("文件大小不正确！")
                    Exit Try
                ElseIf i > 2 Then
                    Response.Write(errstr)
                    Exit Try
                Else
                    Dim ftype As String = Split(f1.FileName, ".")(1)
                    If allowtype.IndexOf(ftype) <> -1 Then   '取得类型文件的索引．索引存在则上传文件类型符合．
                        Dim FileName As String = Now.Year.ToString & Now.Month.ToString & Now.Day.ToString & Now.Hour.ToString & Now.Minute.ToString & Now.Second.ToString & "." & ftype
                        f1.SaveAs(Server.MapPath("d:\txt\") & "\" & filepath & "\" & FileName)
                        Response.Write("恭喜！上传成功！<br>")
                        Response.Write("上传后文件名是：" & FileName)
                        f1.Dispose() '销毁对象
                    Else
                        Response.Write("上传文件类型不正确")
                    End If
                End If
            Catch ex As Exception
                Response.Write(ex.Message)
            End Try
        Else
            Response.Write("请选择要上传的文件！")
        End If
    End Sub '调用方式例：
--------------------编程问答-------------------- '参数说明        'f1上传控件FileUpload ID ; filesiz 限制上传文件大小，以M为单位；        'filepath上传文件存放相对于页面的目录，如果是本目录请留空；        'filetype　允许上传文件的类型，例如　"jpg,gif,jpeg,rar"　； --------------------编程问答--------------------

补充：VB ,  基础类