Visual Basic.NET - Error con el Adaptador.Fill()

 
Vista:

Error con el Adaptador.Fill()

Publicado por GONPAS (60 intervenciones) el 19/11/2003 21:02:21
Hola a todos, tengo la siguiente consulta:
Tengo un cógido que funciona perfecto (es una dll), pero cuando lo invoco desde un servicio web me dá problemas.
El Código es:

Public Function grabar(ByVal nombre As String, ByVal apellido As String, ByVal rut As String, ByVal telefono As Integer, ByVal direccion As String) As String
Dim sql_insertar As New OleDbCommand()
Dim mensaje As String
Dim sql_select As New OleDbCommand()
Dim da_insertar As New OleDbDataAdapter()
Dim datos As New DataSet()
Try
Dim dt_tabla1 As New DataTable("Tabla1")
dt_tabla1.Columns.Add("Nombres", GetType(String))
dt_tabla1.Columns.Add("Apellidos", GetType(String))
dt_tabla1.Columns.Add("Rut", GetType(String))
dt_tabla1.Columns.Add("fono1", GetType(Integer))
dt_tabla1.Columns.Add("Direccion", GetType(String))
datos.Tables.Add(dt_tabla1)

sql_insertar.CommandText = "Insert Into Tabla1 (Nombres, Apellidos, Rut, Fono1, Direccion) values ('" & nombre & "','" & apellido & "','" & rut & "','" & telefono & "','" & direccion & "')"
sql_insertar.Connection = conexion
da_insertar.InsertCommand = sql_insertar
da_insertar.SelectCommand = da_insertar.InsertCommand
**** da_insertar.Fill(datos, "tabla1") *****
da_insertar.Update(datos, "tabla1")
mensaje = "Datos Grabados"
Catch
mensaje = Err.Description + Err.HelpFile
End Try
Return mensaje
End Function

La línea que está marcada con arteriscos (****), es la que me dá el siguente error y no sé por qué, si alguno de ustedes puede ayudarme se los agradeceré muchos...

Error que me dá:

La operación debe usar una consulta actualizable.

De antemano muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Error con el Adaptador.Fill()

Publicado por Edgar (1501 intervenciones) el 20/11/2003 04:12:06
Hola

Fijate que la consulta es el mismo insert.... debes pasar un comando select.. en otras palabras.. crea otro objeto OleDBCommand que tenga el siguiente valor en CommandText

SELECT Nombres, Apellidos, Rut, Fono1, Direccion FROM Tabla1

y asignas ese comando a la propiedad da_insertar.selectCommand

Espero que sea eso

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Agradecimientos

Publicado por GONPAS (60 intervenciones) el 20/11/2003 04:17:19
Hola Edgar, muchas gracias por tu valiosa ayuda, pero hace unos minutos pude solucionar mi problema, el cual consistía en permisos de la Base de Datos unicamente, por que para servicios web la cosa varia en eso.
Si gustas te puedo explicar en que consiste, por que nunca están demás las cosas, digo yo, mas vale que sobre a que falte..
Muchas gracias de verdad y un gran saludo desde Chile..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar