Visual Basic - COMO CONTAR ARCHIVOS DE UN DIRECTORIO

hola necesito su ayuda urgentemente estoy necesitando una rutina que me permita realizar el proceso :

de un Directorio Una cantidad de archivos (tantos sean) .jpg ser contados y dependiendo su nombre guardarlo en la base de datos sql preguntandose si existe por medio del nombre que serian numeros por ejemplo 1231.jpg, y asi mismo aleatoriamente (por que no son correlativos) guardarlos en el campo correspondiente al numero asignado por favor existe la manera de hacer esto????? S.O.S.....

para recorrer un directorio en busca de todos los archivos, puedes hacer lo siguiente:

private sub RecorrerDirectorio()

Dim Archivo as String

Archivo = Dir(C:\Midirectorio\*.jpg)

do while Archivo <> ""
'En la variable archivo tienes el nombre, así que ya puedes hacer lo que
'desees

Instruccion1
Instruccion2
Instruccion3
......
.....

'Esta linea ejecuta el dir con el utlimo filtro, y siempre hacia adelante, con lo
'cual te devolverá el próximo archivo que cumpla con la condicion
Archivo = Dir
Loop


End Sub

Espero que te haya servido... saludos!