SoloCodigo

Hace un tiempo logré con mucho esfuerzo y dedicacion terminar mi primera aplicacion hecha con VB6.0. La entregué a mis clientes empaquetada con el asistente de VB y se instaba sin ningun problema y funcionaba perfectamente (hasta ahora). Lo que ocurre es que decidí hacer una actualizacion del programa pero cuando la trato de instalar en mi computador no se puede porque me dice :

No se pudo registrar en archivo 'C:\Docume~1\XaToWaRe\CONFIG~1\Temp\msftqws.pdw\$(DELLSelfRegisterEX)'
 Porque no se encontro

y no se me ocurre porque me lanza ese error

acá les envio un pantallazo de lo que muestra el error

Porfavor, si alguien me puede dar una ayudita o mejor aún una solucion le estaría muy agradecido

Bendiciones

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

Hola a todos:

    Necesito saber como me puedo desconectar de Intenet con una aplicacion de VB6.0

De antemano Gracias

Saludos