| Usuario |
guardar un archivo txt en una BD |
Desconocido
|
| Enviado - 27/11/2004 |
| |
hola, estoy manejando visual net y quiero guardar un archivo de texto en una base de datos oracle y no puedo hacerlo, si alguien me pudiera ayudar este es el codigo que utilizo para abrir el archivo texto.
Dim todoeltexto, lineadetexto As String
OpenFileDialog1.Filter = "Text files (*.TXT)|*.TXT"
OpenFileDialog1.ShowDialog()
If OpenFileDialog1.FileName <> "" Then
Try
FileOpen(1, OpenFileDialog1.FileName, OpenMode.Input)
Do Until EOF(1)
lineadetexto = LineInput(1)
todoeltexto = todoeltexto & lineadetexto & vbCrLf
Loop
lblnote.Text = OpenFileDialog1.FileName
txtnote.Text=todoeltexto
txtnote.Select(1, 0)
txtnote.Enabled = True
mnuCloseItem.Enabled = True
mnuOpenItem.Enabled = False
Catch
MsgBox("SE HA PRODUCIDO UN ERROR ABRIENDO EL ARCHIVO", MsgBoxStyle.Critical, "ERROR")
Finally
FileClose(1)
End Try
End If |
| |
|
|
|
