Foros del Web » Programando para Internet » ASP Clásico »

problemas con ciclos while y consultas en asp

Estas en el tema de problemas con ciclos while y consultas en asp en el foro de ASP Clásico en Foros del Web. hola amigos miren tengo este codigo: Cita: set registros2 = conexion.execute("SELECT Valor FROM Ejecutivas Where Tipo='Back'") Do While NOT registros2.EOF ejec = registros2.Fields("Valor") response.write "<table ...
  #1 (permalink)  
Antiguo 17/02/2006, 06:36
Avatar de mc_quake  
Fecha de Ingreso: enero-2006
Ubicación: www.ecocargo.cl
Mensajes: 683
Antigüedad: 19 años, 3 meses
Puntos: 8
problemas con ciclos while y consultas en asp

hola amigos miren tengo este codigo:

Cita:
set registros2 = conexion.execute("SELECT Valor FROM Ejecutivas Where Tipo='Back'")
Do While NOT registros2.EOF
ejec = registros2.Fields("Valor")

response.write "<table border=""1"" width=""74"">"
response.write " <tr>"

Do While diaini=<diafin

set registros = conexion.execute("SELECT * FROM "&BD&" WHERE Ejecutivo = "&ejec&" and FechaRF = #"&Month(fechadosini)&"/"&diaini&"/"&Year(fechadosini)&"#")
cont=0
Do While NOT registros.EOF
cont = cont + 1
registros.MoveNext
Loop
response.write ejec&"0000"

response.write "<td width=24 height=20 bgcolor=#666666><font color=#FFFFFF size=2>"&cont&"</font></td>"


diaini=diaini+1

Loop
response.write " </tr>"
response.write "</table>"

registros2.MoveNext
Loop
les explico mi problema es el siguiiente si se dan cuenta

yo selecciono los ejecutivos de a cuerdo a una condicion que sean de tipo = Back los registros obtenidos los dejo en una variable ejec = registros2.Fields("Valor")
eso funciona bien luego dentro del while principal pongo otro donde busco todos los registros de la BD cullo ejecutivo ="&ejec&" y la fecha sea la indicada bueno aca esta el problema ya que esta consulta:
FROM "&BD&" WHERE Ejecutivo = "&ejec&" and FechaRF = #"&Month(fechadosini)&"/"&diaini&"/"&Year(fechadosini)&"#")

no me funciona por que no me toma el valor de la variable ejec y lo comprobe poniendo un nombre en duro y hay funciona alguien sabe cual es mi error


de antemano gracias al que conteste mi pregunta
__________________
Mc_Quake

Para ayudar en lo que se pueda:Zzz:
  #2 (permalink)  
Antiguo 17/02/2006, 08:29
Avatar de Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses
Puntos: 146
¿El campo "ejecutivo" es numérico o string?
  #3 (permalink)  
Antiguo 17/02/2006, 10:01
Avatar de mc_quake  
Fecha de Ingreso: enero-2006
Ubicación: www.ecocargo.cl
Mensajes: 683
Antigüedad: 19 años, 3 meses
Puntos: 8
es string ya compadres lo solucione el problema radicaba en la fecha ya que el diaini en la primera pasada por el ciclo while llegaba a su tope y cuando se cambiaba el ejecutivo el diaini ya era igual al diafin asi que tuve que ponerlo de la siguiente forma

Cita:

response.write "<table width=""100%"" height=""30%"" border=""0"">"
response.write " <tr> "
response.write " <td width=""5%"" height="""" valign=""top"">"
response.write "<table border=""0"" width=""0%"">"
response.write"<tr>"
response.write" <td><font color=#FFFFFF size=2></font>&nbsp;</td>"
response.write"</tr>"
set registros1 = conexion.execute("SELECT Valor FROM Ejecutivas Where Tipo='Back'")

Do While NOT registros1.EOF
ejec = registros1.Fields("Valor").Value

response.write"<tr>"
response.write" <td width=1% height=25 bgcolor=#FFCC66><font color=#666666 size=2><strong><div align=center>"&ejec&"</div></strong></font></td>"
response.write"</tr>"

registros1.MoveNext
Loop
response.write "</table>"
response.write"</td>"
response.write " <td width=""95%"" valign=""top"">"

set registros2 = conexion.execute("SELECT Valor FROM Ejecutivas Where Tipo='Back'")
response.write "<table border=""0"" width=""100%"">"
response.write " <tr>"
While NOT registros2.EOF
ejec = registros2.Fields("Valor")
'response.write "<table border=""0"" width=""100%"">"

while feini =< fefin
fecha = feini&"/"&Month(fechaini)&"/"&Year(fechaini)

response.write " <td width=""2%"" height=""20"" bgcolor=#FFCC66><font color=#666666 size=2><strong>"&feini&"</strong></font></td>"
feini= feini+1
Wend
response.write " </tr>"

response.write " <tr>"
Do While diaini=<diafin
set registros = conexion.execute("SELECT * FROM "&BD&" WHERE Ejecutivo = '"&ejec&"' and FechaRF = #"&Month(fechadosini)&"/"&diaini&"/"&Year(fechadosini)&"#")
cont=0
Do While NOT registros.EOF
cont = cont + 1
registros.MoveNext
Loop
If cont = 0 then
response.write "<td width=3% height=25 bgcolor=#666666><font color=#FFFFFF size=2><div align=center>---</div></font></td>"
Else
response.write "<td width=3% height=25 bgcolor=#666666><font color=#FFFFFF size=2><div align=right>"&cont&"</div></font></td>"
End If
diaini=diaini+1
Loop
response.write " </tr>"

If diaini = diafin+1 then
diaini=1
End If
registros2.MoveNext
wend
response.write "</table>"
response.write"</td>"
response.write " </tr>"
response.write "</table>"
__________________
Mc_Quake

Para ayudar en lo que se pueda:Zzz:
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 21:17.