Programación General > Visual Basic 6.0 e inferiores
Ayuda Con Access!!!!!!!!!
Warce:
Hola a todos, Gracias con anterioridad.
Les cuento que yo tengo una base de datos, el cual esta formada por cuatro columnas.
En la primer columna hay letras, y en las otras para cada letra hay 3 simbolos.
Lo que quiero que el visual haga es que por ejemplo que si se le pide la letra "J" que lo busque en la base de datos, y que aleatoriamente elija uno de 3 simbolos.
GRACIASSSSSSS!!!!!!!!!!!!
jodijo5:
esta es una solucion:
--- Código: Text --- Private Function pideme(id As String) As String'suponiendo que la columa 0 de tu tabla es el numeroRandomize (1) Do n = (Int(Rnd() * 4)) Loop While n <= 0 Set rcdset = db.execute("select * from mitabla where uno like '" & id & "'") pideme = rcdset(n)End Function a proposito: solo es curiosidad, pues me llamó mucho la atencion tu pregunta, de que se trata tu sistema, claro si no es mucha indiscresion
Warce:
El programa se trata de un cadificador y decodificador de texto, como para mandarlo a una persona y si otra lo quisiese leer no pudiese.
Perdoname por mi ignorancia, pero en ese codigo que me pusiste, si la base de datos estaria en "C:\Documents and Settings\Escritorio\bd1.mdb" ¿donde tendria que poner eso?. ¿Como le indico en que columna buscar?, y ultima cosita, ¿En que parte pondria que la letra o simbolo q quiero q me busque esta en un text1.text?
Muchisimas gracias por tu tiempo...
Warce...
jodijo5:
primera pregunta:
tienes que ponerlo en la cadena de ceneccion, si tienes un objeto "dim db as adodb.connection"; pones entonces:
--- Citar ---db.connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & app.path & "\mydb.mdb;User Id=admin;Password=;"
--- Fin de la cita ---
; supongo que ya sabras como se hace una coneccion, yo no me memorizo aun, jeje , si la base de datos está en la misma carpeta donde esta tu aplicacion pones app.path para citar la ruta hacia esa carpeta. con respécto a las coneciones hay varias discuciones por el foro, pero puedes entrar a este link: connectionstrings
segunda pregunta
antes, por si acaso: columnas son verticales, y filas horizontales;
para que le digas en que columna buscar si ya tienes la consulta hecha como esta:
--- Código: Text --- Set rcdset = db.execute("select * from mitabla where uno like '" & id & "'")
entoces cada campo tiene un valor digamos que las columnas se enumeran de 0 hasta n-1, como un matriz
simplemente se te quieres referir a una columna en especial puedes poner asi:
--- Citar ---rcdset("nombredemicolumna")
rcdset(1)'es el indice o la numeracion que te decia y que por cierto depende
'del orden en que este en la base de datos
rcdset!nombredelacolumna
--- Fin de la cita ---
tercera pregunta
no te lo voy a adar todo comidito pues no entendi muy bien tu pregunto pero intuyo algo, aun asi si te puedo ayudar en algo
usas la funcion que te di y le dices:
--- Código: Text --- cogeme=pideme(text1)
si lo que quieres es buscar el caracter para decodifocar el mensage haces la siguiente consulta(espero resulte)
--- Código: Text --- set rcdset=db.execute("select uno from tabla1 where car1 like '" & text1 & "' xor car2 like '" & text1 & "' xor car3 like '" & text1 & "'")
Warce:
Hola de vuelta, pido disculpas de nuevo por mi ignorancia.
Te paso mi base de datos.
El programa seria asi:
_________________________________________________
l ______ _____________ l
l l_text_l l BOTON l l
l l____________l l
l Label l
l________________________________________________l
Entonces vos pones una letra en el text y cuando pones tocas el botos te aparece el simbolo en el label
PD: supongamos que la base de datos se encuentra en c:\
Navegación
[#] Página Siguiente
Ir a la versión completa