• Miércoles 5 de Febrero de 2025, 07:08

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - carlosespinoza

Páginas: [1] 2 3
1
Delphi / Re: No encuentra System.pas
« en: Miércoles 15 de Diciembre de 2010, 17:36 »
Hola, tonto de mi... se me olvido incluir los paths de las librerias en las enviroment options...  :argh:   :bad:

Bueno ya lo solucione!!!! por si a alguien le pasa....

Saludos    :good:

2
Delphi / No encuentra System.pas
« en: Martes 14 de Diciembre de 2010, 01:18 »
Hola a todos!!!

 Soy nuevo en delphi, me acaban de dar un proyecto ya creado el cual tengo que modificar... para iniciar, instale delphi 7 en mi equipo, y copie los fuentes del CD que me dieron...

A la hora de querer compilar me aparece un Error Fatal :argh: !!!    "Unit Not Found: 'System.pas' or bynary equivalents (DCU, DPU)"

No se que hacer... alguien me puede ayudar??? G :D racias

3
VB .NET / Control para introducir texto e imagenes???
« en: Jueves 18 de Noviembre de 2010, 17:35 »
:hola: Hola, tengo el siguiente problema, me gustaria que me pudieran ayudar...

Lo que tengo es que en mi aplicación hay una aopción para poder crear "reportes" por parte del usuario, mas que reportes son pantallas para que los usuarios puedan capturar un numero indefinido de texto, algo asi como sus informes de trabajo, pero ahora me han solicitado se puedan incrustar imagenes o tablas, algo asi como si de un documento de word se tratara.. alguien sabe que tipo de control puedo usar???

Oviamente esta información requiero guardarla en una base de datos y para su posterior recuperación e impresión... tambien no se que tipo de datos debo de usar... sera el OLE?

Desde ya, muchas gracia :good: s!!!!

4
VB .NET / DataGridview autoeditable
« en: Viernes 22 de Octubre de 2010, 17:47 »
Hola tengo un problema...

Requiero hacer una tabla que cuando se cambie una de las celdas se actualice automaticamente en la DB, alguien sabe alguna forma de hacer esto??? he tratado de hacerlo mediante las funciones de endeditcell pero se como...

Alguna idea???

Gracias

5
VB .NET / Re: Programa que hable en Visual 2008
« en: Viernes 27 de Agosto de 2010, 21:03 »
tengo algunas ideas que quisas te ayude... escribeme: espinoza_vfp@hotmail.com

6
VB .NET / Re: Ejecutar Archivo . sql (Script) desde VB .net
« en: Viernes 27 de Agosto de 2010, 19:29 »
Lo que se me ocurre es que abras el archivo (ya que es texto plano) y carges el contenido en una variable string, y ejecutes el contenido de esa variable como si fuera un insert o un delete mediante una conexión a la base de datos....

Avisame si te funciona, si necesitas mas ayuda, me dices, saludos  B)

7
VB .NET / Re: mostrar word en asp.net
« en: Viernes 27 de Agosto de 2010, 19:23 »
Hola, ya encontre el articulo que te habia comentado...

http://support.microsoft.com/kb/304643/es

Es para abrir un docuemto de office en un control webexplorer, espero te sirva...

saludos

8
VB .NET / Re: mostrar word en asp.net
« en: Jueves 12 de Agosto de 2010, 02:14 »
Perdon no habia checado el correo... el problema que veo es que no tienes office instalado  :bad: ... eso si es el problema... ya que el explorador lo que hace es crear una instancia de word en el explorador, algo asi como lo que pasa con los PDF de acrobat... pero si no tienes office, no creo que puedas hacerlo :argh: ...

solo se me ocurre usar google apps o office web aps... pero si no tienes office instalado no se como puedas hacerlo...

Seria cosa de investigar...

Saludos

9
VB .NET / Re: mostrar word en asp.net
« en: Sábado 24 de Julio de 2010, 01:09 »
Hola, si estas usando Asp.net quiere decir que estas haciendo una aplicación que corre sobre el explorador web...

Bueno, pues dentro de un explorador web puedes mostrar cualquier archivo (al estilo pdf) solo que no recuerdo como... yo lo he hecho y recuerdo que no es tan dificil, solo era cuestion de llamarlo y ponerle como target la pagina, asi te mostrara el archivo en el mismo explorador...

mmmmmmmmm

cierto, yo lo hice con docs de 2007, no si 2003 traiga el plug para el explorador... seria cosa de checar eso...

Prueba con las propiedades del browser e intenta cargar ahi tu archivo, pero atraves del browser... no desde las propiedades del archivo...

Saludos... PD me dices si funciona... :good:

10
Hola, realmente estoy muy interesado en programación para dispositivos mobiles, me gusta mucho .Net y creo que es muy bueno, pero desgraciadamente solo los dispositivos con WMobile lo aceptan, opte por J2ME, aunque no me agradamucho creo que es bueno, pero acabo de encontrar Qt, lenguaje basado en C++, el problema, no encuentro un tutorial para su Qt Creator...

Encuentro muchos para Linux, pero no es ni la misma interface y no logro hacer que compile ningun programa de sus ejemplos...

Alguien tendra alguno...

11
Java / J2ME reproducción de video en Nokia
« en: Martes 20 de Abril de 2010, 14:54 »
Hola a todos, soy principiante en java y he podido crear con el wireless tool kit una aplicación que reproduce un video que esta en un ftp, en el emulador, funciona digamos que bien (de repente como que se alenta la reproducción), pero cuando hago el pakage y lo paso al movil, no mas no funciona...

Tengo un nokia 3600 y un nokia 5130 para hacer pruebas, pero en ninguno funciona, simpre se queda antes de solicitar permiso para conectarse a la red...

Alquien me puede ayudar???

Saludos y muchas gracias :comp:

12
Java / Obtener Coordenadas del GPS y enviarlas a DB
« en: Viernes 5 de Marzo de 2010, 20:10 »
Hola a todos, soy nuevo en esto de Java y mucho mas en J2ME, requiero hacer una aplicacion para el celular que tome los datos de un gps interno o bluetooth y mande esas coordenadas a una base de datos sql en un servidor X...

Algien me puede ayudar?

Saludos y gracias :good:

13
VB .NET / Re: obtener datos de puerto paralelo
« en: Lunes 18 de Enero de 2010, 17:52 »
Yo he trabajado con el puerto paralelo, es algo sencillo, lo interesante es que haces con esos datos... deja busco mi aplicación... por ahi debe de estar... escribeme a espinoza_vfp@hotmail.com y platicame que va a hacer tu aplicación...

Saludos :good:

14
Delphi / Problema con Buffer
« en: Miércoles 6 de Enero de 2010, 22:40 »
Hola, soy novato en Delphi y tengo que modificar un pequeño modulo, pero tengo un problema, cuando quiero abrir un FORM ya sea en tiempo de edición o de ejecución, me aparece el siguiente mensaje (lo adjunto en la imagen)...

Espero alguien me pueda ayudar ya que no puedo ni siquiera ver el FORM, saludos y gracias

15
VB .NET / Re: Programa para medir la Temperatura
« en: Jueves 27 de Agosto de 2009, 21:49 »
Hola, muchas gracias por responder...

Fijate que no se me habia ocurrido lo de la web del fabricante... tambien lo de linux se me hace una excelente idea... obtener el codigo en C y solo pasarlo a C++ o C# creando una DLL basica y solo llamarla desde mi sistema...

El procesador de mi servidor (ya es es el me interera monitoriar) es: QuadCore Xeon E5430 2.66 GHz


Saludos y gracias

16
VB .NET / Programa para medir la Temperatura
« en: Martes 25 de Agosto de 2009, 19:22 »
Hola, a todos, en esta ocuación recurro a ustes por lo siguiente...

Requiero hacer un programa/utilidad que registre la temperatura de nuestros equipos, entre ellos el servidor, y cuando sobrepase la temperatura establecida, aparte de mostrar una advertencia visual, mande correos al administrador para informarle...

No tengo problemas en mandar correos o el demas desarrollo, lo unico que no se como hacer es lo de medir la temperatura... debe de haber alguna DLL o algo asi, pero no la encuentro, alguien sabe de alguna pagina o link que me pueda ayudar??

Creo que es un desarrollo al cual le podriamos sacar mucho provecho todos... en cuanto lo termine, lo publico....

Saludos a todos y muchas gracias

17
VB .NET / Re: Copiar Base de datos de un servidor a otro
« en: Miércoles 19 de Agosto de 2009, 00:25 »
Muchas gracias por tu apoyo, sigo luchando con esto... aun no he encontrado algo que me funcione...

saludos y gracias :beer:

18
Dudas informáticas / Instalar un Wiki
« en: Martes 21 de Julio de 2009, 15:49 »
Hola a todos, nuevamente recurro a ustedes para que me orienten un poquito....

En la empresa hablamos de tener algo que todos puedan acceder y agregar información, algo asi como un panel de noticias y discusiones algo informal, pensamos en un wiki, vimos que era una buena opcion, pero no queremos un wiki publico, mas bien algo que solo podamos ver en la empresa, dentro de la intranet...

Que wiki me recomiendan para instalar?

Ahora tengo otra duda, existe algun wiki basado en .net?
Saludos y gracuas  :good:

19
VB .NET / Copiar Base de datos de un servidor a otro
« en: Lunes 13 de Julio de 2009, 23:30 »
Hola a todos, nuevamente recurro a ustedes para ver si tienen alguna idea...  ;)

Les expongo el escenario

Tengo 3 Servidores sql server 2000, uno de prueba(local en mi equipo), el de "producción" (en el servidor de la empresa) y uno de respaldo para peticiones web (en otro equipo), cada uno tiene practicamente la misma BD. Cuando desarrollo, simpre hago pruebas en el servidor de mi pc, una ves todo probado implemento los cambios en el respectivo servidor de producción, tambien requiero que cada 2 hrs se este "respaldando" la información el servidor de respaldo, ya que a este llegan consultas desde la web y que por cuestiones de seguridad seleccionamos que las peticiones web las haga a este servidor y no al productivo...

Actualmente hago la migración de la informacion del servidor de producción al de respaldo, mediate paquetes de sql server y trabajos del mismo servidor, el problema es que cada ves que agrego un campo a una tabla o agrego una tabla tengo que hacer un nuevo "trabajo" tanto el el servidor de respaldo(en el cual vacia la DB) y en el servidor productivo (El cual copia los datos al otro servidor), esto es muy constante, ya que como estamos mejorando y agregando procesos y modulos al sistema, pues hay que cambiar/agregar cosas a la DB y actualmente cuando agrego una tabla simplemente no lo toma en cuenta para vaciar o para copiar los datos.

Me gustaria hacer un programa el cual haga automaticamente esto, cuando y cambie algo en una tabla o agrege alguna, la pase automaticamente sin problemas.  :comp:

Espero haberme explicado bien...

tengo una baga idea de como hacerlo, segun yo:

    vaciar la DB de destino
    copiar toda la estructura la de BD origen al destino
    copiar todos los registros de todas las tablas a la DB destino

Mis problemas:
    No se obtener el nombre de todas las tablas automaticamente
    Como copiar la estructura completa de la tabla al otro servidor (o en su caso crearla)
    copiar las filas de un servidor a otro mediante una instrucción sql (o varias,podria ser con un for anidado)


Alguna idea de como hacerlo?

he buscado varios programas, funcionan pero son de paga  :argh: , ademas me gustaria ponerle logs de resultados para llevar una estadistica de lo que pasa, ademas de poder manejarlo via web, de eso no tengo problemas... pero me gustaria poder hacerlo....

les prometo que si lo realizo, lo publico... :good:

Gracias por adelantado!!!!  :beer:

20
VB .NET / Re: Manual Microsoft Word Object Library 11.0
« en: Martes 9 de Junio de 2009, 16:00 »
Hola, lo que yo hago cuando quiero hacer algo en word o excel desde vb.net, es primero, hacerlo en word por medio de la grabación de un macro, despues modificas la macro y ahi esta el codigo, solo es que lo adecues, me refiero a que en vb antes le pongas el objeto de word, ejem:

objWord.funcion.etc.etc=algo


asi te funciona o por lo menos a mi si...

prueba y me dices si tienes mas problemas, saludos  :good:

21
VB .NET / Re: Cantidad (dinero) a letra
« en: Martes 9 de Junio de 2009, 15:54 »
Hola, gracias por la respuesta...

Pero hace 2 dias encontre una función y la adecue...

Por si a alguien le sirve:

Código: vb.net
  1.  
  2.  
  3.  
  4.     Private Const DOT As String = "."
  5.  
  6.     Public Function NumerosEnPalabras( _
  7.         ByVal Number As String, _
  8.         ByVal Moneda As String) As String
  9.  
  10.         Dim s As String
  11.  
  12.         Dim DecimalPlace As Integer
  13.  
  14.         Dim IntPart As String
  15.  
  16.         Dim Cents As String
  17.  
  18.         s = Format(Val(Number), "0.00")
  19.  
  20.         DecimalPlace = InStr(s, DOT)
  21.  
  22.         If DecimalPlace Then
  23.  
  24.             IntPart = Left(s, DecimalPlace - 1)
  25.  
  26.             'Cents = Left(Mid(s, DecimalPlace + 1, 2), 2)
  27.             Cents = Number.Substring(DecimalPlace, 2)
  28.         Else
  29.  
  30.             IntPart = s
  31.  
  32.             Cents = ""
  33.  
  34.         End If
  35.  
  36.         If IntPart = "0" Or IntPart = "" Then
  37.  
  38.             s = "Cero "
  39.  
  40.         ElseIf Len(IntPart) > 7 Then
  41.  
  42.             s = IntNumToSpanish(Val(Left(IntPart, Len(IntPart) - 6))) + _
  43.                 "Millones " + IntNumToSpanish(Val(Right(IntPart, 6)))
  44.  
  45.         Else
  46.  
  47.             s = IntNumToSpanish(Val(IntPart))
  48.  
  49.         End If
  50.  
  51.         If Right(s, 9) = "Millones " Or Right(s, 7) = "Millón " Then
  52.  
  53.             s = s + "de "
  54.         End If
  55.  
  56.         Select Case s
  57.  
  58.             Case "Un ", "Una "
  59.  
  60.                 s = s & Singular(Moneda)
  61.  
  62.             Case Else
  63.  
  64.                 s = s & Moneda
  65.  
  66.         End Select
  67.  
  68.         s = s & " "
  69.  
  70.         If Val(Cents) Then
  71.  
  72.             'Cents = "con " + IntNumToSpanish(Val(Cents)) + "Centavos"
  73.             Cents = Cents.Substring(0, 2) & "/100 M.N.)"
  74.         Else
  75.  
  76.             Cents = "00/100 M.N.)"
  77.  
  78.         End If
  79.  
  80.         Return ("(" & Trim(s + Cents).ToUpper)
  81.  
  82.     End Function
  83.  
  84.     Public Function IntNumToSpanish(ByVal numero As Integer) As String
  85.  
  86.         Dim ptr As Integer
  87.  
  88.         Dim n As Integer
  89.  
  90.         Dim i As Integer
  91.  
  92.         Dim s As String
  93.  
  94.         Dim rtn As String
  95.  
  96.         Dim tem As String
  97.  
  98.         s = CStr(numero)
  99.  
  100.         n = Len(s)
  101.  
  102.         tem = ""
  103.  
  104.         i = n
  105.  
  106.         Do Until i = 0
  107.  
  108.             tem = EvalPart(Val(Mid(s, n - i + 1, 1) + CloneChain(i - 1, "0")))
  109.  
  110.             If Not tem = "Cero" Then
  111.  
  112.                 rtn = rtn + tem + " "
  113.  
  114.             End If
  115.  
  116.             i = i - 1
  117.  
  118.         Loop
  119.  
  120.         '//Filters
  121.  
  122.         '//filterThousands
  123.  
  124.         ReplaceAll(rtn, " Mil Mil", " Un Mil")
  125.  
  126.         Do
  127.  
  128.             ptr = InStr(rtn, "Mil ")
  129.  
  130.             If ptr Then
  131.  
  132.                 If InStr(ptr + 1, rtn, "Mil ") Then
  133.  
  134.                     ReplaceStringFrom(rtn, "Mil ", "", ptr)
  135.  
  136.                 Else : Exit Do
  137.  
  138.                 End If
  139.  
  140.             Else : Exit Do
  141.  
  142.             End If
  143.  
  144.         Loop
  145.  
  146.         '//filterHundreds
  147.  
  148.         ptr = 0
  149.  
  150.         Do
  151.  
  152.             ptr = InStr(ptr + 1, rtn, "Cien ")
  153.  
  154.             If ptr Then
  155.  
  156.                 tem = Left(Mid(rtn, ptr + 5), 1)
  157.  
  158.                 If tem = "M" Or tem = "" Then
  159.  
  160.                 Else
  161.  
  162.                     ReplaceStringFrom(rtn, "Cien", "Ciento", ptr)
  163.  
  164.                 End If
  165.  
  166.             End If
  167.  
  168.         Loop Until ptr = 0
  169.  
  170.         '//filterMisc
  171.  
  172.         ReplaceAll(rtn, "Diez Un", "Once")
  173.  
  174.         ReplaceAll(rtn, "Diez Dos", "Doce")
  175.  
  176.         ReplaceAll(rtn, "Diez Tres", "Trece")
  177.  
  178.         ReplaceAll(rtn, "Diez Cuatro", "Catorce")
  179.  
  180.         ReplaceAll(rtn, "Diez Cinco", "Quince")
  181.  
  182.         ReplaceAll(rtn, "Diez Seis", "Dieciseis")
  183.  
  184.         ReplaceAll(rtn, "Diez Siete", "Diecisiete")
  185.  
  186.         ReplaceAll(rtn, "Diez Ocho", "Dieciocho")
  187.  
  188.         ReplaceAll(rtn, "Diez Nueve", "Diecinueve")
  189.  
  190.         ReplaceAll(rtn, "Veinte Un", "Veintiun")
  191.  
  192.         ReplaceAll(rtn, "Veinte Dos", "Veintidos")
  193.  
  194.         ReplaceAll(rtn, "Veinte Tres", "Veintitres")
  195.  
  196.         ReplaceAll(rtn, "Veinte Cuatro", "Veinticuatro")
  197.  
  198.         ReplaceAll(rtn, "Veinte Cinco", "Veinticinco")
  199.  
  200.         ReplaceAll(rtn, "Veinte Seis", "Veintiseís")
  201.  
  202.         ReplaceAll(rtn, "Veinte Siete", "Veintisiete")
  203.  
  204.         ReplaceAll(rtn, "Veinte Ocho", "Veintiocho")
  205.  
  206.         ReplaceAll(rtn, "Veinte Nueve", "Veintinueve")
  207.  
  208.         '//filterOne
  209.  
  210.         If Left(rtn, 1) = "M" Then
  211.  
  212.             rtn = "Un " + rtn
  213.  
  214.         End If
  215.  
  216.         '//Un Mil...
  217.  
  218.         If Left(rtn, 6) = "Un Mil" Then
  219.  
  220.             rtn = Mid(rtn, 4)
  221.  
  222.         End If
  223.  
  224.         '//addAnd
  225.  
  226.         For i = 65 To 88
  227.  
  228.             If Not i = 77 Then
  229.  
  230.                 ReplaceAll(rtn, "a " + Chr(i), "* y " + Chr(i))
  231.  
  232.             End If
  233.  
  234.         Next
  235.  
  236.         ReplaceAll(rtn, "*", "a")
  237.  
  238.         IntNumToSpanish = rtn
  239.  
  240.     End Function
  241.  
  242.     Private Function EvalPart(ByVal x As Integer) As String
  243.  
  244.         Dim rtn As String
  245.  
  246.         Dim s As String
  247.  
  248.         Dim i As Integer
  249.  
  250.         Do
  251.  
  252.             Select Case x
  253.  
  254.                 Case 0 : s = "Cero"
  255.  
  256.                 Case 1 : s = "Un"
  257.  
  258.                 Case 2 : s = "Dos"
  259.  
  260.                 Case 3 : s = "Tres"
  261.  
  262.                 Case 4 : s = "Cuatro"
  263.  
  264.                 Case 5 : s = "Cinco"
  265.  
  266.                 Case 6 : s = "Seis"
  267.  
  268.                 Case 7 : s = "Siete"
  269.  
  270.                 Case 8 : s = "Ocho"
  271.  
  272.                 Case 9 : s = "Nueve"
  273.  
  274.                 Case 10 : s = "Diez"
  275.  
  276.                 Case 20 : s = "Veinte"
  277.  
  278.                 Case 30 : s = "Treinta"
  279.  
  280.                 Case 40 : s = "Cuarenta"
  281.  
  282.                 Case 50 : s = "Cincuenta"
  283.  
  284.                 Case 60 : s = "Sesenta"
  285.  
  286.                 Case 70 : s = "Setenta"
  287.  
  288.                 Case 80 : s = "Ochenta"
  289.  
  290.                 Case 90 : s = "Noventa"
  291.  
  292.                 Case 100 : s = "Cien"
  293.  
  294.                 Case 200 : s = "Doscientos"
  295.  
  296.                 Case 300 : s = "Trescientos"
  297.  
  298.                 Case 400 : s = "Cuatrocientos"
  299.  
  300.                 Case 500 : s = "Quinientos"
  301.  
  302.                 Case 600 : s = "Seiscientos"
  303.  
  304.                 Case 700 : s = "Setecientos"
  305.  
  306.                 Case 800 : s = "Ochocientos"
  307.  
  308.                 Case 900 : s = "Novecientos"
  309.  
  310.                 Case 1000 : s = "Mil"
  311.  
  312.                 Case 1000000 : s = "Millón"
  313.  
  314.             End Select
  315.  
  316.             If s = "" Then
  317.  
  318.                 i = i + 1
  319.  
  320.                 x = x / 1000
  321.  
  322.                 If x = 0 Then i = 0
  323.  
  324.             Else
  325.  
  326.                 Exit Do
  327.  
  328.             End If
  329.  
  330.         Loop Until i = 0
  331.  
  332.         rtn = s
  333.  
  334.         Select Case i
  335.  
  336.             Case 0 : s = ""
  337.  
  338.             Case 1 : s = " Mil"
  339.  
  340.             Case 2 : s = " Millones"
  341.  
  342.             Case 3 : s = " Billones"
  343.  
  344.         End Select
  345.  
  346.         EvalPart = rtn + s
  347.  
  348.         Exit Function
  349.  
  350.     End Function
  351.  
  352.     Private Sub ReplaceStringFrom( _
  353.         ByRef s As String, _
  354.         ByVal OldWrd As String, _
  355.         ByVal NewWrd As String, _
  356.         ByVal ptr As Integer)
  357.  
  358.         s = Left(s, ptr - 1) + NewWrd + Mid(s, Len(OldWrd) + ptr)
  359.  
  360.     End Sub
  361.  
  362.     Private Function Singular(ByVal s As String) As String
  363.  
  364.         If Len(s) >= 2 Then
  365.  
  366.             If Right(s, 1) = "s" Then
  367.  
  368.                 If Right(s, 2) = "es" Then
  369.  
  370.                     Singular = Left(s, Len(s) - 2)
  371.  
  372.                 Else
  373.  
  374.                     Singular = Left(s, Len(s) - 1)
  375.  
  376.                 End If
  377.  
  378.             Else
  379.  
  380.                 Singular = s
  381.  
  382.             End If
  383.  
  384.         End If
  385.  
  386.     End Function
  387.  
  388.     Private Function CloneChain(ByVal n As Integer, ByVal Chr As String)
  389.  
  390.         Dim i As Integer
  391.  
  392.         Dim CharClone As String
  393.  
  394.         Dim rtn As String
  395.  
  396.         If Len(Chr) Then
  397.  
  398.             CharClone = Mid(Chr, 1, 1)
  399.  
  400.             For i = 1 To n
  401.  
  402.                 rtn = rtn + CharClone
  403.  
  404.             Next
  405.  
  406.         End If
  407.  
  408.         Return rtn
  409.  
  410.     End Function
  411.  
  412.     Private Sub ReplaceAll( _
  413.         ByRef s As String, _
  414.         ByVal OldWrd As String, _
  415.         ByVal NewWrd As String)
  416.         Dim ptr As Integer
  417.  
  418.         Do
  419.  
  420.             ptr = InStr(s, OldWrd)
  421.  
  422.             If ptr Then
  423.  
  424.                 s = Left(s, ptr - 1) + NewWrd + Mid(s, Len(OldWrd) + ptr)
  425.  
  426.             End If
  427.  
  428.         Loop Until ptr = 0
  429.  
  430.     End Sub
  431.  
  432.  


Saludos  :comp:   :good:

22
VB .NET / Cantidad (dinero) a letra (Solucionado)
« en: Jueves 28 de Mayo de 2009, 19:08 »
Hola a todos, de casualidad alguien conoce un buen algoritmo que convierta una cantidad (dinero) a letra?

Ejem:

78540.25=(Setenta y ocho mil quinietos cuarenta pesos 25/100 MN)

Esto es para una factura, entonces tiene que contemplar los centavos.

Por cierto, soy de Mexico por eso el MN...

Saludos y espero me puedan ayudar....  :comp:

23
VB .NET / Re: Imagen fondo
« en: Martes 12 de Mayo de 2009, 15:35 »
el combo tiene un evento que se dispara cuando cambia el item seleccionado, presisamente es el changeitem; por otro lado, recuerda que el combo te puede manejar 2 valores a la vez, el item (oculto) y el texto (que se muestra), el cual son respectivos...

Intenta cambiar la propiedad backgroundImage del formulario cuando se dispare el evento changeitem del combo y toma el valor del combo.item.value para definir la imagen...

espero te ayude si tienes problemas, te puedo ayudar... saludos!!!! :good:

24
VB .NET / Re: Incluir .Net FrameWork en mi instalador
« en: Viernes 8 de Mayo de 2009, 19:14 »
Hola, yo he hecho varias aplicaciones con su respectivo instalador, para eso utilizo el que viene con vs 2005... encontre un articulo muy bueno que a mi me saco de muchos apuros

http://www.onglasses.net/default.aspx?articuloid=265

Espero te sirva... saludos :good:

25
VB .NET / Re: Libreria para mejorar la interfaz grafica de usuario
« en: Viernes 8 de Mayo de 2009, 19:08 »
Hola, a lo mejor te podria ayudar meterte un poco a Silverlight, lo usas con Expression Blend, ahi creas lo bonito y con VS creas la programación, realmente no me he metido en eso, pero se que se puede hacer...

Hechate un clavado a lo mejor te funciona... es como flash pero con todas las ventajas de vb.net ademas de permitir acceso a datos...

Saludos y me dices como vas... :good:

Páginas: [1] 2 3