for each item in mi_folder.Files response.write(item.name & "<br>") sql = "INSERT INTO tabla (campo) values ('" & item.name & "')" ObjConn.Execute(sql) next