Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: light310oct en 29 Marzo 2015, 23:19 pm


Título: Ayuda para insertar texto en un punto especifico de html
Publicado por: light310oct en 29 Marzo 2015, 23:19 pm
Estoy intentando generar una especie de bitacora utilizando VB6.0 y html;
la idea es tomar variables o valores de textbox y organizarlos en una tabla dentro del html, ya logre enviar los datos al html pero no los coloca en el lugar que necesito si no que los agrega al final adjunto codigo de vb (lo saque de google)
Código:
 Private Sub Form_Load()
Dim Linea As String, AuxAgregar As String
End Sub
Private Sub Command1_Click()
Open "C:\prueba.html" For Input As #1
Do While Not EOF(1)
Line Input #1, Linea 'Te Recoge línea por línea
If InStr(1, Linea, "</tr>") Then AuxAgregar = Linea 'Al final se quedará con la última línea que contenga "</tr>"
Loop
Close #1
Open "C:\prueba.html" For Append As #1 'Usamos Append para que lo añada al documento
Print #1, crlf & "<tr> <td>" & Text1.Text & "</td>" & crlf & "<td>" & Text2.Text & "</td></tr>"
Close #1
End Sub
y necesito ir formado la tabla en este documento (aqui he retirado algunos scrips que utilizo para dejar practicamente solo la tabla)
Código:
<html>
    <head>

        <title>base de datos</title>
    </head>
    <body>

           <tr>
              <td>Celda 1</td>
              <td>Celda 2</td>
              <td>Celda 3</td>
          </tr>
          <tr>
              <td>Celda 4</td>
              <td>Celda 5</td>
              <td>Celda 6</td>
          </tr>
>>>>>>>>Aqui deberia agregarse el texto<<<<<<<<<<<<
        </table>
    </body>
</html>
Agradezco cualquier ayuda que me puedan brindar Pd. por las funciones del programa al que deseo añadir esta funcion solo puedo programarlo en VB6.0

Título: Re: Ayuda para insertar texto en un punto especifico de html
Publicado por: MCKSys Argentina en 29 Marzo 2015, 23:25 pm
Si abres como Append, siempre se agregarán al final del archivo.

La solución es que cargues todo el HTML, agregues lo que quieres agregar y luego sobreescribas todo el file.

Saludos!

Título: Re: Ayuda para insertar texto en un punto especifico de html
Publicado por: light310oct en 29 Marzo 2015, 23:34 pm
Cita de: MCKSys Argentina en 29 Marzo 2015, 23:25 pm
Si abres como Append, siempre se agregarán al final del archivo.

La solución es que cargues todo el HTML, agregues lo que quieres agregar y luego sobreescribas todo el file.

Saludos!
En ese caso como debería hacerlo porque igualmente solo quiero agregar los datos de las variables en formato tabla_

Título: Re: Ayuda para insertar texto en un punto especifico de html
Publicado por: MCKSys Argentina en 29 Marzo 2015, 23:50 pm
Podrías leer todo el file en un string, hasta el lugar donde quieres insertar.
Agregas lo que quieres agregar y terminas de leer el resto del file.
Una vez hecho eso, sobreescribes el file con el contenido del string.

Saludos!

Título: Re:
Publicado por: yum-kax en 30 Marzo 2015, 01:37 am
Estoy desde el celu ahora, pero a mi me pasaba cuando habia hecho un prog que tenia que leer la temperatura.... Hace algo así si queres..
Que el instring lea '</tr>' y x cantidad de caracteres mas.. Y al final de la cadena (funcion right) '</table>' y ahi le insertas las cosas...

Espero haberme expresado bien.. Es muy criolla la solución, pero va!

Salutes


Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines