Click here to Skip to main content
15,914,162 members
Home / Discussions / Visual Basic
   

Visual Basic

 
AnswerRe: form deactivation problem Pin
nlarson1116-May-08 9:47
nlarson1116-May-08 9:47 
GeneralSet Caret Position in a TextBox Pin
VFaul28-Apr-08 7:51
VFaul28-Apr-08 7:51 
AnswerRe: Set Caret Position in a TextBox Pin
Smithers-Jones28-Apr-08 7:58
Smithers-Jones28-Apr-08 7:58 
Questionhelp with an idea in ReportViewer Pin
vbbeg28-Apr-08 7:20
vbbeg28-Apr-08 7:20 
AnswerRe: help with an idea in ReportViewer Pin
Jamal Abdul Nasir7-May-08 0:30
Jamal Abdul Nasir7-May-08 0:30 
GeneralCompress a directory Pin
Ashwiniyer28-Apr-08 6:48
Ashwiniyer28-Apr-08 6:48 
AnswerRe: Compress a directory Pin
Smithers-Jones28-Apr-08 7:55
Smithers-Jones28-Apr-08 7:55 
GeneralInsert Blob over OLEDB in OracleDB Pin
schlumpfger28-Apr-08 5:31
schlumpfger28-Apr-08 5:31 
Hi,

I´d like to save a file in an oracle database over oledb. The code was allready running for sql only. But it has also to work with oracle. So i changed my connection from sql to oledb. But since that it don´t work with booth. Something is wrong with the parameter @data in booth cases. Has anybody an idea?

Private Function SQL_Save_this_PDF(ByVal selection As String, ByVal where As String) As Boolean
Dim oledbConn As OleDbConnection

If Not CcPdfViewer1.pdffile = "" Then

Dim id As String = ""
Dim bindata As Byte()
Dim strm As IO.Stream
Dim filename As String = CcPdfViewer1.pdffile

strm = New IO.FileStream(filename, IO.FileMode.Open, IO.FileAccess.Read)
ReDim bindata(strm.Length - 1)
strm.Read(bindata, 0, strm.Length)
strm.Close()

filename = My.Computer.FileSystem.GetName(filename)

If dbms = "oracle" Then
oledbConn = New OleDbConnection("Provider= OraOLEDB.Oracle; Data Source=" + server + "; User ID=" + database_user + "; Password=" + database_pwd + ";")
Else
'mssql
oledbConn = New OleDbConnection("Provider= sqloledb; Data Source=" + server + ";Initial Catalog=" + database + "; User ID=" + database_user + "; Password=" + database_pwd + ";")

End If

Try
oledbConn.Open()

Static save_pdf As OleDbCommand
save_pdf = New OleDbCommand("Insert into dateien (id,name,data) values ('" + id + "','" + filename + "',@data)", oledbConn)
save_pdf.Parameters.Add("@data", OleDbType.LongVarBinary)
save_pdf.Parameters("@data").Value = bindata
save_pdf.ExecuteNonQuery()

Thanks, Daniel


Catch e As OleDbException
MsgBox(e.Message)
oledbConn.Close()
Return False
End Try

bindata = Nothing

End If

Return True

End Function
GeneralRe: Insert Blob over OLEDB in OracleDB Pin
schlumpfger28-Apr-08 5:58
schlumpfger28-Apr-08 5:58 
GeneralSort selected items Pin
Sebastian T Xavier28-Apr-08 4:54
Sebastian T Xavier28-Apr-08 4:54 
GeneralRe: Sort selected items Pin
Kschuler28-Apr-08 9:46
Kschuler28-Apr-08 9:46 
GeneralRe: Sort selected items Pin
Sebastian T Xavier1-May-08 3:24
Sebastian T Xavier1-May-08 3:24 
QuestionMerge RTF Files Pin
Jats_4ru28-Apr-08 2:14
Jats_4ru28-Apr-08 2:14 
RantRe: Merge RTF Files Pin
Smithers-Jones28-Apr-08 3:13
Smithers-Jones28-Apr-08 3:13 
GeneralRe: Merge RTF Files Pin
Thomas Stockwell28-Apr-08 4:40
professionalThomas Stockwell28-Apr-08 4:40 
GeneralRe: Merge RTF Files Pin
Jats_4ru4-May-08 18:57
Jats_4ru4-May-08 18:57 
QuestionCursor position [modified] Pin
Jamal Abdul Nasir28-Apr-08 2:05
Jamal Abdul Nasir28-Apr-08 2:05 
GeneralRe: Cursor position Pin
John_Adams28-Apr-08 3:06
John_Adams28-Apr-08 3:06 
GeneralRe: Cursor position Pin
Luc Pattyn28-Apr-08 3:09
sitebuilderLuc Pattyn28-Apr-08 3:09 
GeneralTreeview control problem Pin
monafr8128-Apr-08 1:59
monafr8128-Apr-08 1:59 
QuestionDetecting prerequisites...! Pin
Jamal Abdul Nasir28-Apr-08 1:15
Jamal Abdul Nasir28-Apr-08 1:15 
GeneralRe: Detecting prerequisites...! Pin
Kschuler28-Apr-08 9:51
Kschuler28-Apr-08 9:51 
GeneralUnable to Capture Incoming Mail Event in Outlook Pin
narayanagvs28-Apr-08 0:07
narayanagvs28-Apr-08 0:07 
GeneralDataview and text binding help required. Pin
mickstar28-Apr-08 0:07
mickstar28-Apr-08 0:07 
QuestionHelp with Crystal Reports Pin
Jats_4ru27-Apr-08 23:43
Jats_4ru27-Apr-08 23:43 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.