07-06-16, 02:31 AM
07-06-16, 03:37 AM
PHP كود :
Sub ClearTables()
Dim conn As New OleDbConnection(constr)
Dim cmd As New OleDbCommand("DELETE * FROM DataBaseName", conn)
Try
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
Catch ex As Exception
MsgBox(ex.Message, vbOKOnly, "Clear DataBase Table!")
End Try
End Sub