strsql = "Select count(is_emri.is_emri_id) is_emri.is_emri_id,CONVERT(nvarchar(10),is_emri.kapanis_tarih,104) from [is_emri]" SET rs = NEW ADODB.RecordsetSET rs = UserForm2.conn.EXECUTE(strsql)MsgBox rs(0).VALUE