Mensajes

barbaro, vamos mejorando
yo necesito avanzar en los registros, lo que ahora uso es esto:
voy mejorando en este tema

para adelantar :

Código [Seleccionar] Expandir

If Not frm1.rst.EOF Then
txt_dimccodigo = frm1.rst(0)
txt_dimcdescripcion = frm1.rst(1)
txt_dimcpadre = frm1.rst(2)
txt_dimccuenta = frm1.rst(3)
txt_dimccontrato = frm1.rst(4)
txt_dimcconcepto = frm1.rst(5)
txt_dimcproceso = frm1.rst(6)
frm1.rst.MoveNext
End If

y para retroceder:

Código [Seleccionar] Expandir


If Not frm1.rst.EOF Then
frm1.rst.MovePrevious
txt_dimccodigo = frm1.rst(0)
txt_dimcdescripcion = frm1.rst(1)
txt_dimcpadre = frm1.rst(2)
txt_dimccuenta = frm1.rst(3)
txt_dimccontrato = frm1.rst(4)
txt_dimcconcepto = frm1.rst(5)
txt_dimcproceso = frm1.rst(6)
End If


el tema que para retroceder no funciona, osea... retrocede el registro pero no lo carga en los textbox

hace rato largo programo en vb y estoy verdisimo con vb y sql, por eso pregunto cosas que yo se que no son dificiles

gracias again Hans el Topo

bye...

[Numero]

bueno sigo...
con respecto a la forma que yo use.. es la siguiente:

Código [Seleccionar] Expandir

While frm1.rst.EOF
            frm1.rst.MoveFirst
            txt_dimccodigo = frm1.rst(0)
            txt_dimcdescripcion = frm1.rst(1)
            txt_dimcpadre = frm1.rst(2)
            txt_dimccuenta = frm1.rst(3)
            txt_dimccontrato = frm1.rst(4)
            txt_dimcconcepto = frm1.rst(5)
            txt_dimcproceso = frm1.rst(6)
       
            frm1.rst.MoveNext
        Wend

y con eso veo los datos pero solo de la primera fila

osea...

-------------------------
| Numero | Letra
| uno         |  a       |
| dos         |  b       |
| tre          |  c       |
| cuatro     |  d       |
| cinco       |  e       |
| seis         |   f      |
----------------------

con ese codigo recibiria solo el dato numero "uno" y el dato letra "a"

la pregunta es... como veo las otras filas?
si alguien sabe... que me pase la vos

saludos
bye


#Edit: gracias Hans el Topo, como siempre respondiendo

listo!!
ya lo descubri

gracias de todos modos

bye bye
nos vemo en ela p`roxima

[Numero]

graciaspor el codigo, lo probe y me sigue dando el mismo resultado,...

lo que quiero hacer es esto

---------------------
| Numero
| uno
| dos
| tre
| cuatro
| cinco
| seis
--------------------

Código [Seleccionar] Expandir

Dim tField As ADODB.Field
 
rst.Open "select pub_codcontrato from vsp_contrcue", cnn, adOpenDynamic, adLockOptimistic

        combo1.Clear
        For Each tField In rst.Fields
        combo1.AddItem tField.Name
        Next
        combo1.ListIndex = 0

rst.Close



lo que me muestra con eso no son los "uno", "dos", "tres", etc
me muestra el nombre del campo "pub_codcontrato"

si alguien me dice como mostrar los datos y no el nombre del campo se lo agradeceria

bye

que tal, despues de tanto tiempo, dije que volvia y volvi

mi duda es la siguiente
estoy haciendo una aplicacion en vb6 usando sql server y queiro listar las db, utilizo este codigo:

Código [Seleccionar] Expandir



rst.Open "SELECT name FROM master.dbo.sysdatabases", cnn, adOpenDynamic, adLockOptimistic
With cbo_db
        .Clear
        For Each tField In rst.Fields
            .AddItem tField.Name
        Next
        .ListIndex = 0
    End With
rst.Close




cbo_db es un combo, y lo unico que me lista es la palabra "name", como hago para que me liste los datos de la columna name?
me srian de gran ayuda ya que estoy en el trabajo ahora xd

saludos y gracias

buen aporte, la mayoria de vatos viejos ya tenemos una buena biblioteca de codigos y ps en general tenemos los conocimientos pero para los que empiesan esta exelente

opino lo mismo que red

un saludo, hace mucho que no pasaba por aca, creo que un año nose

bye, voy a volver... jaja

para que necesitas saber que es esa cadena cifrada??
es un ejemplo? o enverdad es algo importante???
si es importante simplemente pregunta a kien la cifro y que te la desencripte si es que no sabes ocmo hacerlo, xq ya se te dijo como hacerlo,. lo que te resta es bajarte un manual de qbasic y seguir paso a paso para poder correr el codigo a la perfeccion

tonces bajate algun codigo simple de la web que te pase y lo modificas a tu gusto,. en ves de que busque procesos conectados le das el nombre de tu proceso y listo

[mid]

para usar la instruccion mid y/o right o left necesitas saber el tamaño de las palabras a separar, si desconoces ese dato va a salir cualkier cosa, asi que es mucho mas facil y efectivo en mucho de los casos(segun sea lo que se encesita) usar la instruccion split, en este caso x ejemplo es mucho ams efectivo la instruccion split
suerte man

El MaRo!

podes buscar en est web que yo me baje un programa que te daba esa informacion, te decia que programa se conectaba a internet y por cual puerto
son aplicaciones con funciones firewall
asi que... en obuscar pones firewall y listo
suerte man espero que te sirva como me sirvio a mi

http://www.planet-source-code.com/