• Miércoles 5 de Febrero de 2025, 21:36

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 - Sagma

Páginas: 1 2 3 [4] 5 6 ... 16
76
Crystal Reports / Re: Generar un campo acumulado
« en: Martes 13 de Octubre de 2009, 15:35 »
me podes pasar tu CR a mi email ??

gabrielahn77@hotmail.com

para asi verlo mejor, ya que asi puedo decir que no se puede opinar mucho ...

 :comp:

77
Crystal Reports / Re: Generar un campo acumulado
« en: Lunes 12 de Octubre de 2009, 17:10 »
weno, veamos si esto sirve.

Create una formula que seria de la siguiente forma:

Citar
if {tabla.status} = 'Pagado' then variable_Precio
else if {tabla.status} = 'Pediente' then 0
else if {tabla.status} = 'Cancela' then 0

suerte  :comp:

78
Crystal Reports / Re: Generar un campo acumulado
« en: Lunes 12 de Octubre de 2009, 14:58 »
que tal ems_oviedo, pero el total_vendida, no tiene que tener el precio por la cantidad, y asi poder crearte una formula para generar dicha cantidad.

 :comp:

79
C# / Re: como crear un login
« en: Miércoles 7 de Octubre de 2009, 15:52 »
buenas amigo, fijate como lo he realizado.
pero date cuanto que lo tengo en VB y con Access.

Citar
   
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        Me.DialogResult = DialogResult.Cancel
        'Me.Close()
        'RaiseEvent LoginStatus(LoginStatusENUM.LoginFailed)

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        'Conectando a la base de datos
        Dim conBase As New OleDb.OleDbConnection("Provider=Microsoft.jet.oledb.4.0;Data Source=E:RecuperadosSagmaSoftarcandb_arcan.mdb;Jet OLEDB:Database Password=Saga20Moal22")
        conBase.Close()
        Dim strSQL As String
        strSQL = "Select * from usuarios where usuario = '" & TextBox1.Text & "' and clave = '" & TextBox2.Text & "'"
        Dim daEmp As New OleDb.OleDbDataAdapter(strSQL, conBase)
        Dim dsEmp As New DataSet
        daEmp.Fill(dsEmp, "Log")
        'Si el dataset obtuvo un registro es que si es valido el Usuario y la clave
        If dsEmp.Tables("Log").Rows.Count = 1 Then
            Me.DialogResult = DialogResult.OK
            Me.Close()
            'Dim a As New frmmain
            'a.Show()
        Else
            'MessageBox.Show("Mensaje","titulo",System.windows.forms.MessageBosButtons.Accept)
            'MessageBox.Show("DESEA ELIMINAR","IMPORTANTE", MessageBoxButtons.OKCancel, MessageBoxIcon.Error)
            MessageBox.Show("Usuario o contaseña no valida", "Mensaje de Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            TextBox1.Text = ""
            TextBox2.Text = ""
            Me.TextBox1.Focus()
        End If

    End Sub


suerte  :comp:

80
VB .NET / Re: pasar datos a excel
« en: Martes 6 de Octubre de 2009, 23:31 »
hola, he echo referencia a COM con el Microsoft Office 10.0 Object Library, y nada, que mas debo referencias ??  :unsure:


gracias

81
VB .NET / pasar datos a excel
« en: Martes 6 de Octubre de 2009, 22:38 »
buenas, tengo una aplicacion realizado en VBnet 2003, y funcionaba bien, este pasaba directo datos a excel, pero en ese tiempo se tenia el office 2003, pues se ha canbiado el office al 2007 y no pillo la forma de ponerlo de nuevo el excel.

como lo puedo cargar en references al excel ??  :unsure:

gracias.

82
Windows / Re: No carga archivo adjunto - OutLook
« en: Viernes 2 de Octubre de 2009, 21:39 »
hola que tal, uso el TrendMicro, pero hace mucho que lo tengo, y de un momento a otro ya no carga los archivos adjuntos.
fue despues de un corte de luz, que todo apago, y luego no puedo adjuntar el archivo.

83
Windows / No carga archivo adjunto - OutLook
« en: Miércoles 30 de Septiembre de 2009, 17:37 »
buenas, con el outlook de microsoft, tengo un problema que no me deja adjuntar un archivo cualquiera este se pone toda la pantalla en blanco, pero si puedo usar otro aplicativos del Windows.

gracias  ;)

