Coba Ini Gan: Dim intMaxID As Integer Dim strID As String Dim maxIdCommand As OleDbCommand = New OleDbCommand("SELECT MAX() AS MaxID FROM Nama_tabel_Agan WHERE Nama_Row LIKE '%" & Format(CDate(dtTanggal.Value), "yyyyMMdd") & "%'", OLE_Con
