Mensajes

Los discos si se pueden solo hay que chekar el tipo de unidad logica que es

Por lo menos aky en los foros la mayoria coincidimos en k nos gusta aprender y sin problemas ayudar en lo k podamos pero hay que admitir que tambien casi todos los informaticos tenemos nuestro ego mas pequeño o mas grande pero lo tenemos.. 

Ha se me olvido que lo mas importante es pedir consejos cuando cuando sabemos k no llegaremos a ninguna parte con algo aveces hasta del menos sabio nos da una solucion optima.. eso creo...

Hay va la mia

Código (vb) [Seleccionar] Expandir


Public Function FactorizeS(ByVal S As Long) As Collection  
   Dim cTmp    As New Collection
   Dim I       As Long

  If S <= 0 Then GoTo Ret
  If S = 1 Then cTmp.Add 1: GoTo Ret

  For I = 2 To Sqr(S)
       If S Mod I = 0 Then
          cTmp.Add I
      End If
      I = I + 2
  Next I
 
Ret: Set FactorizeS = cTmp
End Function


Claro casimente es una mejora a las otras funciones pero es mas rapida  

Clarin ADO una S se le vas a cualquieras 

Y creo que es la mejor forma y si le cargas la ruta en modo de ejecucion te anda mas rapido...

El problema es que es para un cliente el; no va ha tener el vb6 instalado solo las dependencia de su exe y para el registro de los ocx y demas hay que copiarlas en el folder de windows la registro y listo, aunque como es algo comercial yo utilizo algun intalador para crear un setup que se encargue de todo..

Ha y porcirto no has intentado ussar el cristal report en vez del DataReport te da un mundo de ventajas y estetica..

Usa Ados para que te sea mas facil... y asi dejale abrir y cerrar conection al objeto 

Con una creo que se resumen todas

....
hay esta todo...

[15th]

Feliz cumpleaños  

Happy 15th Birthday....

La intencion es la que cuenta jeje

Feliz cumple mano tu eres de los buenos....

Creo que deberias ir a el sub-foro de .net porque esto es vb6
busca como hacer consultas a la db o ados y usa el buscador te sorprenderas de lo que puedes encontrar

Edit: No me cague de risa por donde vivo nos es una buena idea esa palabra mejor digo "No me hagas reir que tengo el Labio partio"