Hola como estan tengo la siquiente consulta quiero listar varias propiedade de la clase process
estoy usando controles telerik.

El problema que tengo es que no me lista el id ni el nombre del proceso por columnas pero sin columnas si me los lista.

aca dejo el codigo.

 
Dim procesos As New Process
        Dim lvlItem As New ListViewDataItem()
        'Dim Contador As Integer = 0
 
'No me muestra los datos correctamente
        For Each procesos In Process.GetProcesses()
            Me.ListaProcesos.Items.Add(lvlItem)
            lvlItem.Item(0) = procesos.Id  'ha la columna 1 le asigno el id de los procesos
            lvlItem.Item(1) = procesos.ProcessName 'ha la columna 2 le asigno el nombre
        Next
 
        For Each procesos In Process.GetProcesses()
            RadListView1.Items.Add(procesos.Id)
        Next
 
        For Each procesos In Process.GetProcesses()
            RadListView2.Items.Add(procesos.ProcessName)
        Next

El problema es que no me los lista en las columnas aca un ejemplo.



Saludos.

Hola como estan, siempre me ha llamado mucho el desarrollo web, y me gustaria aprender algo sobre esto, he estado invetigando un poco pero todavia no me que da muy claro el tema.

Microsoft ofrece Asp.net que tan bueno es para desarrollar web se sique usando en la actualidad o ya quedo obsoleto, por que digo esto, ya que la mayoria de informacion que se encuentra referente a Asp.net es bastante vieja, con esto no quiero decir no hay informacion nuevo o actualizada como en la MSDN.

Ya que esta Java, PHP, HTML, MVC etc..

Lo que deseo es programar tipo VB.net no desde cero como PHP Pero si con la facilidad de poder agregar controles sin tener que programarlos desde cero.

Este es un buen lenguaje para aprender??
En esta subforo se pueden hacer preguntas sobre ASP.NET?
Por que algunos dicen ASP.net con WinForms o C#?

Saludos.

Hola como esta.

Mi pregunta es la siquiente tengo un listview Control(Telerik) y he activado un checkbox y por medio de ese checkbox quiero modificar el formato de una columna del listview es decir si el estado del checkbox esta en On mostrara entregado en la columna estado del articulo si no, no entregado.

Aca una imagen los valores estan predefinidos para darme a entender mejor.


Tengo lo siquiente:

Si no ando mal en esta parte me cambiaria el texto de la columna segun el estado del checkbox.

Private Sub lvRegDePedido_ItemCheckedChanged(sender As Object, e As ListViewItemEventArgs) Handles lvRegDePedido.ItemCheckedChanged
If e.Item.CheckState = Enumerations.ToggleState.On Then
           'Cambia texto a entregado
        End If
End Sub
 

Tambien tengo lo siquiente que es como se le da formato a una celda en especifico.

 Private Sub lvRegDePedido_CellFormatting(sender As Object, e As ListViewCellFormattingEventArgs) Handles lvRegDePedido.CellFormatting
            If e.CellElement.Data.HeaderText = "Estado del articulo" Then
                e.CellElement.Text = "Entregado"
            End If
    End Sub

Ahora mi pregunta es como uso el evento ItemCheckedChanged y CellFormatting para que por medio del cambio del checkedChange se le de formato a la celda.

Ya prove varias cosas como lo siquiente pero me lanza un error.

 Private Sub lvRegDePedido_CellFormatting(sender As Object, e As ListViewCellFormattingEventArgs) Handles lvRegDePedido.CellFormatting
Dim item As New ListViewDataItem        
    If item.CheckState = Enumerations.ToggleState.On Then
            If e.CellElement.Data.HeaderText = "Estado del articulo" Then
                e.CellElement.Text = "Entregado"
            End If
        End If
    End Sub

tal vez puedan ayudarme.

Saludos.

Hola como están.

Estaba haciendo una búsqueda en un dataGriedview y me topé con Linq me gustaría saber para que sirve.

Las preguntas concretas son:

1. Cuáles son las formas de implementar Linq en vb.net y cómo?
2. Ya viene integrado en vb.net por lo que veo si o hay que instalar algo más?
3. Con referencia a la primer pregunta es conveniente utilizarlo trae alguna ventaja en el uso de VB.net?
4. Estas consultas se pueden hacer a cualquier tipo de control seria a cualquier conjunto de datos que tenga en vb.net?
5. La última lo recomendarían usar?

Saludos.

Hola como están.
Mi consulta es la siguiente, Como puedo calcular datos en mi griewview Control(Telerik) y mostrarlos en un textbox el problema con que me topo es que estoy haciendo un form de facturación (imagen).

Cuando agrego el producto el subtotal me la va cargando según el precio del articulo el problema viene cuando borro un producto del griewview como hago para que el subtotal baje, según esa columna del griewview.



Esto se puede, no comparto ningún código porque no tengo nada aun, no se me ocurre como manipular una columna del griewview todavía.

Saludos.

Hola como están tengo la siguiente duda y es como obtengo la ruta completa donde guardo un archivo con un saveDialog

He estado probando lo siguiente pero solo me obtiene el nombre del archivo y no la ruta.

'Obtengo el nombre de la foto
ruta = Path.GetFileName(saveFileDialog1.FileName)
 
'Igual obtengo nombre
ruta = IO.Path.GetFileName(saveFileDialog1.FileName)
 
MsgBox(ruta) 

He notado que con el OpenDialog cuando uso el FileName si me trae toda la ruta.

Lo siquiente como obtengo la ruta completa de la imagen en un pictureBox

ptbFotoPersonal.ImageLocation

Ya que necesito esa ruta para mandarla a un método por cualquier forma que se pueda ya sea por medio de saveDialog o por el pictureBox.

Saludos y gracias.

Hola como estan.

La consulta que tengo es como buscar en un listiview(Control telerik) se como buscar en un control de winform de echo es el codigo que he modificado pero no se por que no me busca.

Este es el codigo que tengo

 Dim i As Integer
        'obtiene el número de elementos del componente
        For i = 0 To lvPagosProveedores.Items.Count
            'Obtiene el indice en base a 0 del elemento seleccionado
            lvPagosProveedores.SelectedIndex = i
            'verifica que el elemento selecionado del control sea igual al que esta escrito en el textBox
            If lvPagosProveedores.SelectedItem.Selected = txtBuscarPagoProvee.Text Then
                'Establece el nuevo indice del control
                lvPagosProveedores.SelectedIndex = i
                'lvPagosProveedores.Focus()
                Exit For
            Else
                RadMessageBox.Show(Me, "Ese codigo no existe", "Informacion",
                                      MessageBoxButtons.OK, RadMessageIcon.Info)
            End If

El problema es que no me busca bien siempre regresa al primer item si se fijan busco 5 pero siempre me muestra 1 en indice


Saludos.

Hola como estan.

Mi duda es la siquiente tengo un RadListView Control(Telerik) y a diferencia de un GriedView no tiene la propiedad solo lectura y querio evitar que el usuario pueda editar estas filas o columnas.



Hay aguna forma de implementar esta propiedad en el ListView o lo mejor seria usar un GriedView.

Saludos.

Hola como esta,
Mi duda es la siguiente, mando una fecha a la BD pero al momento de mostrarla en VB, en un dataGridview me trae la fecha y hora no sé por qué, ya que en la BD no la muestra

Muestra


No se si debo validar en el Insert el formato de la fecha, o al momento en que se manda a la BD
,o usar alguna funcion del DataGrid (Control telerik) si es que la tiene.

'Declaracion de la variable
Dim fecCompa As Date
fecCompa = DateTime.Today.AddDays(0) '.ToString(("MM-dd-yyyy"))
 
'Este es mi Insert
Dim comando1 As New SqlCommand("Insert into cancelacion(codigoDelPedido, estadoDelPedido, fechaDeCancelacion, horaDeCancelacion," & _
                                               " formaDePago, prioridad, tipoDePedido)" & _
                                               "values (@codigoDelPedido, @estadoDelPedido, @fechaDeCancelacion, @horaDeCancelacion, " & _
                                               "@formaDePago, @prioridad, @tipoDePedido)", con)
 
'De esta forma la mando a la BD
comando1.Parameters.Add("@fechaDeCancelacion", SqlDbType.Date).Value = fecCompa
 

'Asi defini el campo en la tabla

fechaDeCancelacion DATE NOT NULL,

Saludos.

Hola como están.

Mi consulta es la siguiente

