elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Arreglado, de nuevo, el registro del warzone (wargame) de EHN


  Mostrar Mensajes
Páginas: [1]
1  Media / Multimedia / Re: como convertir archivo en formato *.divx a avi? en: 5 Marzo 2006, 21:59 pm
encontre la solucion!!
con virtualdub. abro el *.divx y voy a guardar como. lo guardo cono *.divx y en compresion le pongo que no lo recomprima. que solo copie el original
2  Media / Multimedia / como convertir archivo en formato *.divx a avi? en: 27 Febrero 2006, 17:28 pm
como convierto un archivo en formato *.divx a avi u otro formato que pueda reproducir en la mayoria de los reproductores. puesto que este formato solo o pude reproducir en el divx player y no puedo insertarle subtitulos.

saludos
3  Programación / Programación Visual Basic / Re: comm en: 5 Noviembre 2005, 16:12 pm
en la msdn library (ayuda de visual studio) hay un tema sobre esto. esta en ayuda de visual vbasic/referencia del lenguaje/objetos/mscomm creo que era algo asi  te explica las propiedades metodos y eventos edl control que es bastante facil de usar
4  Programación / Programación Visual Basic / conectar tabla de fox a Vb si Denv en: 4 Noviembre 2005, 01:16 am
hola mi duda es con respecto a conexiones ADODB. lo que necesito es conectarme a una tabla o una base de datos de visual foxpro (mdb o dbf). de antemano les digo que no puedo usar un datenvironment, asi que lo unico que me queda es toda la conexion por codigo. alguien me podria decir como abrir esta conexion a una tabla en fox.
5  Programación / Programación Visual Basic / Re: Visual Basic y Access en: 4 Noviembre 2005, 01:08 am
yo creo que es de mas facil solucion, si pones la base en el mismo directorio que el archivo lo unico que tenes que hacer es concatenar el nombre del archivo con la propiedad path del objeto app.
algo asi seria.
conexion.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Datos.mdb"
el objeto path no lo tenes que agregar ni nada.. es asi de sencillo...
bye ;D
6  Programación / Programación Visual Basic / Re: Llenar grafico desde visual basic en: 4 Noviembre 2005, 00:57 am
Citar
public cn as adodb.connection
set cn = new adodb.conection
cn.open .....'abris la tabla que necesites
'ejecutas una conculta de insercion sobre la conexion y le 'ndicas el archivo y la hoja a la que va
cn.Execute "select registros.* into [Excel 5.0;database=datos.xls].nombrehoja  from registros where...
el unico drama que tenes con esto es que no podes agregar en una hoja que exista y no podes agregar cuando esta el archivo abierto.
por lo demas funciona bien.
Otra opcion es hacer algo con objetos de automatizacion. yo me rompi la cabeza y no lo pude hacer andar. te mando lo que hice y si mi funciono pero en Visual foxrpo
Citar
local i,j,tmpsheet,xlapp,xlsheet,hoja2
dimension Mlist(1,1)
afields(mlist,'enc')
thisform.enabled=.f.
TmpSheet=GetObject('','Excel.Sheet')
XLApp=TmpSheet.Application
XLApp.visible=.T.
XLApp.workbooks.add()
XLSheet=XLApp.ActiveSheet
hoja2=XLApp.rr
for i=1 to alen(mlist,1)
   XLSheet.Cells(1,i)=mlist(i,1)
   XLSheet.Cells(1,i).font.bold=.T.
   XLSheet.Cells(1,i).font.size="10"
   XLSheet.Cells(1,i).font.name="Arial"   
endfor
i=2
select enc
go top
for n=1 to reccount('enc')
   for j=1 to alen(mlist,1)
      if vartype(&mlist(j,1))='N'
         if &mlist(j,1)=0
            XLSheet.Cells(i,j)='-'
         else
            XLSheet.Cells(i,j)=&mlist(j,1)
         endif
      endif
      if vartype(&mlist(j,1))='L'
         if &mlist(j,1)=.t.
            XLSheet.Cells(i,j)='si'
         else
            XLSheet.Cells(i,j)='no'
         endif
      endif
      if vartype(&mlist(j,1))='C'
            XLSheet.Cells(i,j)=&mlist(j,1)
      endif
      XLSheet.Cells(i,j).font.size="10"
      XLSheet.Cells(i,j).font.name="Arial"
   endfor
   i=i+1
   skip
