Ver Mensaje Individual
  #2 (permalink)  
Antiguo 24/01/2006, 09:08
Avatar de axy108
axy108
 
Fecha de Ingreso: diciembre-2003
Ubicación: En frente de mi Computadora
Mensajes: 415
Antigüedad: 21 años, 1 mes
Puntos: 0
ok solo regreso para informarles que he solucionado mi problema, tal ves de una manera muy arcacica pero bueno lo solucione, aqui les dejo como:

Bueno pues primero lo que hago es obtener el dia de la semana en que se esta haciendo la solicitud del anticipo, una vez que ya tengo esto mediante el metodo addDays de un objeto date segun sea el caso agrego la cantidad de dias necesarios, por ejemplo si el anticipo se esta solicitando un lunes, el dia de la semana es 1 (ya que domingo es 0), y por consiguiente para obtener la fecha del siguiente lunes debo de agregarle 7 dias, y asi dependiendo del dia que soliciten.

Aqui les pongo el codigo de esa parte.

Código:
...
                Dim fecha As Date
                Dim dia As DayOfWeek
                Dim diaPaga As Date
                fecha = Now()
                dia = fecha.DayOfWeek
                Select Case dia
                    Case DayOfWeek.Monday
                        diaPaga = fecha.AddDays(7)
                    Case DayOfWeek.Tuesday
                        diaPaga = fecha.AddDays(6)
                    Case DayOfWeek.Wednesday
                        diaPaga = fecha.AddDays(5)
                    Case DayOfWeek.Thursday
                        diaPaga = fecha.AddDays(4)
                    Case Else
                        diaPaga = fecha.AddDays(10)
...
SALUDOS Y GRACIAS de todas maneras.
__________________
Todos somos muy ignorantes :pensando: . Lo que ocurre es que no todos ignoramos las mismas cosas ;-) .... Albert Einstein :cool: