|
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
« en: Martes 13 de Octubre de 2009, 15:35 »
me podes pasar tu CR a mi email ?? gabrielahn77@hotmail.compara asi verlo mejor, ya que asi puedo decir que no se puede opinar mucho ...
77
« en: Lunes 12 de Octubre de 2009, 17:10 »
weno, veamos si esto sirve. Create una formula que seria de la siguiente forma: if {tabla.status} = 'Pagado' then variable_Precio else if {tabla.status} = 'Pediente' then 0 else if {tabla.status} = 'Cancela' then 0
suerte
78
« 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.
79
« 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. 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
80
« 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 ?? gracias
81
« 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 ?? gracias.
82
« 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
« 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
« 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
85
« en: Martes 22 de Septiembre de 2009, 15:25 »
hola que tal, fijate esto lo encontre en google. Public Function Num2Text(ByVal value As Double) As String Select Case value Case 0 : Num2Text = "CERO" Case 1 : Num2Text = "UN" Case 2 : Num2Text = "DOS" Case 3 : Num2Text = "TRES" Case 4 : Num2Text = "CUATRO" Case 5 : Num2Text = "CINCO" Case 6 : Num2Text = "SEIS" Case 7 : Num2Text = "SIETE" Case 8 : Num2Text = "OCHO" Case 9 : Num2Text = "NUEVE" Case 10 : Num2Text = "DIEZ" Case 11 : Num2Text = "ONCE" Case 12 : Num2Text = "DOCE" Case 13 : Num2Text = "TRECE" Case 14 : Num2Text = "CATORCE" Case 15 : Num2Text = "QUINCE" Case Is <; 20 : Num2Text = "DIECI" & Num2Text(value - 10) Case 20 : Num2Text = "VEINTE" Case Is <; 30 : Num2Text = "VEINTI" & Num2Text(value - 20) Case 30 : Num2Text = "TREINTA" Case 40 : Num2Text = "CUARENTA" Case 50 : Num2Text = "CINCUENTA" Case 60 : Num2Text = "SESENTA" Case 70 : Num2Text = "SETENTA" Case 80 : Num2Text = "OCHENTA" Case 90 : Num2Text = "NOVENTA" Case Is <; 100 : Num2Text = Num2Text(Int(value 10) * 10) & " Y " & Num2Text(value Mod 10) Case 100 : Num2Text = "CIEN" Case Is <; 200 : Num2Text = "CIENTO " & Num2Text(value - 100) Case 200, 300, 400, 600, 800 : Num2Text = Num2Text(Int(value 100)) & "CIENTOS" Case 500 : Num2Text = "QUINIENTOS" Case 700 : Num2Text = "SETECIENTOS" Case 900 : Num2Text = "NOVECIENTOS" Case Is <; 1000 : Num2Text = Num2Text(Int(value 100) * 100) & " " & Num2Text(value Mod 100) Case 1000 : Num2Text = "MIL" Case Is <; 2000 : Num2Text = "MIL " & Num2Text(value Mod 1000) Case Is <; 1000000 : Num2Text = Num2Text(Int(value 1000)) & " MIL" If value Mod 1000 Then Num2Text = Num2Text & " " & Num2Text(value Mod 1000) Case 1000000 : Num2Text = "UN MILLON" Case Is <; 2000000 : Num2Text = "UN MILLON " & Num2Text(value Mod 1000000) Case Is <; 1000000000000.0# : Num2Text = Num2Text(Int(value / 1000000)) & " MILLONES " If (value - Int(value / 1000000) * 1000000) Then Num2Text = Num2Text & " " & Num2Text(value - Int(value / 1000000) * 1000000) Case 1000000000000.0# : Num2Text = "UN BILLON" Case Is <; 2000000000000.0# : Num2Text = "UN BILLON " & Num2Text(value - Int(value / 1000000000000.0#) * 1000000000000.0#) Case Else : Num2Text = Num2Text(Int(value / 1000000000000.0#)) & " BILLONES" If (value - Int(value / 1000000000000.0#) * 1000000000000.0#) Then Num2Text = Num2Text & " " & Num2Text(value - Int(value / 1000000000000.0#) * 1000000000000.0#) End Select End Function
este dato lo saque de esta direccion: http://msmvps.com/blogs/jvargas/pages/convertirnumeroletras.aspxsuerte
86
« en: Sábado 29 de Agosto de 2009, 16:39 »
gracias por responder, he aplicado lo que has puesto, pero me sale un mensaje: 1267: The result of a datetime computation is out of range. fijate esta es la consulta completa: select sctcdesc, scclccli, scclnomb, scclcanu, sccltele, sccltelx, sccltfax, scdcfnac, (year(today)-year(scdcfnac)), ( select sum(sctfimus) from sctfactu where sctfofic = scclofic and sctfccli = scclccli and sctffdoc >= (extend(today) - 6 units month) and sctffdoc <= (extend(today) + 1 units month) and year(sctffdoc) = year(today)) compra, ( select MAX(sctffdoc) from sctfactu where sctfofic = scclofic and sctfccli = scclccli and year(sctffdoc) = year(today) ) ufecha, scclslcr, ccclicor1 from scmaecli, scdatcli, sctabcon, outer bsoft:cccli where scclofic = scdcofic and scclccli = scdcccli and scdcfnac is not null and month(scdcfnac) = MONTH(today) and sctcgrup = 19 and sctcsubg > 0 and scclubic = sctcgrup*1000+sctcsubg and cccliofic = scclofic and cccliccli = scclccli order by DAY(scdcfnac)
muchas gracias por la orientacion:
87
« 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.
88
« en: Viernes 21 de Agosto de 2009, 21:30 »
gracias, muy amable, a funcionado
89
« 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. 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.
90
« 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.
91
« en: Sábado 1 de Agosto de 2009, 16:21 »
exelente, gracias shadow_rev, ya me funciono.
92
« 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: 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. gracias
93
« 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 ??? gracias.
94
« 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.
95
« en: Sábado 11 de Julio de 2009, 22:55 »
buenas a todos, he intentado hacer lo que indica: http://foros.solocodigo.com/viewtopic.php?f=67&t=39016&p=142286&hilit=ssh#p142286en la parte que dice> ssh-keygen -t rsa -f ~/.ssh/id_rsa pero aun me sigue pidiendo la clave, 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.
96
« 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.
97
« 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.
99
« 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
« en: Martes 7 de Julio de 2009, 14:23 »
que tal, yo tambien soy de Santa Cruz de la Sierra - Bolivia , 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
|
|
|