84
GNU/Linux / Imprimir desde dos equipos
« en: Martes 29 de Septiembre de 2009, 16:09 »
Buenas, tengo dos equipos con linux y este imprimen en una sola impresora.
una de ellas ambas maquinas estan con Red Hat una de ellas es Release 2.6.18-8.e15 #1 y la otra esta con Release 3 kernel 2.4.21-37.EL

Una de ellas que esta instalada como propia, la impresora, esta no imprime como debe ser, esta imprime entre cortada las letras y comprimida y no es legible.

Pero la otra que esta como remota imprime todo bien. como debe ser la impresion y es legible.

La impresora es una EPSON-LqQ590 y esta configurada como una EPSON-LQ570+.

gracias por la orientacion  :good:

85
VB .NET / Re: Duda sobre un metodo de VB 2005
« en: Martes 22 de Septiembre de 2009, 15:25 »
hola que tal, fijate esto lo encontre en google.

Código: vb.net
  1.  
  2. Public Function Num2Text(ByVal value As Double) As String
  3.     Select Case value
  4.         Case 0 : Num2Text = "CERO"
  5.         Case 1 : Num2Text = "UN"
  6.         Case 2 : Num2Text = "DOS"
  7.         Case 3 : Num2Text = "TRES"
  8.         Case 4 : Num2Text = "CUATRO"
  9.         Case 5 : Num2Text = "CINCO"
  10.         Case 6 : Num2Text = "SEIS"
  11.         Case 7 : Num2Text = "SIETE"
  12.         Case 8 : Num2Text = "OCHO"
  13.         Case 9 : Num2Text = "NUEVE"
  14.         Case 10 : Num2Text = "DIEZ"
  15.         Case 11 : Num2Text = "ONCE"
  16.         Case 12 : Num2Text = "DOCE"
  17.         Case 13 : Num2Text = "TRECE"
  18.         Case 14 : Num2Text = "CATORCE"
  19.         Case 15 : Num2Text = "QUINCE"
  20.         Case Is <; 20 : Num2Text = "DIECI" & Num2Text(value - 10)
  21.         Case 20 : Num2Text = "VEINTE"
  22.         Case Is <; 30 : Num2Text = "VEINTI" & Num2Text(value - 20)
  23.         Case 30 : Num2Text = "TREINTA"
  24.         Case 40 : Num2Text = "CUARENTA"
  25.         Case 50 : Num2Text = "CINCUENTA"
  26.         Case 60 : Num2Text = "SESENTA"
  27.         Case 70 : Num2Text = "SETENTA"
  28.         Case 80 : Num2Text = "OCHENTA"
  29.         Case 90 : Num2Text = "NOVENTA"
  30.         Case Is <; 100 : Num2Text = Num2Text(Int(value  10) * 10) & " Y " & Num2Text(value Mod 10)
  31.         Case 100 : Num2Text = "CIEN"
  32.         Case Is <; 200 : Num2Text = "CIENTO " & Num2Text(value - 100)
  33.         Case 200, 300, 400, 600, 800 : Num2Text = Num2Text(Int(value  100)) & "CIENTOS"
  34.         Case 500 : Num2Text = "QUINIENTOS"
  35.         Case 700 : Num2Text = "SETECIENTOS"
  36.         Case 900 : Num2Text = "NOVECIENTOS"
  37.         Case Is <; 1000 : Num2Text = Num2Text(Int(value  100) * 100) & " " & Num2Text(value Mod 100)
  38.         Case 1000 : Num2Text = "MIL"
  39.         Case Is <; 2000 : Num2Text = "MIL " & Num2Text(value Mod 1000)
  40.         Case Is <; 1000000 : Num2Text = Num2Text(Int(value  1000)) & " MIL"
  41.             If value Mod 1000 Then Num2Text = Num2Text & " " & Num2Text(value Mod 1000)
  42.         Case 1000000 : Num2Text = "UN MILLON"
  43.         Case Is <; 2000000 : Num2Text = "UN MILLON " & Num2Text(value Mod 1000000)
  44.         Case Is <; 1000000000000.0# : Num2Text = Num2Text(Int(value / 1000000)) & " MILLONES "
  45.             If (value - Int(value / 1000000) * 1000000) Then Num2Text = Num2Text & " " & Num2Text(value - Int(value / 1000000) * 1000000)
  46.         Case 1000000000000.0# : Num2Text = "UN BILLON"
  47.         Case Is <; 2000000000000.0# : Num2Text = "UN BILLON " & Num2Text(value - Int(value / 1000000000000.0#) * 1000000000000.0#)
  48.         Case Else : Num2Text = Num2Text(Int(value / 1000000000000.0#)) & " BILLONES"
  49.             If (value - Int(value / 1000000000000.0#) * 1000000000000.0#) Then Num2Text = Num2Text & " " & Num2Text(value - Int(value / 1000000000000.0#) * 1000000000000.0#)
  50.     End Select
  51. End Function
  52.  
  53.  

este dato lo saque de esta direccion:

http://msmvps.com/blogs/jvargas/pages/convertirnumeroletras.aspx

suerte  :comp:

86
Otras Bases de Datos / Re: sumar en dias
« en: Sábado 29 de Agosto de 2009, 16:39 »
gracias por responder, he aplicado lo que has puesto, pero me sale un mensaje:    :huh:

  1267: The result of a datetime computation is out of range.   ;)

fijate esta es la consulta completa:

Código: Text
  1.  
  2. select sctcdesc, scclccli, scclnomb, scclcanu,
  3.        sccltele, sccltelx, sccltfax,
  4.        scdcfnac, (year(today)-year(scdcfnac)),
  5.                 ( select sum(sctfimus) from sctfactu
  6.                    where sctfofic = scclofic
  7.                      and sctfccli = scclccli
  8.                      and sctffdoc >= (extend(today) - 6 units month)
  9.                      and sctffdoc <= (extend(today) + 1 units month)
  10.                      and year(sctffdoc) = year(today)) compra,
  11.                 ( select MAX(sctffdoc) from sctfactu
  12.                    where sctfofic = scclofic
  13.                      and sctfccli = scclccli
  14.                      and year(sctffdoc) = year(today) ) ufecha,
  15.        scclslcr, ccclicor1
  16.   from scmaecli, scdatcli, sctabcon, outer bsoft:cccli
  17.  where scclofic = scdcofic
  18.    and scclccli = scdcccli
  19.    and scdcfnac is not null
  20.    and month(scdcfnac) = MONTH(today)
  21.    and sctcgrup = 19
  22.    and sctcsubg > 0
  23.    and scclubic = sctcgrup*1000+sctcsubg
  24.    and cccliofic = scclofic
  25.    and cccliccli = scclccli
  26.  
  27. order by DAY(scdcfnac)
  28.  
  29.  

muchas gracias por la orientacion:  :rolleyes:

87
Otras Bases de Datos / Re: sumar en dias
« en: Viernes 28 de Agosto de 2009, 20:42 »
que tal, de nuevo por aca, preguntando, como le puedo aumentar al la misma consulta un mes, poder decir saco los datos del mes actual, Agosto, pero en esta consulta, quisiera sacar del mes de septiembre.

gracias.  :good:

88
Otras Bases de Datos / Re: sumar en dias
« en: Viernes 21 de Agosto de 2009, 21:30 »
gracias, muy amable, a funcionado  :beer:

 :good:

89
Otras Bases de Datos / sumar en dias
« en: Viernes 21 de Agosto de 2009, 16:33 »
buenas tardes, tengo una consulta SQL-ANSI ya que trabajo con informix, y lo que quiero es sumar un importe en un lapso de 6 meses.

he realizado la consulta siguiente, pero este lo muestra en meses, quisiera saber si se puede realizar la consulta contando los dias, por decir hoy 21 de agosto sumar los importes de hace seis meses atras.  &lt;_&lt;

Citar
select sum(importe) from factura
where oficina = 8
and cliente = 1399
and MONTH(fecha) >= MONTH(today)-6
and year(fecha) = year(today)

gracias por la ayuda.  :good:

90
Windows / programa para ubicar archivos
« en: Miércoles 5 de Agosto de 2009, 22:35 »
buenas tardes, lo siento por no explicarme bien, pero no se como llamarlo, pero no se si alguien me puede orientar de como hacer o si hay algun software que lo haga.

lo que quiero es que cuando le doy guardar como, este abre un recuadro y en este recuadro muestra algunos accesos a carpetas ya definidas, como "Escritorio, Mis documentos, Mi PC y otros".

Y quisiera saber como poner un acceso a una carpeta creada o establecida por mi persona.

gracias.  :unsure:

91
GNU/Linux / Re: pasar datos sin pedir password
« en: Sábado 1 de Agosto de 2009, 16:21 »
exelente, gracias shadow_rev, ya me funciono.

 :good:

92
GNU/Linux / Re: pasar datos sin pedir password
« en: Jueves 30 de Julio de 2009, 21:20 »
como estan, ya que aun sigo por la porfia de pasar datos desde un equipo a otro, pero no resulta.

Estoy usando:

Citar
scp archivo.tar usuario@server:/u/usuario

alguien me puede orientar como hacerlo para que cuando este usando el comando scp no me pida password.  :unsure:

gracias

93
Windows / no puedo abrir ninguna pagina en el IE
« en: Martes 28 de Julio de 2009, 00:52 »
hola a todos, tengo en mi PC Win XP SP3, y de un momento a otro, no puedo habrir ninguna pagina con el IE, pero si con el Mozilla.
el por que el IE, ya que tengo algunos accesos de pagina que van directo por el IE.
Ya revice virus y demas hiervas no he pillado nada.

Que podra ser ???  &lt;_&lt;

gracias.  :hitcomp:

94
Windows / Re: No ingresa Pagina de Microsoft
« en: Sábado 25 de Julio de 2009, 17:20 »
lo siento amigo, braca, por mi ausencia, tuve que despedirme de mi padre, ahora esta mejor y descansando.

Asi es, han encontrado un troyano que ahora ya esta funcionando.

gracias por el dato.  B)

95
GNU/Linux / pasar datos sin pedir password
« en: Sábado 11 de Julio de 2009, 22:55 »
buenas a todos, he intentado hacer lo que indica:  :unsure:

http://foros.solocodigo.com/viewtopic.php?f=67&t=39016&p=142286&hilit=ssh#p142286

en la parte que dice>  
Citar
ssh-keygen -t rsa -f ~/.ssh/id_rsa

pero aun me sigue pidiendo la clave,  &lt;_&lt;

que podra ser ??

tengo Red Hat Enterprise Linux AS release 3 (Taroon Update 6)
         Kernel 2.4.21-37.EL on an i686
         login:

alguien me puede orientar, para pasar datos sin pedir el password

gracias.  B)

96
Windows / Re: No ingresa Pagina de Microsoft
« en: Jueves 9 de Julio de 2009, 21:46 »
que tal, te cuento que hasta la fecha no he podido hacer nada, sigo con el problema. haber si alguien por ahi sabe por que no se puede abrir la pagina de microsoft.

 :good:

97
Virus / no veo nada en Flash
« en: Jueves 9 de Julio de 2009, 15:52 »
buenos dias, tengo un flash memory de 4gb de capacidad pero este solo me muestra un total de casi 1,2gb libres
pero en el flash no muestra nada, esta todo en blanc, le pase el NOD32, BitDefender, TendMicro, pero todo sigue igual.

alguien me puede orientar como puedo hacer para poder ver todo el espacio del flash y los archivos que tiene, ya que no muestra nada.

gracias.

98
Otras Bases de Datos / Re: Informix Integridad Referencial
« en: Miércoles 8 de Julio de 2009, 15:14 »
fijate en esta pagina, espero que sea lo que buscas.  :good:

http://docs.rinet.ru/InforSmes/ch17/ch17.htm

o busca en google como "Managing Data Integrity with Constraints+informix"

99
Otras Bases de Datos / Re: Informix Integridad Referencial
« en: Martes 7 de Julio de 2009, 14:48 »
hola que tal, fijate, de esta manera creo mis tablas y las relaciono.

create table usuarios
  (
    cod_usu smallint not null ,
    nombre char(40) not null ,
    sigla char(8) not null ,
    clave char(10) not null ,
    estado char(1) not null ,

    check (estado IN ('A' ,'B' )),
    primary key (cod_usu)
  );

create table usuprog
  (
    cod_usu smallint not null ,
    cod_apl smallint not null ,
    cod_pro smallint not null ,
    primary key (cod_usu,cod_apl,cod_pro)
  );

alter table usuprog add constraint (foreign key (cod_usu) references usuarios );

espero que sea de tu ayuda.

100
ODBC / Re: ODBC Informix por ningun lado...
« en: Martes 7 de Julio de 2009, 14:23 »
que tal, yo tambien soy de Santa Cruz de la Sierra - Bolivia  :beer: , pero dime cual es el nombre que le has puesto a tu servicio, eso lo podes ver en /etc el archivo services, busca el puerto 1526/tcp.

me comentas.

Páginas: 1 2 3 [4] 5 6 ... 16