Programa registro accidentes

Hola amigos:

Soy nuevo en este foro, no se si es el sitio adecuado, pido disculpas anticipadas si así fuese.

He hecho un pequeño programa en Visual Basic para registro de accidentes (Equipos Atestados de mi Unidad) y quisiera saber si alguno de vosotros programa en Visual Basic para haceros una consulta.

Gracias anticipadas

Saludos

Bueno , yo he programado algo en VB 6.0 . La verdad es que llevo unos meses "fuera de combate", pero expón tu problema a ver que se puede hacer. En cualquier caso , tambien existe un grupo de noticias sobre programacion en visual basic. Pero lo dicho , a ver cual es tu problema.

Hola Aguscan

precisamente en VB6 lo estoy haciendo,

Bueno lo que quiero hacer es una Select a la que le suministre año y carretera y me devuelva los puntos negros, es decir grupos de 3 o más registros en los que "coincida" (con los margenes establecidos) el valor del campo kilometro.

Gracias y saludotes

Bueno , la verdad es que me faltan datos pero en fin...a ver que tal.

Te creas un recodset del tipo "select * from tabla where año=dato and carretera =dato ". Una vez tienes este recodset lo puedes recorrer , por ejemplo

do until rs.eof ( rs es el recordset)

'aqui comprobarias punto kilometrico a puntokilometrico que reuniera una condicion (+- kilometros) y las coincidencias las anotaras en una variable. Si esta variable es superior a 3 , este punto kilometrico lo añades a un combo , por ejemplo .

Combo1.aditem rs.field("puntokilometrico")

rs.movenext

loop

y así hasta recorrer todo el recordset. No se si te habrá servido de algo. Si quieres poner algo de código para que pueda ayudarte mejor....

Hola Aguscan:

Gracias por contestar y perdon por la tardanza, pero el trabajo no le deja a uno disponer de todo el tiempo que quisiera.

Bueno en cuanto a la explicacion que me das, montar la Select (a medias), la sé montar (Select * From tabla Where (campo) Fecha= 2003 and (campo)carretera=L-100 Order By Fecha,Kilometro), Rs.open (Consulta),conexion

pero lo que no se es seguir, es decir es hacer el Do Until del Recorset con el campo Kilometros para cojer solo los coincidentes y/o los que se encuentren entre un margen de + - 10 mts entre sí, te agradecería un ejemplo.

Gracias de nuevo

a ver si este finde puedo programar algo...ya te avisaré