[ماشي]

PHP كود :

Dim cnn As New OleDbConnection ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Database1.accdb;Jet OLEDB:Database Password=")

Dim da As New OleDbDataAdapter("SELECT col1, COUNT(col1) FROM tbl GROUP BY col1", cnn)

Dim dt As DataTable
da.Fill(dt)

DataGridView1.DataSource = dt