Bonjour ,
voici mon code qui me permet d'updater ma table DWH_TIM_TEST.
Mon llog m'indique l'erreur suivante: "ORA-01036: illegal variable name/number"
Je me demande si ma querystring est bien écrite!!!
De plus @DAT doit etre surement être entre '', mais je suis pas sûre!!!
Merci pour votre aide
Sabine
Mon code:
' Creation of a new connection before insertion
Dim dbConnection As IDbConnection
Dim connectionString As String
Dim queryString As String
Dim dbCommand As IDbCommand
Try
connectionString = ConfigurationManager.ConnectionStrings
("SIMSDWH").ConnectionString
dbConnection = New OracleConnection(connectionString)
dbConnection.Open()
' Query definition
queryString = "UPDATE DWH_DIM_TIM_TEST SET DAT_OFF=@DAT_OFF,
DAT_WRK= @DAT_WRK, DAT_WEN= @DAT_WEN" & _
"WHERE NAT=@NAT AND to_char(DAT,'DD/MM/YYYY')=@DAT"
dbCommand = dbConnection.CreateCommand()
dbCommand.CommandText = queryString
'Parameters of the query
Dim dbParam_NAT As IDataParameter
dbParam_NAT = New OracleParameter("@NAT",
System.Data.DbType.String)
dbParam_NAT.Value = Label4.Text
dbCommand.Parameters.Add(dbParam_NAT)
Dim dbParam_DAT As IDataParameter
dbParam_DAT = New OracleParameter("@DAT",
System.Data.DbType.Date.ToString)
dbParam_DAT.Value = Label3.Text
dbCommand.Parameters.Add(dbParam_DAT)
Dim dbParam_DAT_OFF As IDataParameter
dbParam_DAT_OFF = New OracleParameter("@DAT_OFF",
System.Data.DbType.String)
'dbParam_DAT_OFF.Value = CType(FV1.FindControl("DAT_OFF_CB"),
CheckBox).ToString()
If CType(FV1.FindControl("DAT_OFF_CB"), CheckBox).Checked =
True Then
dbParam_DAT_OFF.Value = 1
Else
dbParam_DAT_OFF.Value = 0
End If
dbCommand.Parameters.Add(dbParam_DAT_OFF)
Dim dbParam_DAT_WRK As IDataParameter
dbParam_DAT_WRK = New OracleParameter("@DAT_WRK",
System.Data.DbType.String)
' dbParam_DAT_WRK.Value = CType(FV1.FindControl("DAT_WRK_CB"),
CheckBox).ToString()
If CType(FV1.FindControl("DAT_WRK_CB"), CheckBox).Checked =
True Then
dbParam_DAT_WRK.Value = 1
Else
dbParam_DAT_WRK.Value = 0
End If
dbCommand.Parameters.Add(dbParam_DAT_WRK)
Dim dbParam_DAT_WEN As IDataParameter
dbParam_DAT_WEN = New OracleParameter("@DAT_WEN",
System.Data.DbType.String)
' dbParam_DAT_WEN.Value = CType(FV1.FindControl("DAT_WEN_CB"),
CheckBox).ToString()
If CType(FV1.FindControl("DAT_WEN_CB"), CheckBox).Checked =
True Then
dbParam_DAT_WEN.Value = 1
Else
dbParam_DAT_WEN.Value = 0
End If
dbCommand.Parameters.Add(dbParam_DAT_WEN)
dbCommand.ExecuteNonQuery()
dbConnection.Close()
FV1.Enabled = False
Update_Dat.Text = "Update"
Catch ex As Exception
' The error is wrote in the file log.txt
logWriter.Write(ex.Message)
End Try