Berta
04 de Mayo del 2004

Con los datos q recopilo mediante un formulario de Visual Basic , quiero dar los resultados con formato en una pagina HTML. Es posible?
Hacer lo q haria en PHP, pero sin usar PHP, sino Visual Basic.
Gracias, es urgente, porfavor.

Roberto Uchoa
04 de Mayo del 2004

' utilize a rotina abaixo para ler um arquivo.htm
' e converte-lo em um arquivo.bas
' depois use o arquivo.bas que foi gerado em sua aplicação


Dim linha, linha2, aux As String
Dim k As Integer

Open "c:teste.htm" For input As #1 'archivo.htm
Open "c:teste.bas" For Output As #2 'archivo.bas

While EOF(1) = False
Line Input #1, linha
linha2 = ""
For k = 1 To Len(linha)
aux = Mid(linha, k, 1)
If aux = Chr(34) Then
linha2 = linha2 & Chr(34) & " & chr(34) & " & Chr(34)
Else
linha2 = linha2 & aux
End If
Next
linha2 = " Print#1, " & Chr(34) & linha2 & Chr(34)
Print #2, linha2

Wend
Close #1
Close #2