• Domingo 22 de Diciembre de 2024, 03:46

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

Páginas: 1 ... 42 43 [44] 45
1076
VB .NET / Re: Datagrid Para Vb .net 2003
« en: Sábado 24 de Julio de 2004, 19:47 »
cuando tengas cualquier duda pasa la voz, que con cada pregunta uno se da cuenta que no sabe mucho, y es motivo para aprender un nuevo tema..

1077
VB .NET / Re: Problema Con Data Adapter Y Data Set
« en: Sábado 24 de Julio de 2004, 19:41 »
ohe qu fue y tipo de excepcion te voto.......?

1078
VB .NET / Re: Parametros
« en: Sábado 24 de Julio de 2004, 19:40 »
No entendi mucho tu pregunta pero tu te refieres a las formas de inicializar el OleDbCommand si es asi, hay cuatro, pero tres casi son los mismo, la cuarta si es iniciarlo con transacciones. aqui te paso el codigo de como crear las tres primeras y el zip con el programa completo tambien:  

P.D.: use una base de datos de sql, Pubs, y la sentecia que la cambio para cada tipo para que se vea la diferencia

Código: Text
  1.  
  2.    
  3.         Try
  4.             myCn = New OleDbConnection("Provider=SQLOleDB; Data Source=(local); DataBase=Pubs; Integrated Security=SSPI")
  5.  
  6.             Select Case tipo
  7.  
  8.                 Case 1
  9.                     'primera forma sin enviarle nada
  10.                     myCommand = New OleDbCommand()
  11.  
  12.                     'ahora si dandole las propiedades
  13.                     myCommand.CommandText = strCommand
  14.                     myCommand.Connection = myCn
  15.  
  16.                     'abriendo la conexion
  17.                     myCommand.Connection.Open()
  18.  
  19.                     'cambiando la cadena de conezion
  20.                     strCommand = "SELECT au_fname, au_lname, State FROM Authors WHERE Contract = 1"
  21.                 Case 2
  22.                     myCommand = New OleDbCommand(strCommand)
  23.                     myCommand.Connection = myCn
  24.  
  25.                     'abriendo la conexion
  26.                     myCommand.Connection.Open()
  27.  
  28.                     'cambiando la cadena de conezion
  29.                     strCommand = "SELECT au_fname, au_lname,phone,  State FROM Authors WHERE STATE='CA'"
  30.                 Case 3
  31.                     myCommand = New OleDbCommand(strCommand, myCn)
  32.                     'abriendo la conexion
  33.                     myCommand.Connection.Open()
  34.  
  35.                     'cambiando la cadena de conezion
  36.                     strCommand = "SELECT au_fname, au_lname, State FROM Authors WHERE STATE<>'CA'"
  37.             End Select
  38.  
  39.             'ahora cargandolo a una dApter
  40.             dAdapter = New OleDbDataAdapter()
  41.             dAdapter.SelectCommand = myCommand
  42.  
  43.          
  44.             'ahora cargando el data set
  45.             dSet = New DataSet()
  46.             dAdapter.Fill(dSet, "Authors")
  47.  
  48.             'ahora llenandolo ala grilla
  49.             dgAuthors.SetDataBinding(dSet, "Authors")
  50.  
  51.         Catch err As OleDbException
  52.             MsgBox(err.Message.ToString())
  53.         Catch errDAta As Exception
  54.             MsgBox(errDAta.Message.ToString())
  55.         End Try
  56.  

1079
VB .NET / Re: Como Puedo Crear Una Flecha Con El Raton?
« en: Viernes 23 de Julio de 2004, 04:22 »
Facil, detectas la posicion del Mouse, con el evento MouseDown, creo es ese, guardas ese primer punto, y al hacer el otro click guardas el otro punto.

Ahora con los puntos usando un Objeto Graphics, lo dibujas.........

1080
VB .NET / Re: Fila Seleccionada De Datagrid
« en: Viernes 23 de Julio de 2004, 04:08 »
Lo primero no lo recuerdo pero hay una funcion que permite recuperar la fila selecionada, no lo recuerdo ahorita lo segundo lo harias asi:

Creas un sqlCommand:
Código: Text
  1.  
  2. dim myCommnad as New OleDBCommand("SELECT * FROM PERSONA WHERE Edad=20")
  3. tuAdapter.Command = myCommand
  4.  
  5. 'llenando el dataset
  6. tuAdapter.Fill(tuDataSet,"nPersona")
  7.  
  8. 'ahora lo enlazas a la Grilla
  9. tuGrid.setDataBinding(tuDataSet,"nPersona")
  10.  
  11.  

Esa es la idea si no te corre me pasas la voz para hacerlo en mi maquina.....

1081
VB .NET / Re: Datagrid Para Vb .net 2003
« en: Viernes 23 de Julio de 2004, 03:52 »
Aqui yo tambien hice mi codigo:

En el Windows.Form, solo hay tres objetos, CmdCn(boton para conectarse a la base de datos), CmdChange(boton para cambiar el tamño de la grilla), y la grilla por supiesto todo es codigo:

En el boton conexion, no queria poner todo pero por siaca, uso SQL, Pubs:
creo mi conexion, lleno mi adapter, lleno mi data set, y lleno mi grilla:
Código: Text
  1.  
  2.  
  3.         Try
  4.             'inicializando los datos
  5.             myCn = New SqlConnection("Data Source=(local); database=Pubs; User Id=sa; password=sa")
  6.  
  7.             dSetPubs = New DataSet()
  8.  
  9.             'aca en esta se esta abriendo la conezion y cerrandola, no hay porque abrirla
  10.             dAdpPubs = New SqlDataAdapter("SELECT * FROM Authors", myCn)
  11.  
  12.             'llenando el dataSet
  13.             dAdpPubs.Fill(dSetPubs, "Authors")
  14.  
  15.         Catch err As SqlException
  16.             MsgBox(err.Message.ToString())
  17.         Finally
  18.             myCn.Close()
  19.         End Try
  20.  
  21.  
  22.  
  23.         'llenando por defecto un ancho de 150
  24.         dgPubs.PreferredColumnWidth = 150
  25.  
  26.         'ahora si llenando el datagris
  27.         dgPubs.SetDataBinding(dSetPubs, "Authors")
  28.  

"ahora en el boton Change llamo a una funcion hace todo el cambio

Código: Text
  1.  
  2.  Private Sub CmdChangeGrid_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdChangeGrid.Click
  3.         'dgPubs.CaptionText = "Tabla de Autores de la Base de Datos"
  4.         'llamando a la funcion efectos de la Grilla
  5.         ChangeGrid()
  6.         CmdChangeGrid.Enabled = False
  7.     End Sub
  8.  

Código: Text
  1.  
  2.  Private Sub ChangeGrid()
  3.         dgPubs.CaptionText = "Tabla de Autores de la Base de Datos"
  4.         dgPubs.CaptionForeColor = Color.Aquamarine
  5.  
  6.         'crenado un estilo personalizado y una columna personlizada
  7.         Dim myEstiloGrid As DataGridTableStyle = New DataGridTableStyle()        
  8.  
  9.         'aginando la tabla al que asocia el estilo
  10.         myEstiloGrid.MappingName = "Authors"
  11.  
  12.         'agregando caracteristica a una columna
  13.         Dim myEstiloCol As New DataGridTextBoxColumn()
  14.         myEstiloCol.MappingName = "au_fname"
  15.         myEstiloCol.HeaderText = "Nombre"
  16.         myEstiloCol.Width = 90
  17.  
  18.         Dim myEstiloCol2 As New DataGridTextBoxColumn()
  19.         'Para Otro Campo
  20.         myEstiloCol2.MappingName = "au_lname"
  21.         myEstiloCol2.HeaderText = "Apellido"
  22.         myEstiloCol2.Width = 150
  23.  
  24.         'agregando el primer estilo
  25.         myEstiloGrid.GridColumnStyles.Add(myEstiloCol)
  26.         'agrengando el segundo estilo
  27.         myEstiloGrid.GridColumnStyles.Add(myEstiloCol2)
  28.  
  29.         'agrengando el estilo a la grilla
  30.         dgPubs.TableStyles.Add(myEstiloGrid)
  31.  
  32.  
  33.     End Sub
  34.  

puedes usar todas las columnas que quieras en este caso solo use dos.....

Una pregunta mas: se podra cambiar el tamaño de las columnas una vez llenado la Grilla, por ejemplo con ScroolBar, disminuir el tamaño de una colmna........

1082
C# / Re: !!sumar Meses A Una Fecha!
« en: Jueves 22 de Julio de 2004, 05:45 »
Osea que tu siempre que sumes meses se coloque en la posicion 10(el dia), entonces facil cambiale solo al mes le sumas un mes a la fecha y el dia lo dejas fijo:

Código: Text
  1. miFecha.mounth += 1
  2. miFecha.day = 10
  3.  
  4.  

eso quieres..........?

1083
VB .NET / Re: Conexion Dos Bases De Datos
« en: Miércoles 21 de Julio de 2004, 03:29 »
es que depende que tipo de conexion sea tu informix, si es un ODBCConecction, no hay problema solo redefiens la propiediad:
Código: Text
  1. myCn.String = "mi nueva conexion"
  2.  

creo que es String, si no ahi ves.....

Otra que coas que puedes hacer es ir llenando las todas tus tablas a una dataSet, que acepta tablas de diversas base de datos...........

1084
C# / Re: Duda En Las Conexiones
« en: Martes 20 de Julio de 2004, 06:09 »
depende si tiens una conexion global, no hay problema la habres solo una vez.  

Si tu abres la conecion en una funcion, dependiendo si declarastes la variable conexion en la funcion solo funcionara ahi, y solo servira para cargar los dataSet, depende mucho del ambito de las varables para ver donde termina su alcance....

1085
C# / Re: Datagrid Y Actualización De Datos
« en: Martes 20 de Julio de 2004, 06:03 »
manda el codigo de tu boton añadir, ahi creo que puede estar el incoveniente.....

1086
C# / Re: Problemas Al Insertar Bd
« en: Martes 20 de Julio de 2004, 05:50 »
Si todo tu codigo esta perfecto y si no me equivoco el problema estan en:

Código: Text
  1. n.value = "a"
  2.  

creo que es asi:

Código: Text
  1. n.value = 'a'
  2.  

a ver prueba eso.....

1087
C# / Re: !!sumar Meses A Una Fecha!
« en: Martes 20 de Julio de 2004, 05:43 »
lo que tu quieres es sumar meses de 30 dias, o me equivoco?

1088
C++ Builder / Re: Manejo Del Mouse
« en: Miércoles 14 de Julio de 2004, 04:01 »
Si se asgina con setCursorPos(x,y), supongo que se debe recuperar con getCursorPos, pero como tiene que retornarte dos valores supongo que debe ser asi:   getCursorPosX o getCursorPos.PosX...........

1089
VB .NET / [Código Fuente] Hora y Fecha en StatusBar
« en: Miércoles 14 de Julio de 2004, 03:58 »
El siguiente Codigo, es usando Windows.Form. En diseño agregas un StatusBar. En el codigo haces el resto. Para esto crearas dos variables StatusBarPanel, una para la fecha y otra para la hora, para actualizar constatemente la hora, se usa un objeto timer, en el cual se cambia la propiedad text.

Parte Principal del Codigo, el resto en el zip
Código: vb.net
  1. #Region "mis variables "
  2.     Private PanelTime As New StatusBarPanel()
  3.     Private PanelDate As New StatusBarPanel()
  4. #End Region
  5.  
  6.     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  7.  
  8.         'caragando los satatus panel para la hora
  9.         PanelTime.BorderStyle = StatusBarPanelBorderStyle.Sunken
  10.         PanelTime.AutoSize = StatusBarPanelAutoSize.Spring
  11.         PanelTime.Alignment = HorizontalAlignment.Right
  12.  
  13.         'cargando los Status para la Fecha
  14.         PanelDate.BorderStyle = StatusBarPanelBorderStyle.Raised
  15.         PanelDate.ToolTipText = System.DateTime.Today.ToShortDateString()
  16.         PanelDate.Text = System.DateTime.Today.ToLongDateString()
  17.         PanelDate.AutoSize = StatusBarPanelAutoSize.Contents
  18.  
  19.         'llenandolos al statusBar
  20.         stBarTimeDate.ShowPanels = True 'para q muestre varios paneles
  21.         stBarTimeDate.Panels.Add(PanelTime)
  22.         stBarTimeDate.Panels.Add(PanelDate)
  23.  
  24.         'para que cambie la hora y la fecha
  25.         TmrStatus.Start()
  26.     End Sub
  27.  
  28.     Private Sub TmrStatus_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TmrStatus.Tick
  29.         Dim myTime As String = ""
  30.         Dim myState As String = " "
  31.         Dim myHor As Integer
  32.         Dim myMin As String
  33.         Dim mySec As String
  34.  
  35.         With Now()
  36.             myHor = IIf(.Hour > 12, .Hour Mod 12, .Hour)
  37.             myState += IIf(.Hour >= 12, "p", "a") & ".m. "
  38.             myMin = IIf(.Minute > 10, "", "0") & .Minute
  39.             mySec = IIf(.Second > 10, "", "0") & .Second
  40.  
  41.             myTime += myHor & ":" & myMin & ":" & mySec & myState
  42.         End With
  43.         PanelTime.Text = myTime
  44.     End Sub
  45.  



Autor: Sergioman

1090
VB .NET / Re: No Reconoce Un Namespace.....
« en: Miércoles 14 de Julio de 2004, 03:31 »
Gracias por tu ayuda ya funca normal el programa....

P.D.: Para agregar una referencia te vas al panel Explorardor de Soluciones y hacez click derecho en Referencias, y haces click en agregar referencia o algo asi.... ydespues en la ventana seleccionas la que quieres y la agregas....

1091
VB .NET / Re: Asp . Net
« en: Martes 13 de Julio de 2004, 07:10 »
Siempre que te bajes un tutorial verifica las Clases con la Ayuda del Visual Studio, muchas veces la ayuda trae ejemplos interesantes

1092
VB .NET / Re: Paleta De Colores En Vb.net
« en: Martes 13 de Julio de 2004, 07:05 »
ya se a que te refieres, con la paleta que dices, pero con el Punto .Net, te ofrece tambien una paleta en tiempo diseño, pero es la propiedad de cada boton, lo bueno de la Visual Basic 6.0, es que puedes ver como queda en uan pequeña ventanita, pero los colores son los mismos en .Net. Si no mal recuerdo existes tres formas de acceder a los colores QBColor, RGB, Hexadecimal, y eso funciona para los todos los lenguajes. .Net Framework, te ofrece algo mas, te ofrece una clase donde tu escoges los colores... Color.(escoge).....

1093
VB .NET / Re: Statusbar
« en: Martes 13 de Julio de 2004, 06:52 »
Hola yo lo hice en el .Net 2002, supongo que debe ser lo mismo aqui esta el codigo.

Agregas en tiempo de diseño el StatusBar, yo lo puse de nombre: stBarTimeDate

Declaras dos variables globales en la clase del formulario:
Código: Text
  1. Private PanelTime As New StatusBarPanel()
  2.     Private PanelDate As New StatusBarPanel()
  3.  
  4.  

En el Evento que carga el formulario(Form_Load) colocas esto:
Código: Text
  1.         'caragando los satatus panel para la hora
  2.         PanelTime.BorderStyle = StatusBarPanelBorderStyle.Sunken
  3.         PanelTime.AutoSize = StatusBarPanelAutoSize.Spring
  4.         PanelTime.Alignment = HorizontalAlignment.Right
  5.  
  6.         'cargando los Status para la Fecha
  7.         PanelDate.BorderStyle = StatusBarPanelBorderStyle.Raised
  8.         PanelDate.ToolTipText = System.DateTime.Today.ToShortDateString()
  9.         PanelDate.Text = System.DateTime.Today.ToLongDateString()
  10.         PanelDate.AutoSize = StatusBarPanelAutoSize.Contents
  11.  
  12.         'llenandolos al statusBar
  13.         stBarTimeDate.ShowPanels = True 'para q muestre varios paneles
  14.         stBarTimeDate.Panels.Add(PanelTime)
  15.         stBarTimeDate.Panels.Add(PanelDate)
  16.  
  17.         'para que cambie la hora y la fecha
  18.         TmrStatus.Start()
  19.  
  20.  
  21.  

Para que la hora cambien constatemente en el statusBar tienes que usar un timer y su evento tick pones esto:
Código: Text
  1.         Dim myTime As String = ""
  2.         Dim myState As String = " "
  3.         Dim myHor As Integer
  4.         Dim myMin As String
  5.         Dim mySec As String
  6.  
  7.         With Now()
  8.             myHor = IIf(.Hour > 12, .Hour Mod 12, .Hour)
  9.             myState += IIf(.Hour >= 12, "p", "a") & ".m. "
  10.             myMin = IIf(.Minute > 10, "", "0") & .Minute
  11.             mySec = IIf(.Second > 10, "", "0") & .Second
  12.  
  13.             myTime += myHor & ":" & myMin & ":" & mySec & myState
  14.         End With
  15.         PanelTime.Text = myTime
  16.  
  17.  
  18.  

Si quieres ser mas estricto, el cargado de la fecha, tambien deberias hacerlo en el timer, si una aplicacion va estar abierta por varios dias seguidos no cambiara al estar cargado en el Load, tiene que estar cargado en el timer....

1094
Otros CLR / No Reconoce Un Spacename
« en: Lunes 12 de Julio de 2004, 05:45 »
me baje un articulo alucinante que trata la seguridad integrada entre .Net Framework y NTFS, pero tengo un problema con un ejemplo de codigo:


Código: Text
  1. Imports System.DirectoryServices
  2.  
  3.  
  4.  
La sentencia que coloco me sale error, ya verifique el NameSpace en la ayuda y si existe no entiendo que pasa........

1095
VB .NET / Re: Ayuda Con Unos Comandos De Visual.net
« en: Lunes 12 de Julio de 2004, 05:29 »
bajate un tutorial mejor ahi encuentras de todo, y en internet hay como mierd... de tutoriales.

1096
VB .NET / No Reconoce Un Namespace.....
« en: Lunes 12 de Julio de 2004, 05:27 »
me baje un articulo alucinante que trata la seguridad integrada entre .Net Framework y NTFS, pero tengo un problema con un ejemplo de codigo:

Código: Text
  1.  Imports System.DirectoryServices
  2.  
  3.  

La sentencia que coloco me sale error, ya verifique el NameSpace en la ayuda y si existe no entiendo que pasa........

1097
VB .NET / Seguridad: .net Framework Con Ntfs
« en: Lunes 12 de Julio de 2004, 05:26 »
me baje un articulo alucinante que trata la seguridad integrada entre .Net Framework y NTFS, pero tengo un problema con un ejemplo de codigo:

Código: Text
  1.  Imports System.DirectoryServices
  2.  
  3.  

La sentencia que coloco me sale error, ya verifique el NameSpace en la ayuda y si existe no entiendo que pasa........

1098
VB .NET / Re: Variables Globales A Un Proyecto
« en: Lunes 12 de Julio de 2004, 05:15 »
Hola que tal, lei un articulo de .Net, que trataba el tema que tu pides declarar variables globales, si no me falla la memoria se usa el archivo Global.asa o el Assembly, pero era uno de esos ahi tu podias declarar variables globales o constantes, busca en internet o en la pagina del Guille, ahi hay un monton de info de .Net......

1099
ASP .NET / Re: Paginar Un Datagrid Con Asp.net
« en: Sábado 10 de Julio de 2004, 06:25 »
Cuando yo probe esa paginacion en Diseño, me salio bien, eso es lo malo ha veces de trabajar en diseño no sabes que puede estar mal, voy a revisarlo de nuevo, y te  mando lo que hize, voy a tratarlo de hacerlo en codigo tambien....

1100
VB .NET / Re: "c:\miimagen....." --> Otro Camino
« en: Sábado 10 de Julio de 2004, 06:19 »
Bueno chicas, como nadie me respondia tuve que investigar por mi cuenta, auque me demore mucho sirvio de mucho y es asi:

Aqui va la explicacion:  
El directorio actual lo obtienes con:
Código: Text
  1.   dim strDir as String = Directory.GetCurrrentDirectory()
  2.  
  3.  

Si haces eso te daras cuenta que al final te bota: "....../bin", que es donde se guarda tu ejecutable.... asi es ... Osea que si quieres usar un archivo directamente tienes que que copiarlo a la carpeta Bin....

Ya se pero tu eres de esos patitas que ponen una Carpta Images en el proyecto  ahi copias todas tus imagenes y lo anterior no te funciona entonces facil
solo cambias la ruta con la ruta donde esta tus imagenes :
Código: Text
  1.  Directory.SetCurrentDirectory(myDirectory)
  2.  
  3.  

Eso es todo, a para usar la clse Directory, tienes que importar el NameSpace "System.IO"

Páginas: 1 ... 42 43 [44] 45