Mensajes

Otra forma chachi de hacerlo

Código (vb) [Seleccionar] Expandir

Public Function IsOdiousNumber02(ByVal lLng As Long) As Boolean
    IsOdiousNumber02 = (((lLng + ((lLng And &HFFFFFFF0) \ &H10&)) And &HF0F0F0F) And 1)
End Function

No es mas rapida que la que puse, pero es interesante ver como trabaja

Lo mas sencillo es que le pidas a un Mod Global que te borre el mensaje en ese topic... yo tambien estoy harto de esas nuevas respuestas , y tambien del tema: "Muestra tu escritorio" y el de "Cual es tu edad?" y todas esas mierdas... como me arrepiento

[MOD:]

Deberias poner las APIs en un TLB, te ahorrias algo de tiempo Voy a ir viendo si puedo acelerarlo
MOD: Se me ocurre hacer la comprobacion en vez de en bloques de 1 byte en Longs o incluso Currencies... El problema esta si el tamaño de lo que se esta buscando no es multiple... porque entonces habria que hacer la comprobacion por Bytes ...

MOD2:Voy a intentar hacer algo con ASM y SSE Nada, SSE tambien requiere que los datos esten alineados... a 16bytes...

no entiendo como decis que la limitacion .net es su simplicidad, acaso vos no empezas a usar vb por su simplicidad?

No, la simplicidad no, el Framework de 300mb si. Ahora supongo que vendreis diciendo que todos lo tienen instalado bla bla... pero cuando la gente se mete con las dependencias de VB6 que no llega a los 10mb... ahi ya es diferente
La simplicidad es preciosa, es mas, cuanto mas simple mas me gusta... no se mucho de .NET (Por que no me interesa nada el lenguaje)... pero dime, se pueden usar APIs en .NET?

En realidad si es un PE, aumentado, pero un PE al final y al cabo.

La verdad es que no se mucho sobre el CIL y el CLR de .NET... tampoco tengo mucho interes actualmente

Código [Seleccionar] Expandir

http://www.xbeat.net/vbspeed/cod_InStrMarzo.htm
La funcion InStr01 debe ser la mas rapida en caso de que uses vbTextCompare, si no quieres trabajar con cadenas podras alterarla para que funcione con ByteArrays

El truco de esta funcion esta en sus Arrays trucados

Karcrack, en tal caso también Java es para tontos :S

Framework de 300 megas? No hace falta, con el 2.0 es más que suficiente, que es el core de todos los demás, a menos de que quieras usar WPF, WCF, o cualquier otro feature del 3.0 en adelante.

No para tontos no.. pero en mi opinion si seria mas para tontos que VB6, ya que hace todo el trabajo por ti.

No pasa nada, el Framework es una de las limitaciones de .NET, practicamente todos los lenguajes tienen limitaciones... el Framework es el precio de no tener que pensar en APIs jamas... y de el ejecutable generado no sea un PE

[REG ADD]

Código [Seleccionar] Expandir


Herramienta de registro de consola para Windows - versión 3.0
Copyright (C) Microsoft Corp. 1981-2001.  Reservados todos los derechos


REG ADD clave [/v nvalor | /ve] [/t tipo] [/s separador] [/d datos] [/f]

  clave      [\\equipo\]tclave
             Equipo     nombre del equipo remoto. Si se omite se usa el
                        equipo actual. Sólo HKLM y HKU están disponibles
                        para equipos remotos.
             tclave     CLAVERAIZ\subclave
             CLAVERAIZ  [ HKLM | HKCU | HKCR | HKU | HKCC ]
             subclave   Nombre completo de una clave de registro en la
                        CLAVERAIZ seleccionada.

  /v         Nombre del valor en la clave seleccionada para agregar

  /ve        Agrega el nombre de valor vacío <sin nombre>

  /t         Tipos de datos de clave de registro
             [ REG_SZ    | REG_MULTI_SZ  | REG_DWORD_BIG_ENDIAN    |
               REG_DWORD | REG_BINARY    | REG_DWORD_LITTLE_ENDIAN |
               REG_NONE  | REG_EXPAND_SZ ]
             Si se omite, se asume REG_SZ

  /s         Especifica el carácter que usa como separador en su cadena
             de datos para REG_MULTI_SZ. Si se omite, se usa "\0" como
             separador

  /d         Datos que se asignan a nvalor del registro que se agrega

  /f         Fuerza la sobrescritura de entradas de registro existentes
             sin avisar.

Ejemplos:

  REG ADD \\ABC\HKLM\Software\MiCo
    Agrega una clave HKLM\Software\MiCo en el equipo remoto ABC

  REG ADD HKLM\Software\MiCo /v datos /t REG_BINARY /d fe340ead
    Agrega un valor (nombre: datos, tipo: REG_BINARY, datos: fe340ead)

  REG ADD HKLM\Software\MiCo /v MRU /t REG_MULTI_SZ /d fax\0mail
    Agrega un valor (nombre: MRU, tipo: REG_MUTLI_SZ, datos: fax\0mail\0\0)

  REG ADD HKLM\Software\MyCo /v Path /t REG_EXPAND_SZ /d %%systemroot%%
    Agrega un valor (nombre: Path, tipo: REG_EXPAND_SZ, datos: %systemroot%)
    Nota: use porcentaje doble ( %% ) dentro de la cadena expandida

Es REG ADD, no ADD REG

[Por que solo comparto codigos en VB6?]

Creo que ha quedado claro que por que una persona programe en VB6 no es tonta ni padece ningun deficiencia mental

Yo actualmente se programar en VB6, C, ASM, y luego varios lenguajes de scripting... Por que solo comparto codigos en VB6? Pues porque hacer el tipo de cosas que hago en VB6 supone un reto... llamar punteros desde C no tiene ningun misterio...

Como no estoy trabajando para ninguna empresa, que esto lo hago por hobbie, por comprender como funcionan las cosas y aprender cada dia, prefiero seguir poniendome retos en VB6 y no en C/ASM.
Las empresas por supuesto estan migrando de VB6 a .NET, que actualmente ofrece una programacion mucho mas sencilla y rapida que eso en empresas se iguala a productividad...

En mi humilde opinion cualquier lenguaje .NET es mucho mas para tontos que VB6 Simplemente por el hecho de que .NET te facilita muchisimo las cosas con su framework de 300mb, haciendote funciones para todo, y asi te puedes olvidar de las APIs

[lngReverse()]

Deberia ser mas rapida mi funcion de lngReverse() que el StrReverse()... Alguien ha provado? XD