Ver Mensaje Individual
  #4 (permalink)  
Antiguo 13/07/2012, 12:39
Avatar de stuart_david3
stuart_david3
 
Fecha de Ingreso: agosto-2011
Mensajes: 215
Antigüedad: 12 años, 8 meses
Puntos: 1
Respuesta: No me reconoce una sentencia if mi reader!!!

Ok, creo que ya funciona la parte de enviar y recibir n_n... Pero ahí un detalle, como la lectura de registros la hago en un ciclo while, siempre me lee el último registro y por lo tanto me redirige a mi otra página con los datos de mi última fila ...

¿Cómo le hago para decirle que me lea solo los datos de la fila que seleccione?...

Aquí les dejo el código:

Envía:
Código ASP:
Ver original
  1. Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
  2.         Dim funcionario = Request.QueryString("datos")
  3.         Dim reader As SqlDataReader
  4.         Dim conn As SqlConnection = New SqlConnection("server=(local);database=mydb;User ID=myuser;Password=mypass;Trusted_Connection=no")
  5.         Dim sql As String = "SELECT id, nombre, puestoant, funcionario_en_revision FROM Reemplazos3 WHERE funcionario_en_revision='" & funcionario & "'"
  6.         Dim dr As New SqlCommand(sql, conn)
  7.         conn.Open()
  8.         reader = dr.ExecuteReader()
  9.         Response.Write("<table border=1><tr><td>RPE</td>")
  10.         Response.Write("<td>NOMBRE</td>")
  11.         Response.Write("<td>PUESTO</td>")
  12.         Response.Write("<td>CORREO</td>")
  13.         Response.Write("<td>PROPUESTAS</td></tr>")
  14.         While reader.Read()
  15.             Dim Para = CStr(reader("funcionario_en_revision"))
  16.             'Aquí envio los datos pero solo me toma el ultimo registro en el link a la otra página
  17.             Session("funcionario_en_revision") = CStr(reader("id").ToString)
  18.             Response.Write("<tr><td>" + CStr(reader("id")).ToString + "</td>")
  19.             Response.Write("<td>" + CStr(reader("nombre")).ToString + "</td>")
  20.             Response.Write("<td>" + CStr(reader("puestoant")).ToString + "</td>")
  21.             Response.Write("<td>" + CStr(reader("funcionario_en_revision")).ToString + "</td>")
  22.             Response.Write("<td>")
  23.             Response.Write("<a href='ConfirmarFunc1.aspx'>Ver Contrato</a>")
  24.             Response.Write("</td>")
  25.             Response.Write("</tr>")
  26.         End While
  27.         Response.Write("</table>")
  28.         reader.Close()
  29.         conn.Close()
  30.  
  31.     End Sub

Recibe:

Código ASP:
Ver original
  1. Dim Answer As String
  2.         'Recibo y almaceno en "Answer"
  3.         Answer = CType(Session("funcionario_en_revision"), String)
  4.         TextBox1.Text = Answer
  5.         Dim sql As String = "SELECT id, control, rpe, nombre, fechaant, escolaridad, ingreso, numplazaant, puestoant, claveant, adscripant, goant, ndant, cecoant, salarioant, deant, aant, numplazaact, puestoact, claveact, adscripact, goact, ndact, cecoact, salarioact, deact, aact, motivado, funcionario_en_revision, status1, status15, status2, status25, status3 FROM Reemplazos3 WHERE id='" & Answer & "'"

Cómo le hago para que me cada link me lea el dato de cada fila ...

De antemano agradezco tu ayuda...