I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
cb79
cb79
il 14 febbraio 2014 alle 11:51
45 messaggi dal 10 luglio 2001
www.romaclubtrevi.com
Ecco il codice e l'errore restituito:

'---------------------------------------------
'Creazione dell'istruzione SQL:
'---------------------------------------------
Dim IstruzioneSQL As String = SP_InsPDF_SQL()
'----------------------------------------------------------------
'- Questo è quello che restituisce la funzione SP_InsPDF_SQL()
'- MySQL.Append("INSERT INTO " & DB2_Prefisso & "Tabella ")
'- MySQL.Append("(campo1, ")
'- MySQL.Append("campo2, ")
'- MySQL.Append("campo3, ")
'- MySQL.Append("campo4Blob) ")
'- MySQL.Append("VALUES(?, ?, ?, ?)")
'---------------------------------------------------


'---------------------------------------------
'Dichiarazione e impostazione del comando SQL:
'---------------------------------------------
Using ComandoDB2 As OleDbCommand = New OleDbCommand(IstruzioneSQL, ConnessioneDB2)

'-------------------------------------
'Impostazione del tipo di comando SQL:
'-------------------------------------
ComandoDB2.CommandType = Data.CommandType.Text

ComandoDB2.Transaction = TransazioneDB2
'----------------------------------------------
'Creazione dei parametri da passare al comando:
'----------------------------------------------
Dim Par_1 As New OleDbParameter
Par_1.OleDbType = OleDbType.Decimal
Par_1.ParameterName = "campo1"
Par_1.Value = campo1.value
ComandoDB2.Parameters.Add(Par_1)

Dim Par_2 As New OleDbParameter
Par_2.OleDbType = OleDbType.Decimal
Par_2.ParameterName = "campo2"
Par_2.Value = 2014020400
ComandoDB2.Parameters.Add(Par_2)

Dim Par_3 As New OleDbParameter
Par_3.OleDbType = OleDbType.VarChar
Par_3.ParameterName = "campo3"
Par_3.Value = "V"
ComandoDB2.Parameters.Add(Par_3)

Dim Par_4 As New OleDbParameter
Par_4.OleDbType = OleDbType.LongVarBinary
Par_4.ParameterName = "campo4"
Par_4.Size = campo4.Length() - 1
Par_4.Direction = ParameterDirection.Input
Par_4.Value = campo4 'il campo4 è in Byte()

ComandoDB2.Parameters.Add(Par_4)


ComandoDB2.ExecuteNonQuery()

End Using

L'errore restituito è il seguente molto generico:

System.Data.OleDb.OleDbException: An internal network library error has occurred. A network level syntax error has occurred. SQLSTATE: HY000, SQLCODE: -379
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.