SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Cero Kull en Domingo 8 de Diciembre de 2002, 19:57
-
Hola amigos todavia sigo trancado con las bese de datos para acceder a las bases de datos., miren encontre este codigo en el computador de mi instituto pero no se como funciona o para que sirve ojala me lo puedan explicar de mejor forma.. ya que no le tengo la ayuda a visual basic 6.0 pronto la tendre claro.....
___Aqui esta el codigo____
[Se que esta son la declaraciones ]
Option Explicit ->> pero que es esto ?
Dim WRKJET As Workspace ->> ESto que es. ?
Dim BdAiep As Database --> es el nombre de la base datos pero que es AS DATABASE ?
Dim RsAlumnos As Recordset -->> cREO QUE ESTO REEPLAZARIA A LAS PROPIEDAD DATABASENAME (RsAlumnos ES VARIABLE) aqui me gustaria saber como funciona mas adelante el recordset
Esta es la otra parte del codigo......
Private Sub Form_Load()
Set WRKJET = CreateWorkspace("", "admin", "", dbUseJet)
Set BdAiep = WRKJET.OpenDatabase("c:windowsescrit~1msbdbdaiep.mdb")
Set RsAlumnos = BdAiep.OpenRecordset("Select * from ing_Panas order by val(codigo_alumno)", dbOpenDynaset)
sw_modificar = True
End Sub
Aqui me gustaria que me lo explicaran mas facil linea por linea (disculpen la patudes) pero para no hacer preguntas tontas mas adelante y quizas poder ayudar mas..
Ojala me ayuden
B)
-
HOla, me dao cuenta q toy respondiendo a dudas con el usuario de un amigo q se metio en este foro, desde mi pc y dejo grabada la password, Thanks Pini, xo tranqui q dentro de poco me regiatro yo, jeje
Weno al tema,
Mira maxo te voy a responder xo creo q todo lo q preguntas son cosas muy muy basicas y q aunq te lo explique lo mejor seria q te bajases un manual de "Acceso a bases de datos ADO desde codigo" q te resolveria mejor los problemas q tienes.
Option Explicit -> Esto es lo primero q el basic incluye cuando empiezas a escribir codigo y significa q a partir de aqui hasta la 1º funcion o sub q tengas en el formulario todas las variables q declares seran globales en dixo formulario.
Dim WRKJET As Workspace ->esto te crea un area de memoria o espacio de trabajo para tu proyecto.
Dim BdAiep As Database --> database es un tipo de varaible q indica a basic q lo declarado es una Base de datos
Dim RsAlumnos As Recordset ->Un recorset es un cursor, y un cursor es un conjunto de registros.por ejemplo en un recorset podrias meter todos los registros de una tabla, e ir de uno a otro.
Private Sub Form_Load()
Set WRKJET = CreateWorkspace("", "admin", "", dbUseJet) te crea un espacio de trabajo con privilegios de administrador(admin)
Set BdAiep = WRKJET.OpenDatabase("c:windowsescrit~1msbdbdaiep.mdb")asigna a la varible del tipo database una base de datos access
Set RsAlumnos = BdAiep.OpenRecordset("Select * from ing_Panas order by val(codigo_alumno)", dbOpenDynaset) Crea un cursor, recordset con unos determinados registros de la base de datos y le asigna un tipo de cursor, los tipos de cursor q le asignes a cada recorset son importentes xq cada uno te dara unas posibilidades u otras
sw_modificar = True (pone el swicth a true??, XD
End Sub
Un saludo, espero haberte ayudado xo mi consejo es q te bajes bajes un manual y te lo empolles xq si no no sacaras nada en claro, Alberto
-
Hola Cero Kull:
Yo también estoy de acuerdo en que tienes que leer un libro o tutorial, fijate si en la web del Guille http://guille.costasol.net (http://guille.costasol.net) hay algo.
Lo que pasa es que estos son foros de consultas, no de enseñanza, ya que sería difícil eso, para eso se escriben los libros y los tutoriales, para que haya que escribirlos una sola vez y no uno para cada alumno.
Además aprendiendo solo de esta manera corres el riesgo que te indiquen algo mal, lo cual te va a confundir más.
Unas cositas:
Option Explicit ---> indica que en ese formulario o módulo de código todas las variables se tienen que declarar explícitamente.
Por ejemplo si abres un proyecto nuevo y escribes:
a = "Prueba"
MsgBox a
va a andar siempre y cuando no diga arriba Option Explicit, sino va a saltar un error. El código entonces tendría que ser:
Dim a
a = "Prueba"
MsgBox a
Ahí no va a saltar el error. El ámbito o alcance de las variables, sean globales o no, no va a cambiar por haber puesto Option Explicit.
En el menú Herramientas, Opciones en la paleta Edición hay una casilla que dice "Requerir declaración de variables", si está tildada, VB te va a colocar el Option Explicit automáticamente cada vez que agregues un formulario o un módulo.
Otra cosa que puedes hacer para aprender es posicionar el cursor en una palabra, por ejemplo en este caso Option y presionar F1, la ayuda de Vb es buena (al menos la de VB5 lo era, ahora ya no la uso tanto) y te van a salir todas las formas de usar la palabra Option (Option Explicit, Option Base, Option Compare ... etc)
Ver la ayuda es más rápido que poner posts (creo).
Un comentario más: el usar la declaración explícita de variables puede parecer un poco incómodo, porque hay que escribir más, ya que hay que declararlas a todas, pero es totalmente recomendable ya que de otra manera puede haber errores muy difíciles de detectar, por ejemplo:
MiVariable = "prueba"
MsgBox MiVarriable
No sale nada ¿Por qué? porque me equivoqué y puse una r demás en el segundo uso. Entonces vb cree que son dos variables diferentes, MiVariable y MiVarriable.
El Option Explicit elimina esos problemas ya que va a saltar un error que me avisa que la variable no se encuentra declarada.
Conclusión: Usar siempre Option Explicit, poner la casilla tildada en la pantalla de opciones.
Saludos,
Javier
-
Gracias a Alberto y Gracias Javier!!
Saben seguire leyendo mas cosas, la verdad es por que pregunto tanto es que estudio solo nadie me a enceñado nada de visual solo lo he aprendido solo, investigando CLARO QUE LA MAYOR PARTE AQUI EN ESTE FORO, Y GRACIAS A MUCHOS QUE ME HAN RESPONDIDO LAS INQUETUDES..
De verdad muchas gracias!!!
Un Saludos
Atte. Cero Kull®