Bueno mi pregunta es si hay alguna manera de ponerle instrucciones al VB como las que se le ponen en una pagina php para que se actualize alguna DB
como
UPDATE dbo.MI_DATA SET tabla = text1.text
Cita de: Hacktor en 5 Agosto 2006, 02:25 AM
Bueno mi pregunta es si hay alguna manera de ponerle instrucciones al VB como las que se le ponen en una pagina php para que se actualize alguna DB
como
UPDATE dbo.MI_DATA SET tabla = text1.text
si
http://foro.elhacker.net/index.php/topic,127987.0.html
XD me podrias decir como? ... o de que manera lo puedo usar porque en forma directa poner eso no te acepta
Cita de: Hacktor en 5 Agosto 2006, 02:32 AM
XD me podrias decir como? ... o de que manera lo puedo usar porque en forma directa poner eso no te acepta
not e acepta el k?
Cuando pongo esto
UPDATE dbo.MI_DATA SET tabla = text1.text
Cita de: Hacktor en 5 Agosto 2006, 02:39 AM
Cuando pongo esto
UPDATE dbo.MI_DATA SET tabla = text1.text
?????????????
ve al link k te envie y mirate lo que pone en el anda...
Bueno hay algo que no me resulta XD .. segun lo que vi deberia funcionarme pero no se porque no pasa nada, aunque quisas me puedan ayudar XD...
Dim Cn As ADODB.Connection, Cmd As ADODB.Command, Rec As ADODB.Recordset
Dim Sql As String
Private Sub Command1_Click()
Sql = "UPDATE dbo.MITABLA SET datos = '1' where memb = 'Hacktor'"
Cn.Execute Sql
End Sub
Nose si este bien eso ...
¿como que no pasa nada?
¡claro que pasa!
pasa que pones datos a 1 donde memb sea 'Hacktor'
Si no pasa nada es porque no hay ningún memb='Hacktor'
o a lo mejor si pasa, pero no has actualizado el datagrid o algún otro control asociado a esos datos y por eso aunque los datos han cambiado tu sigues viendo los viejos
Suponiendo que fuera un datagrid, al final de ese código (justo seguido del cn.execute sql debería ir un
datagrid.refresh
Un saludo
Cita de: soplo en 5 Agosto 2006, 12:22 PM
¿como que no pasa nada?
¡claro que pasa!
pasa que pones datos a 1 donde memb sea 'Hacktor'
Si no pasa nada es porque no hay ningún memb='Hacktor'
o a lo mejor si pasa, pero no has actualizado el datagrid o algún otro control asociado a esos datos y por eso aunque los datos han cambiado tu sigues viendo los viejos
Suponiendo que fuera un datagrid, al final de ese código (justo seguido del cn.execute sql debería ir un
datagrid.refresh
Un saludo
dbo.tabla...... que se supone que pones?
basededatos.tabla espero...
con poner el nombre de la tabla sobra... pero mi duda es si realmente pones dbo. y el nombre...
El Codigo esta correcto, lo unico es que esta incompleto, le falta la cadena de conexion a la base de datos.
Dim Cn As ADODB.Connection, Cmd As ADODB.Command, Rec As ADODB.Recordset
Dim Sql As String
Private Sub Command1_Click()
'Para sql server
cn.connectionstring="provider=SQLOLEDB;DATA SOURCE=Nom Servidor;INITIAL CATALOG=Base de datos;USER ID=usuario sql;PASSWORD=pass usuario sql;DNS=;"
'Para access
cn.connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ruta y nom del archivo access"
cn.cursorlocation=adUseClient
cn.open
Sql = "UPDATE dbo.MITABLA SET datos = '1' where memb = 'Hacktor'"
set rec=Cn.Execute(sql, , adCmdText)
End Sub
Ese seria mas o menos el codigo para ejecutar esa sentencia y cualquier otra(Delete, Select, etc).
Saludos
yo las updates y deletes las hago directamente sobre la conexion
sql = "update tabla set dato1=0 where condicion=2"
cn.Execute sql
cn.connectionstring="provider=SQLOLEDB;DATA SOURCE=Nom Servidor;INITIAL CATALOG=Base de datos;USER ID=usuario sql;PASSWORD=pass usuario sql;DNS=;"
Me sale un error en esta lines ... yo la deje asi... pero nose porque me da
cn.connectionstring="provider=SQLOLEDB;DATA SOURCE=(local);INITIAL CATALOG=MIDB;USER ID=Hacktor;PASSWORD=123456;DNS=MIDNS;"
Pero asi con los datos cambiados no me resulta ... que dato estoy poniendo mal???
Cita de: Hacktor en 5 Agosto 2006, 21:55 PM
cn.connectionstring="provider=SQLOLEDB;DATA SOURCE=Nom Servidor;INITIAL CATALOG=Base de datos;USER ID=usuario sql;PASSWORD=pass usuario sql;DNS=;"
Me sale un error en esta lines ... yo la deje asi... pero nose porque me da
cn.connectionstring="provider=SQLOLEDB;DATA SOURCE=(local);INITIAL CATALOG=MIDB;USER ID=Hacktor;PASSWORD=123456;DNS=MIDNS;"
Pero asi con los datos cambiados no me resulta ... que dato estoy poniendo mal???
asi inicio yo las conexiones y los auxiliares para un access
cn.Provider = "Microsoft.Jet.OLEDB.4.0" 'en este caso es para Access 2000
cn.ConnectionString = App.Path & "/nombredatabase.mdb"
cn.Open
Cmd.CommandType = adCmdText
Cmd.ActiveConnection = cn
rec.Open "tablita", cn, , adCmdText
A ver
CitarCn.connectionstring="provider=SQLOLEDB;DATA SOURCE=(local);INITIAL CATALOG=MIDB;USER ID=Hacktor;PASSWORD=123456;DNS=MIDNS;"
Entiendo que has puesto bien el nombre del servidor, base de datos y dsn así que supongo que eso está bien
Luego va
cn.open ,usuario,claveO bien lo puedes hacer de esta forma
dim Cn as adodb.connection, CnStr as string
Cnstr="provider=SQLOLEDB;DATA SOURCE=(local);INITIAL CATALOG=MIDB;USER ID=Hacktor;PASSWORD=123456;DNS=MIDNS;"
Dim Cn as new adodb.connection
Cn.open CnStr,usuario,clave
Cn.execute "update ... "Un saludo
Cn.connectionstring="provider=SQLOLEDB;DATA SOURCE=(local);INITIAL CATALOG=MIDB;USER ID=Hacktor;PASSWORD=123456;DNS=MIDNS;"
Creo que asi no funciona el data source, para SQL Server, tienes que poner el nombre del servidor (Nombre de la maquina donde tienes la bd).
Saludos
aque te refieres con nombre del servidor¿
El nombre del serivdor, seria el nombre de la pc donde tienes las base datos, en el caso que uses sql server para tu aplicacion.
Saludos