SoloCodigo

Perdon, Me equivoque con el nombre del archivo,

NO es '$(DELLSelfRegisterEX)'


SINO '$(DLLSelfRegisterEX)'


Saludos

Ya que no especificaste mucho para lo que quieres el control Calendar, lo único que te puedo decir es si quieres que el calendario te indique la fecha actual al iniciarse el formulario tienes que colocar en el Form:

Private Sub Form_Load()

Calendar1.Day = Format(Date, "DD")
Calendar1.Month = Format(Date, "MM")
Calendar1.Year = Format(Date, "YYYY")

End Sub


Ojala te sirva de algo. Si necitas algo mas no dudes en preguntarmelo

Saludos

Seben me esta resultando super bien, pero la Problema ahora es la siguiente

Es que tambien tengo unos Data's que estan conectados a una base de datos acces, la pregunta es , ¿tembien tengo que colocarle el directorio app.path?

antes

C:\Documents and Settings\Sebastian Toro\Escritorio\BookStore\Inventariolibros1.mdb

despues

App.Path & \Inventariolibros.mdb


me podrían decir ahora como hacerlo con los directorios de los data's porque me envia un error diciendo que las direcciones son inválidas

muchas gracias por su tiempo, realmente se los agradezco mucho

mmmmmmmmmm, algo entendí

Entonces tengo que colocar en todas las direcciones $(app.path)

antes  

Open "C:\Documents and Settings\Sebastian Toro\Escritorio\Bookstore\Dia.dat" For Input As #1

 despues

Open "$(App.path)\Dia.dat" For Input As #1


pero esta bien la sintaxis? , porque me envía el mismo error

disculpen las molestias

ufffffffffffff

Les cuento que hice un programa en VB 6.0 edicion profesional, pero el problema es que una vez compilado e instalado, el programa no me corre y me lanza el error   " Error '76' En tiempo de ejecucion "

tengo una base de datos conectada en Acces y dos archivos.text donde guardo valores.

el problema me tiene absolutamente loco y ya no se que hacer porque nunca me había pasado y lo mas penca es que ni siquiera me corre en mi computador

si alguin tuviese la preciada solucion, no dude en comunicarmela.

Gracias

Hola:

Realmente no se como utilizar el codigo que me entregaste mamex, ya que nunca he utilizado sql. me podrias dar un link donde pueda descargar un tutorial sobre SQL?



Sagutxo, cuando utiligo la funcion Sort crea un error ¿Donde coloco el codigo?¿dentro de un Commandbutton, en el load?
disculpen las molestias

Saludos

Estoy haciendo una aplicacion con: data, MSFlexgrid, acces 97 y tengo dos pequeñitos problamitas que me tienen loko. Necesito que "Ordene alfabeticamente" los datos que ingreso a la MSFlexgrid automáticamente despues de haberlos ingresados y tambien necesito un motor de busqueda que muestre los resultados en otra MSflexgrid, tengo un motor de busqueda, pero solo busca hasta encontrar 1 registro  solamente pero yo necesito un motor que busque todos los registros exitentes y que se detenga cuando ya no queden registros

ej:    Tengo varios libros  de un mismo autor (Larson), pero de diferentes títulos    ( Claculo diferencial, Calculo Comun etc..). cuando quiero buscar a un autor que tenga varios libros, me busca hasta encontrar el primero que tenga como autor "Larson", y yo necesito que aparezcan todos los libros con autor "Larson"


Si alguien tiene algun link donde pueda investigar o si alguien tiene el codigo, por favor ayudeme

saludos ; aqui les dejo el motor de busqueda que tengo:



       
Private Sub Command1_Click()

        Data1.Recordset.Index = "Autor"
        Data1.Recordset.Seek "=", Text1
          If Data1.Recordset.NoMatch Then
            MsgBox "El Autor ingresado no existe", , "Intentelo Nuevamente"
            Text1.Text = ""
            Text1.Setfocus
          Else
            Data1.Recordset.Index = "Autor"
            Data1.Recordset.Seek "=", Text1.Text
            Grilla.Col = 0
            Grilla.Text = Data1.Recordset.Fields("Numero de Registro")
            Grilla.Col = 1
            Grilla.Text = Data1.Recordset.Fields("Titulo")
            Grilla.Col = 2
            Grilla.Text = Data1.Recordset.Fields("Autor")
            Grilla.Col = 3
            Grilla.Text = Data1.Recordset.Fields("Nº de Copias")
            Text1.Text = ""
          End If

End Sub

eso es exactamente lo que hice!!!!!!!


Muchas gracias por responder a mi duda


saludos

Saludos:

  No es mi intención molestarlos, pero le he dado veultas y vueltas al asunto y no he podido encontrar la solución a mi problema.
  Mi problema es el siguiente:
      Necesito que mi aplicación se inicie junto con windows, como por ejemplo el Msn, ares, etc . Estoy haciendo una aplicación para un Cyber café y es eso el unico detalle que me queda por hacer.    Ojala me puedan ayudar y si es posible que sea lo mas claro posible (me refiero, en que lugares tengo que ingresar los codigos y esas cosas) .

De antemano muchas gracias por Leer mi mensaje y mas se los agradeceré si pudiran responder.

Gracias

hola:

Quisas no te sea de ayuda mi comentario, pero ¿intentaste indexar la base de datos con "Sin duplicados"?

saludos

Vale muchas gracias, recuerdo haberla visitado antes y se me habí olvidado de su existencia.
  Chau
Gracias por responder  Saludos

Muchas gracias, los codigos me sirvieron para lo que quería. Vale, nos estamos viendo

Saludos