elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Recuerda que debes registrarte en el foro para poder participar (preguntar y responder)


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  bases de datos de access
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: bases de datos de access  (Leído 1,609 veces)
Belial & Grimoire


Desconectado Desconectado

Mensajes: 559


Tea_Madhatter


Ver Perfil
bases de datos de access
« en: 10 Julio 2007, 04:47 am »

hola

tengo un problema... estoy haciendo en un programa de visual basic 6.0 quee se puedan ver archivos access desde datagrid... pero tengo un problema... como hago operaciones...

por ejemplo..

si yo tuviera algo asi...

 NOMBRE   CANTIDAD

    XX               23
    XX               45
    XX              123
    XX               15


cuando hago click sobre data grid en la parte de arriba de cantidades... todo keda marcado... pero cuando eso pasa como hago para hacer una operacion.... por ejemplo si yo al marcar CANTIDADES y todo se marca... al hacer eso, como podria sumar esas cantidades ( 23, 45, 123, 15)

alguien podria ayudarme

gracias   ;D


En línea

.                                 
ActiveSheet


Desconectado Desconectado

Mensajes: 389


Feeling Jazz


Ver Perfil WWW
Re: bases de datos de access
« Respuesta #1 en: 10 Julio 2007, 08:10 am »

Lastima chico, nadie sabe DataBase en VB  :-\


En línea

R41N-W4R3

Desconectado Desconectado

Mensajes: 248


Ver Perfil
Re: bases de datos de access
« Respuesta #2 en: 10 Julio 2007, 10:26 am »



  Mira en las propiedades y metodos del dbgrid. De todas formas no se si ese componenete permite lo que comentas o si has de ingeniartelas haciendolo tu.

   Si quieres unas nuenas referencias de VB visita la web de guille en la que recuerdo algo como lo que preguntas.
En línea

Belial & Grimoire


Desconectado Desconectado

Mensajes: 559


Tea_Madhatter


Ver Perfil
Re: bases de datos de access
« Respuesta #3 en: 10 Julio 2007, 18:15 pm »

hola

lo que pasa es que si puedo sumarlas... pero solo una por una... ya que si selecciono una se marca y puedo hacer una operacion con ella.... pero para sumar todas al mismo tiempo no se como... pero a ver si puedo hacer algo...

nos vemos  ;D
En línea

.                                 
Belial & Grimoire


Desconectado Desconectado

Mensajes: 559


Tea_Madhatter


Ver Perfil
Re: bases de datos de access
« Respuesta #4 en: 10 Julio 2007, 20:20 pm »

hola

ya lo logre... pero tengo un problema.. cuando selecciono todos... y por ejemplo coloco todos los que marque en un label... como puedo hacer operaciones con ellos...

por ejemplo en un label tengo asi...

al seleccionarlos... se colocan en un label

            23
            45
            123
            15

kedan asi... pero como hago operaciones... algo sencillo como sumarlos...

23 + 45 + 123 + 15

espero me puedan ayudar

nos vemos... gracias  ;D

En línea

.                                 
Belial & Grimoire


Desconectado Desconectado

Mensajes: 559


Tea_Madhatter


Ver Perfil
Re: bases de datos de access
« Respuesta #5 en: 11 Julio 2007, 00:02 am »

hola

estaba pensando hacer esto...
Código:

Private Sub Command1_Click()
Dim dato As String
Dim cadena As String
Dim junta(1 To 4) As String
cadena = Join(junta)
junta(1) = "23"
junta(2) = "45"
junta(3) = "123"
junta(4) = "15"
dato = Val(junta(1)) + Val(junta(2)) + Val(junta(3)) + Val(junta(4))
Label1.Caption = dato
End Sub



Con esto ya podria sumar lo que necesito... y hacer cualquier tipo de operacion...

Pero hay alguna forma de hacer que no tenga que determinar esto...

Dim junta(1 To 4) As String

ya que talvez tenga que hacer mas operaciones... y no quiero estar definiendo esto... hay forma de hacer esto dependiendo de cuantos numeros tenga

por ejemplo... si tengo en una caja de texto 5 numeros

23
43
12
34
65

como puedo hacer para que visual cuente cuantos son y en un label me ponga... 5

y como le haria para que en vez de poner en un label 5... me lo coloque aki...

Dim junta(1 To 5) As String

y asi lograr adaptar la matriz siempre... dependiendo de la cantidad de numeros que tenga en una caja de texto...

espero haber explicado esto bien... en pocas palabras kisiera que se identificara cuantos numero hay en una caja de texto en forma de lista... para que la matriz se adapte a la cantidad de numeros u objetos que hay en la caja de texto...

espero su ayuda...

gracias  ;D
En línea

.                                 
CeLaYa


Desconectado Desconectado

Mensajes: 543



Ver Perfil
Re: bases de datos de access
« Respuesta #6 en: 11 Julio 2007, 02:53 am »

pues creo que tus problemas se resolverían si usas SQL

para abrir la BD
Código:
Dim BD as Database
Dim Tb as Recrdset

Set BD = Workspaces(0).OpenDatabase("c:\tu_bd.mdb", Exclusivo, SoloLectura, ";pwd=passwrod;")

Set TB = BD.Openrecorset("nombre tabla o consulta SQL;")


para cerrar y liberar memoria
Código:
tb.close
BD.close
Set tb = nothing
Set BD = Nothing

para contar registros, sumarlos y cosas asi el SQL te proporciona ya instrucciones que hacen eso:
Código:
para sumar
Set TB = BD.Openrecorset("SELECT Campo1, SUM(campo2) FROM Tabla WHERE Campo1 = algo;")

para contar
Set TB = BD.Openrecorset("SELECT COUNT(campo1) FROM Tabla WHERE Campo1 = algo;")
En línea

"La soledad es el elemento de los grandes talentos".
Cristina de Suecia (1626-1689) Reina de Suecia.
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines