• Sábado 10 de Mayo de 2025, 09:35

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 ... 6 7 [8] 9 10 ... 16
176
Crystal Reports / Aparecer En La Ultima Hoja
« en: Lunes 10 de Septiembre de 2007, 23:14 »
hola que tal, después de hacer mis formulas para los subtotales, tengo una pregunta.

Como hacer para que en la ultima hoja, salga un texto de la firma. yo todo lo he puesto en Page Footer, por que aca, ya que estoy sumando en cada pagina sub totales y totales de la anterior pagina.

y si lo pongo en el Report Footer, este texto se pone encima de los sub totales, asi que lo pongo un poco mas abajo de los totales.


gracias.  B)

177
VB .NET / Re: Problema Con Los Textbox
« en: Viernes 7 de Septiembre de 2007, 14:32 »
Otra forma seria, viendo el form:

ver / orden de tabulación.

y alli te muestra el orden en que se desplaza el cursor por los textbox.

suerte  :comp:

178
VB .NET / Re: Asignar Foco
« en: Martes 4 de Septiembre de 2007, 01:05 »
muchas gracias  :smartass:

179
Crystal Reports / Sumar Sub Totales
« en: Martes 4 de Septiembre de 2007, 00:02 »
hola que tal, lo que quiero es sumar sub totales, en cada pagina, ya que he creado un grupo y ese grupo me da como unas cinco hojas.

he puesto la siguiente formula, para sumar sub totales por cada hoja.

Código: Text
  1.  
  2. Primera Formula en Cabecera de Pagina, y ocultarla :
  3. WhilePrintingRecords; NumberVar Cantidad :=0;
  4.  
  5. Segunda Formula en el detalle, y ocultarla :
  6. WhilePrintingRecords; NumberVar Cantidad := Cantidad + {TuCampoMonto};
  7.  
  8. Tercera Formula en Pie de Pagina :
  9. WhilePrintingRecords; NumberVar Cantidad
  10.  
  11.  

y bien, eso es lo que queria, pero como le hago para que en cada hoja, tenga una suma de la hoja actual y de la hoja anterior  :unsure:


gracias

180
VB .NET / Re: Programa Para Gimnasio
« en: Lunes 3 de Septiembre de 2007, 15:11 »
Hola amigo, fijate, aca dejan un ejemplo.

Ejemplo

Suerte  :comp:

181
VB .NET / Re: Asignar Foco
« en: Lunes 3 de Septiembre de 2007, 14:35 »
gracias por responder, pero si te fijas estoy usando VBnet 2003, Winforms.   :whistling:



 :comp:

182
VB .NET / Re: Ver Dato Completo En Combo
« en: Viernes 31 de Agosto de 2007, 22:05 »
Gracias Schezo, pero como dices, todo ok, pero no pillo mi error, ya que el combo se ve todos los datos que tengo en la DB. Eso me pasa cuando le doy enter o el TAB, si te fijas en la imagen cuando estoy en el combo en cualquiera de ellos pasa eso, cuando me salgo o pierdo el foco, este lo muestra completo.

He probado con ponerle el TRIM o el RTRIM, pero no me ha dado resultado.

 :comp:

183
VB .NET / Re: Asignar Foco
« en: Viernes 31 de Agosto de 2007, 21:56 »
gracias Scherzo por contestar, pero fijate lo estoy haciendo de esta manera:  :unsure:

Código: Text
  1.  
  2.     Private Sub txt_descripcion_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txt_descripcion.KeyUp
  3.         If e.KeyValue = Keys.Enter Then
  4.             Me.ToolBarButton2.Focus()
  5.         End If
  6.     End Sub
  7.  
  8.  

y me sale un error:

Citar
focus, no es un miembro de System.windows.forms.toolbarbutton


 :comp:

184
VB .NET / Re: Cargar Combobox Con Un Dataset
« en: Miércoles 22 de Agosto de 2007, 20:53 »
fijate en este link:

Cargar Combo


suerte,  :comp:

185
VB .NET / Ver Dato Completo En Combo
« en: Lunes 20 de Agosto de 2007, 21:36 »
hola a todos, tengo un combo que cargo los datos desde una tabla, además le he puesto un autocomplete, pero no se ve toda la palabra completa. como verán en la imagen.

este es mi código que tengo para autocompletar es:

Código: Text
  1.  
  2.     Private Sub cmb_nacionalidad_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles cmb_nacionalidad.KeyUp
  3.         Dim sTypedText As String
  4.         Dim iFoundIndex As Integer
  5.         Dim oFoundItem As Object
  6.         Dim sFoundText As String
  7.         Dim sAppendText As String
  8.  
  9.         'Allow select keys without Autocompleting
  10.         Select Case e.KeyCode
  11.             Case Keys.Back, Keys.Left, Keys.Right, Keys.Up, Keys.Delete, Keys.Down
  12.                 Return
  13.         End Select
  14.  
  15.         'Get the Typed Text and Find it in the list
  16.         sTypedText = Trim(Me.cmb_nacionalidad.Text)
  17.         iFoundIndex = Trim(Me.cmb_nacionalidad.FindString(sTypedText))
  18.  
  19.         'If we found the Typed Text in the list then Autocomplete
  20.         If iFoundIndex >= 0 Then
  21.  
  22.             'Get the Item from the list (Return Type depends if Datasource was bound
  23.             ' or List Created)
  24.             oFoundItem = Me.cmb_nacionalidad.Items(iFoundIndex)
  25.  
  26.             'Use the ListControl.GetItemText to resolve the Name in case the Combo
  27.             ' was Data bound
  28.             sFoundText = Me.cmb_nacionalidad.GetItemText(oFoundItem)
  29.  
  30.             'Append then found text to the typed text to preserve case
  31.             sAppendText = sFoundText.Substring(sTypedText.Length)
  32.             Me.cmb_nacionalidad.Text = sTypedText & sAppendText
  33.  
  34.             'Select the Appended Text
  35.             Me.cmb_nacionalidad.SelectionStart = sTypedText.Length
  36.             Me.cmb_nacionalidad.SelectionLength = sAppendText.Length
  37.  
  38.         End If
  39.     End Sub
  40.     Private Sub cmb_nacionalidad_Leave(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmb_nacionalidad.Leave
  41.         Dim iFoundIndex As Integer
  42.  
  43.         iFoundIndex = Me.cmb_nacionalidad.FindStringExact(Me.cmb_nacionalidad.Text)
  44.  
  45.         Me.cmb_nacionalidad.SelectedIndex = iFoundIndex
  46.     End Sub
  47.  
  48.  

y con este, cargo mi combobox:

Código: Text
  1.  
  2.         Da = New OleDb.OleDbDataAdapter("SELECT adgrlsubg, adgrldesc FROM adgrl " & _
  3.                                         " WHERE (adgrlgrup = 9) " & _
  4.                                           " AND (adgrlsubg > 0) " & _
  5.                                         " ORDER BY adgrlsubg", con.cnn)
  6.         Da.Fill(Ds4, "adgrl")
  7.  
  8.         Me.cmb_nacionalidad.DataSource = Ds4.Tables("adgrl")
  9.         Me.cmb_nacionalidad.DisplayMember = "adgrldesc"
  10.         Me.cmb_nacionalidad.ValueMember = "adgrlsubg"
  11.  
  12.  

gracias por la colaboración.  :smartass:

186
VB .NET / Asignar Foco
« en: Miércoles 15 de Agosto de 2007, 21:25 »
Hola a todos, tengo un textbox, donde pongo el apellido de una persona, pero quisiera que cuando le doy enter, en el textbox, que le ponga el foco en un primer boton que esta en un toolbar.

esta es la imagen de mi ventana de búsqueda.


gracias.  :unsure:

187
VB .NET / Re: Mantener El Cursor En El Textbox
« en: Martes 14 de Agosto de 2007, 14:38 »
ya lo tengo resuelto, resulta que lo tenia en el evento activate del form, apuntando siempre al primer textbox, lo comente y todo listo.

gracias :comp:

188
VB .NET / Mantener El Cursor En El Textbox
« en: Viernes 10 de Agosto de 2007, 23:08 »
Hola a todos, tengo una duda, por ejemplo, estoy trabajando con excel y mi aplicación echo en Vbnet 2003, pero al hacer uso del TABCONTROL, para cambiar de la aplicación al excel, y volver de nuevo a la aplicación, el cursor siempre se pone en el primer textbox, y no se mantiene donde se había quedado hantes de hacer uso de TABCONTROL para cambiar al excel.

Habrá alguna forma de que el cursos se mantenga en el textbox que se estaba trabajando?

gracias :smartass:

189
VB .NET / Vbnet - Serie De Videos
« en: Miércoles 1 de Agosto de 2007, 20:59 »
Les paso una pequeña recopilación de links sobre videos "VB How-to Forms over Data Video Series"
Los mismos, los encontraremos en formato ZIP y formato WMV en el que se tratarán temas relacionados con datos y Visual Basic


http://www.microsoft.com/downloads/details...ang=en#filelist


http://www.microsoft.com/downloads/details...ang=en#filelist


http://www.microsoft.com/downloads/details...ang=en#filelist


suerte,  :comp:

190
VB .NET / Re: Manual De Vb .net
« en: Jueves 19 de Julio de 2007, 23:23 »
Hola que tal, aca le paso un link para poder bajar un libro de VBnet.  :comp:

Libro de Vbnet


Ademas en este link hay un curso de VBnet 2005

curso de VBnet 2005


suerte  :smartass:

191
VB .NET / Re: Manual De Vb .net
« en: Lunes 9 de Julio de 2007, 21:12 »
Listoj, my friend, ya fue enviado dos archivos.  :comp:
 
suerte   :smartass:

192
VB .NET / Llenado De Datagrid
« en: Jueves 5 de Julio de 2007, 17:39 »
hola que tal, tengo problemas al llenar los datos en un DataGrid, mi problema es que en algunos campos, hay un unyo ( . ), y solo me muestra los datos hasta donde esta el punto.
Como le puedo hacer para que me muestre todo el dato ?

con este codigo, lleno el datagrid:

Código: Text
  1.  
  2.         Ds = DatosCliente.Consulta("SELECT ofic.sctcdesc as oficina, scclccli, scclnomb, scclcanu, sccltele, sccltelx, " & _
  3.                                      "     esta.sctcdesc as estado" & _
  4.                                      "  FROM scmaecli, sctabcon ofic, sctabcon esta" & _
  5.                                      " WHERE ofic.sctcgrup = 81 " & _
  6.                                      "   AND scclofic = ofic.sctcgrup*1000+ofic.sctcsubg " & _
  7.                                      "   AND esta.sctcgrup = 97 " & _
  8.                                      "   AND scclesta = esta.sctcgrup*1000+esta.sctcsubg " & _
  9.                                      "   AND scclofic = 81011 ORDER BY scclccli")
  10.         DataGrid1.DataSource = Ds.Tables("scmaecli")
  11.  
  12.  


gracias  :smartass:

193
VB .NET / Re: Llenar Combobox, Lpad
« en: Sábado 23 de Junio de 2007, 00:37 »
gracias, ya lo acomode sin usar el LPAD.   :devil:
 

 :whistling:

194
VB .NET / Re: Datetimepicker En Dd/mm/yyyy
« en: Viernes 22 de Junio de 2007, 22:41 »
gracias amigo cuajoa, pero ya lo use, y me sigue saliendo el dato MM/dd/yyyy.

Es que me estoy conectando a una DB - Informix. En SqlServer me funca bien, pero en informix, naranjas.  :hitcomp:

195
VB .NET / Llenar Combobox, Lpad
« en: Viernes 22 de Junio de 2007, 21:15 »
Hola que tal, estoy llenando un combobox, todo ok, pero resulta que debo concatenar dos valores, pero rellenar con cero, por decir: el campo1 tiene un valor de 2, y el campo2 un valor de 1, y este debe ser 201, para poder tener en el valuemenber = 201

mi codigo es este:

Código: Text
  1.  
  2.         Da = New OleDb.OleDbDataAdapter("SELECT cggrpcco||lpad(cgsubcco,2,"0") as subcc,cgdescos FROM cgcencos " & _
  3.                                         " WHERE (cggrpcco = 2) " & _
  4.                                           " AND (cgsubcco > 0) " & _
  5.                                           " ORDER BY cgsubcco", Con.cnn)
  6.         Da.Fill(Ds1, "cgcencos")
  7.  
  8.         Me.cmd_subcentro.DataSource = Ds1.Tables("cgcencos")
  9.         Me.cmd_subcentro.DisplayMember = "cgdescos"
  10.         Me.cmd_subcentro.ValueMember = "subcc"
  11.  
  12.  

pero me sale un mensaje de error:

Citar
Error de resolucion de sobrecarga por que ninguna de las funciones "NEW" a las que se tiene acceso acepta este numero de argumentos

gracias por la orientacion:  :comp:

196
VB .NET / Datetimepicker En Dd/mm/yyyy
« en: Viernes 22 de Junio de 2007, 16:31 »
hola a todos, estoy tratando de poner un DateTimePicker en fecha corta, pero en dd/MM/yyyy, pero hasta ahora solo me muestra MM/dd/yyyy.

he realizado lo siguiente, y no me funciona:

Código: Text
  1.  
  2.         'Rep.FechaIni = Me.DateTimePicker1.Value
  3.         'Rep.FechaIni = Me.DateTimePicker1.Value.Date.Day.ToString & "/" & Me.DateTimePicker1.Value.Date.Month.ToString & "/" & Me.DateTimePicker1.Value.Date.Year.ToString
  4.         'Rep.FechaIni = Format(CDate(Me.DateTimePicker1.Value), "dd/MM/yyyy")
  5.         Rep.FechaIni = Format((Me.DateTimePicker1.Value), "dd/MM/yyyy")
  6.         Rep.FechaFin = Me.DateTimePicker2.Value.Day & "/" & Me.DateTimePicker2.Value.Month & "/" & Me.DateTimePicker2.Value.Year
  7.         'Rep.FechaFin = Me.DateTimePicker2.Value.ToString("dd/MM/yyyy")
  8.  
  9.  

como vera, lo he tratado, pero ninguno de ellos me compone la fecha como quiero.

gracias por la colaboracion

197
GNU/Linux / Re: Enviar Y Traer Archivos
« en: Miércoles 20 de Junio de 2007, 14:47 »
gracias Bob Esponja, pero no dio resultado, el link que has puesto, aun me sigue pidiendo la clave del usuario remoto.

Asi es su -, estyo seguro, eso es lo que me piden que haga, ya que el traspaso de la informacion debe ser como a las 2 am, y como nadie hay para poner la clave del usuario, no se pasa nada ni se trae ninguna informacion.


voy haber que puedo hacer,  :rain:

gracias  :think:

198
GNU/Linux / Re: Enviar Y Traer Archivos
« en: Martes 19 de Junio de 2007, 23:24 »
hola gracias, su -, yo desde que sali, solo he programado como caballo cochero en informix, desde 1987 hasta hoy, sigo con lo mismo,  :D, en Informix, ahora con un poco de Visual Basic.

Java muy poco.   :smartass:

C/C++ poquisimo.  :smartass:




 :rolleyes:

199
GNU/Linux / Re: Enviar Y Traer Archivos
« en: Martes 19 de Junio de 2007, 14:39 »
Gracias, su -, lo que quiero hacer es traer dos archivos y enviar unos cinco archivos, archivos desde un equipo remoto.


gracias  :comp:

200
GNU/Linux / Re: Enviar Y Traer Archivos
« en: Lunes 18 de Junio de 2007, 22:19 »
ok, gracias, voy haber como le hago por que de Perl, pero weno, a ver que saco.  :P
y claro, que es bienvenido toda ayuda. y quisiera ver esos torasos script.
 

gracias,  :comp:

Páginas: 1 ... 6 7 [8] 9 10 ... 16