Cuando envió datos a la BD no me detecta los errores el try explico cuando no tiene código de pedido ni de proveedor si me marca los errores como la llave de ese valor ya existe  o que no estoy mandando la llave primaria eso es con los valores int.

Ahora cuando no ingreso por ejemplo la dirección debería marcarme que el campo no puede quedar nulo porque así lo declare en la BD pero no me aparece la excepción es decir lo manda vacío.

Aca una imagen  Donde los campos como direccion telefono ... deberia de capturarme una excepcion por que los declare como not null pero no se que pasa. Como pueden ver en el registro 1 y 2

 
De esta forma mando los datos a la BD

Dim con = New SqlConnection(conexion)
        Try
con.Open()
 
            Dim comando1 As New SqlCommand("Insert into Pedido(codigoDelPedido, codigoProveedor, direccionDeEntrega," & _
                                           "telefono, tipoDePedido, prioridad, formaDePago, fechaDelPedido, horaDelPediddo," & _
                                           "fechaDeEntrega, horaDeEntrega, total, observaciones)" & _
                                           "values (@codigoDelPedido, @codigoProveedor, @direccionDeEntrega," & _
                                           "@telefono, @tipoDePedido, @prioridad, @formaDePago, @fechaDelPedido, @horaDelPediddo," & _
                                           "@fechaDeEntrega, @horaDeEntrega, @total, @observaciones)", con)
 
            'Datos de la tabla proveedores
            comando1.Parameters.Add("@codigoDelPedido", SqlDbType.Int).Value = txtCodPedido.Text
            comando1.Parameters.Add("@codigoProveedor", SqlDbType.Int).Value = txtCodProv.Text
            comando1.Parameters.Add("@direccionDeEntrega", SqlDbType.VarChar, 100).Value = txtDircPed.Text
            comando1.Parameters.Add("@telefono", SqlDbType.VarChar, 11).Value = mskTelPed.Text
            comando1.Parameters.Add("@tipoDePedido", SqlDbType.VarChar, 15).Value = cmbTipoPedi.Text
            comando1.Parameters.Add("@prioridad", SqlDbType.VarChar, 15).Value = cmbPrioriPedi.Text
            comando1.Parameters.Add("@formaDePago", SqlDbType.VarChar, 20).Value = cmbFormPagoPedi.Text
            comando1.Parameters.Add("@fechaDelPedido", SqlDbType.Date).Value = dtpFechaPedido.Value
            comando1.Parameters.Add("@horaDelPediddo", SqlDbType.DateTime).Value = tpHoraPedido.Value
            comando1.Parameters.Add("@fechaDeEntrega", SqlDbType.Date).Value = dtpFechaEntregaPedido.Value
            comando1.Parameters.Add("@horaDeEntrega", SqlDbType.DateTime).Value = tpHoraPedido.Value
            comando1.Parameters.Add("@total", SqlDbType.Decimal).Value = txtTotalPedido.Text
            comando1.Parameters.Add("@observaciones", SqlDbType.VarChar, 100).Value = txtObservacionesPedidos.Text
'Ejecuta la instruccion comando1
            comando1.ExecuteNonQuery()
            'Cierra la conexion
            con.Close()
 
            'Mensaje datos guardados con exito
            RadMessageBox.Show(Me, "Los datos se registraron correctamente", "Mensaje",
                                   MessageBoxButtons.OK, RadMessageIcon.Info)
 
        Catch ex As Exception : RadMessageBox.Show(ex.Message) 'captura el error original del sistema
            'RadMessageBox.Show("Verifique sus datos o que el codigo no exista")
        End Try

Esta es mi tabla en la BD

CREATE TABLE Pedido
(
 codigoDelPedido INT PRIMARY KEY,
 codigoProveedor INT NOT NULL,
 direccionDeEntrega VARCHAR (100) NOT NULL,
 telefono VARCHAR (11) NOT NULL,
 tipoDePedido VARCHAR (15) NOT NULL,
 prioridad VARCHAR(15) NOT NULL,
 formaDePago VARCHAR(20) NOT NULL,
 fechaDelPedido DATE NOT NULL,
 horaDelPediddo TIME NOT NULL,
 fechaDeEntrega DATE NOT NULL,
 horaDeEntrega TIME,
 total DECIMAL (7,2) NOT NULL,
 observaciones VARCHAR(100)
)
 

Espero puedan ayudarme saludos.