主题：备份本机SQL数据库

老师，我单独写了一个功能，备份本机SQL数据库

但这个软件并未连接任何数据库，不能指定数据库名，现在用下面这句放报错

Dim mc As String = "HHiDT"
Dim bf As String = "D:\bak\"& mc & format(Date.now,"yyyyMMddHHmmss") & ".bak"
Dim Result As DialogResult
Result = MessageBox.Show("是否本机上的数据库
此主题相关图片如下：1234.png

?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    Dim cmd As New SQL Command
    'cmd.Connection Name = "database"
    cmd.CommandText = "use master;BACKUP DATABASE " & mc & "  TO DISK = '" & bf & "'  With FORMAT,CHECKSUM;"
    cmd.ExecuteNonQuery()
End If