Visual Basic - ayuda con tabla

Life is soft - evento anual de software empresarial
   
Vista:

ayuda con tabla

Publicado por pol (74 intervenciones) el 05/09/2007 01:43:57
Hola quisiera saber como puedo hacer lo siguiente::
tengo cargado un flexgrid con nombres de producto y su cantidad. el problema es que no se como hacer para que me descuente la cantidad del stock actual que tengo en mi base de datos para ir modificando dicho campo de cada producto de mi tabla
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:ayuda con tabla

Publicado por Daju_k (34 intervenciones) el 05/09/2007 12:38:48
mira lo que tenes que hacer es hacer un bucle con do while para saber si el producto primeramente existe en tu base de datos esto lo podes hacer comparando el codigo del producto en la venta con el codigo guardado, si lo encuentra entonces te moves a ese registro y luego obtener el valkor actual y lo restas con el del text box para despues actualizar tu tabla con update, pero ojo tenes que fijarque el tema de que no te quede negativo y que si no hay tal producto no te reste. bien avisame cualquier cosa para ver como te fue.

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

RE:ayuda con tabla

Publicado por ppol (74 intervenciones) el 06/09/2007 11:58:38
hola. tengo un problema. no se como comparar el tetxbox que tengo idcliente con el de la tabla real. me podrias ayudar con eso.
esto es lo que hago
while i< tabla.recordcount
if textbox= (no se que) then
set tabla.datasource= tabla - cantidad
end if
i=i+1
wend
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

RE:ayuda con tabla

Publicado por Daju_k (34 intervenciones) el 06/09/2007 12:23:33
bien mira supongamos que la tabla clientes tiene un campo llamado idcliente,
este codigo es de ado pero manejado pura y exclusivamente por codigo por eso es que tendrias que tener el recordset definido con anterioridad
con "DIM RsCliente as new adodb.recordset"

bien con rscliente que es el recordset hacemos
"RSCLIENTE!IDCLIENTE"

osea tu codigo quedaria hace

while i< tabla.recordcount
if textbox= rscliente!idcliente then
set tabla.datasource= tabla - cantidad
end if
i=i+1
wend

espero te sirva cualquier cosa avisame
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

RE:ayuda con tabla

Publicado por pol (74 intervenciones) el 06/09/2007 14:26:44
hola. disculpa. me podrias explicar que es eso de rs!idcliente.
no entiendo que es lo que hace. para que pones un signo ! que es lo que significa.
disculpa mi ignorancia. soy medio nuevo en el tema
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

RE:ayuda con tabla

Publicado por daju_k (34 intervenciones) el 08/09/2007 16:21:21
mira disculpa la demora, pero si todavia te sirve te explico lo que pasa es que yo me conecto a la base de datos por codigo sin necesidad de un control
entonces el codigo es asi:

'Dimencionar variable de cadena de conexion
dim strConnection as string
'Dimencionar variable de comando
dim cmd as string
'Dimensionar variable de conexion
dim cnXX as new adodb.connection
'Dimensionar variable de recordset
dim rsXX as new adodb.recordset

'Sentencia de error por si hay un error para que te avise
on error goto ADODBError Events

'cadena de conexion
strconnection="Provider=Microsoft.jet.oledb.4.0;"
strconnection=strconnection & "Persist security info=false;"
strconnection=strconnection & "data source=Pones la ruta de tu base de datos;"
strconnection=strconnection & "Mode=readWrite"

'Luego abris la conexion
cnXX.connectionstring=strconnection
cnXX.connectiontimeout=10
cnxx.cursorlocation=adusenone
cnXX.opne

'Luego una vez abierto la conexion empecesa a buscar con el recordset
'primero le pedis que haga algo con select osea con comandos de sql ejemplo
'select * from producto elige todos los datos de la tabla productos"
rsXX.open "Select * from productos",cnXX,adopendynamic,adlockoptimistic,adcmdtetxt

'entonces ahi es donde usas el rsXX para el recordset y ! para especificar el campo y luego el nombre del campo ej

rsXX!Descripcion=boxproddesc.text

'Luego cerrar todo
set rsXX =nothing
set cnXX=Nothing

exit sub

ADODBErrorEvents:
msgbox & err.description

bien espero te haya serviso la explicacion
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