vb.net中备份SQL数据库有关问题

vb.net中备份SQL数据库问题
Dim   str1   As   String,   str2   As   String  
Dim   myConnection   As   New   SqlConnection( "server=WINDOWS-A845DAB;database=1;integrated   security=true ")  
Dim   backupSql   As   String   =   "Backup   database   1   to   disk= "   &   str2   &   "with   name   = "   &   str1   &   ".bak   "  
Dim   myCommand   As   New   SqlCommand(backupSql,   myConnection)  
'1为要备份的数据库名  
'数据备份到str2,备份文件名为str1  
Private   Sub   Button1_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button1.Click  

str1   =   "textbox1.text "  
str2   =   "textbox2.text "  
myConnection.Open()  
myCommand.ExecuteNonQuery()  
myConnection.Close()  
MsgBox( "备份成功! ")  
End   Sub  
每次都是运行到myCommand.ExecuteNonQuery()发生中断，  
应该是语句些的有问题吧，  
帮忙改改~


[解决办法]
'备份数据库的方法 备份成功返回True
'要备份的数据库DBaseName
'备份后的文件BakName
Public Function BakData(ByVal DBaseName As String, ByVal BakName As String) As Boolean

Me.Open()
Me.SqlCmd.Connection = SqlCon
Me.SqlCmd.CommandText = "Backup database " & DBaseName & " to disk= ' " & BakName & " ' "
Try
Me.SqlCmd.ExecuteNonQuery()
Return True
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation)
Return False
Finally
Me.Closse()
End Try
End Function
昨晚写的，测试了一下，是可以的，哈哈。