endfor
J=''
XLSheet.Columns.EntireColumn.AutoFit
thisform.enabled=.t.
es medio complicado al principio pero cuando lo hiciste andar lo usas en todo.
leete en la ayuda lo de objetos de automatizacion y por ahi entendes algo mas.
un saludo ;D
7  Programación / Programación Visual Basic / Re: Enviar datos de excel a tabla externa en: 2 Noviembre 2005, 03:59 am
no era eso a lo que me referia
a lo que me referia yo era a esto
Citar
Agregar datos a una nueva tabla de una base de datos de Access               

En este ejemplo se agrega una nueva tabla a la base de datos neptuno.mdb. A continuación, la subrutina rellena la tabla con los datos que se encuentran en las celdas S1:V30 de esta hoja de cálculo. Para ello es necesario que el archivo neptuno.mdb esté in               
               
               
               
               
Sub CreateTable()               
''' NOTA: Para utilizar esta subrutina, es necesario crear               
'''       una referencia a la versión más reciente               
'''       de la siguiente biblioteca:               
''               
''        Biblioteca de objetos de datos ActiveX de Microsoft               
''        Ext. Microsoft ADO 2.1 para DDL y seguridad               
                
    ' Las primeras cuatro líneas Dim simultáneamente declaran y               
    ' crean nuevos objetos. Puede utilizar esta sintaxis o bien               
    ' utilizar la declaración Set para crear los objetos.               
    Dim cat As New ADOX.Catalog               
    Dim tbl As New ADOX.Table
    Dim conn As New ADODB.Connection
    Dim rst As New ADODB.Recordset
   
    Dim looprange As Range
    Dim currcell As Range
   
    With conn
        ' Establece el proveedor OleDB para la conexión.
        .Provider = "Microsoft.JET.OLEDB.4.0"
        ' Abre una conexión a Neptuno.mdb.
        .Open Application.Path & "\samples\neptuno.mdb"
    End With
       
    ' Establece la conexión activa para el objeto Catalog.
    cat.ActiveConnection = conn
   
    With tbl
        ' Asigna un nombre a la nueva tabla.
        .Name = "Tabla_de_ventas"
        ' Asigna un nombre a las columnas de la nueva tabla.
        With .Columns
            .Append "Nombre"
            .Append "Región"
            .Append "Producto"
            ' La columna Sales debe ser de tipo de datos "Moneda".
            .Append "Ventas", adCurrency
        End With
    End With
   
    ' Agrega la tabla a la base de datos.
    cat.Tables.Append tbl
   
    With rst
        .ActiveConnection = conn
        ' Abre la nueva tabla. El argumento LockType del método
        ' Open debe establecerse a adLockOptimistic a fin de
        ' agregar registros a la tabla.
        .Open "Tabla_de_ventas", LockType:=adLockOptimistic
    End With
   
    ' Establece el rango de la hoja activa que contiene
    ' los registros que se añadirán a la base de datos.
    Set looprange = Range("s2", Range("s2").End(xlDown))

    ' Examina la información de la hoja de cálculo.
    For Each currcell In looprange
        With rst
            ' Agrega un nuevo registro.
            .AddNew
            ' Agrega información a los campos correspondientes.
            .Fields("Nombre").Value = currcell.Value
            .Fields("Región").Value = currcell.Offset(0, 1).Value
            .Fields("Producto").Value = currcell.Offset(0, 2).Value
            .Fields("Ventas").Value = currcell.Offset(0, 3).Value
            ' Escribe el nuevo registro a la base de datos.
            .Update
        End With
    Next currcell
   
    rst.Close
    Set tbl = Nothing
    Set cat = Nothing
    conn.Close
End Sub               
igualmente gracias poor tu respuesta. ;D
8  Programación / Programación Visual Basic / Enviar datos de excel a tabla externa en: 1 Noviembre 2005, 18:52 pm
necesito saber como programar una macro para enviar datos desde una planilla de calculos de exel a un archivo de datos de acces o fox. un tipo de conexion, un control o algo asi. les agraceria si me dan o me ayudan a encontrar una solucion
9  Programación / Programación General / Re: Como empezar en programación en: 19 Marzo 2005, 00:08 am
ademas de conocer varios lenguajes y fundamentos. aunque no es necesario es muy importante el conocimiento de logica que tenga uno al empezar a programar yo despues de haber aprendido un buen toco, me doy cuenta de que si la logica la hubiera aprendido antes de programar me hubiera sido de muchisimautilidad. pues no olvidemos que si bien los paradigmas son varios y los lenguajes mas todavia, todos se sustentan en lo estructuras mas que nada condicionales y todo ese rollo
Páginas: [1]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines