推薦：如何解決CSV字段數(shù)據(jù)的雙引號問題
主要解決CSV字段數(shù)據(jù)帶有雙引號的問題 具體代碼如下： 以下為引用的內容： Public Function ChangeCsvSplitLine(ByVal s

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click '備份數(shù)據(jù)庫 'BACKUP DATABASE Test TO DISK='C:/Backup' WITH Format Dim cn As SqlConnection Dim cm As SqlCommand cn = getDB() cm = New SqlCommand("BACKUP DATABASE JXbase TO DISK='C:/Backup ' WITH Format", cn) cn.Open() cm.ExecuteNonQuery() MsgBox("備份成功") cn.Close()

End Sub

'恢復 Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click Dim cn As New SqlConnection Dim cn1 As New SqlConnection Dim mydr As SqlDataReader Dim str As String

Dim tmpConnectionString As String = "Data Source=JJK;Initial Catalog=master;Integrated Security=True" cn.ConnectionString = tmpConnectionString cn1.ConnectionString = tmpConnectionString cn.Open() cn1.Open() Dim cm As SqlCommand = New SqlCommand("select spid from master..sysprocesses where dbid=db_id('JXbase')", cn) mydr = cm.ExecuteReader()

Dim cm1 As SqlCommand = New SqlCommand() cm1.Connection = cn1

While (mydr.Read()) '殺死進程

str = "kill " & mydr("spid").ToString() cm1.CommandText = str cm1.CommandType = CommandType.Text Application.DoEvents() cm1.ExecuteNonQuery() '殺進程 End While mydr.Close() cm = New SqlCommand("RESTORE DATABASE JXbase FROM DISK='C:/Backup'", cn) '恢復備份 cm.ExecuteNonQuery() MsgBox("恢復成功成功") cn.Close() cn1.Close()

End Sub

分享：解析.NET FileStreams如何將DTD插入XML文件中
.NET類則更加方便，它會帶給你更多使用上的靈活性。技術工具箱： VB.NET, XML, ADO.NETADO.NET提供了一種很好的功能來處理dataset和XML之間的轉換。你可以通過VS.NET在XML中形象地創(chuàng)