[سعود]

PHP كود :

Using con As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Application.StartupPath & "\db.accdb")
            Using cm As New OleDbCommand("", con)
                con.Open()
                cm.CommandText = "delete from tb1"
                cm.ExecuteNonQuery()
                cm.CommandText = "delete from tb2"
                cm.ExecuteNonQuery()
                cm.CommandText = "delete from tb3"
                cm.ExecuteNonQuery()
                con.Close()
            End Using
        End Using