Mostrando las entradas con la etiqueta VB.Net. Mostrar todas las entradas
Mostrando las entradas con la etiqueta VB.Net. Mostrar todas las entradas

jueves, 24 de agosto de 2017

Error: 'bobj' no esta definido (Crystal Report)

Hace poco cambie de equipo y tuve que volver a instalar todo el software que utilizo, actualice la versión del Crystal Report pero al querer ejecutar mi aplicación me apareció el siguiente mensaje:


Como siempre lo he realiza es copiar la carpeta que se ubica en c:\inetpub\wwwroot\aspnet_client al la carpeta donde se encuentra mi aplicación, pero me seguía apareciendo el mismo mensaje.

Me puse a revisar detenidamente el error es esto fue lo que encontré:
 

Me indica la ruta donde debe estar ubicada la carpeta c:\inetpub\wwwroot\aspnet_client\system\_web\4_7_2053, al revisar la ruta el directorio no se encontraba, lo que hice fue hacer una copia de la carpeta 4_0_30319 y renombrarla como 4_7_2053.


En caso de haber realizado lo anterior y no haya funcionado trata con lo siguiente, busca la carpeta CRYSTALREPORTVIEWERS13 que se ubica en :
c:\inetpub\wwwroot\aspnet_client\system\_web\4_0_30319 
copia la carpeta donde se ubica tu sitio web.


Dentro de tu Form o Master teclea la siguiente línea:


Con esto forzamos a que busque en la ruta especificada.

Desbloquear contraseña en SQL Server sin cambiarla

Hace poco por error bloquee la contraseña "sa" del SQL Server, un buena practica es crear un nuevo usuario con  los derechos de administrador, ingrese con el usuario y al tratar de desbloquear el usuario "sa" me apareció el siguiente mensaje:


Lo que menos quería era cambiar la contraseña, lo que realice es desmarca las implementación de políticas.

Esto deshabilitara el bloque de la contraseña, solo guardar los cambios.
 Ahora ingresa de nuevo y  selecciona las políticas.

miércoles, 23 de agosto de 2017

Error: el objeto no acepta la propiedad o el metodo 'addEventListener'

Al estar utilizando BootStrap con Jquery me apareció el siguiente error al ejecutar mi aplicación en Internet explorer:

El objeto no acepta la propiedad o el metodo 'addEventListener'

Para solucionarlo solo agrega en la Form Master la siguiente línea:

<meta http-equiv="X-UA-Compatible" content="IE=edge" />

jueves, 11 de mayo de 2017

Como saber si el año actual es bisiesto

Un año es bisiesto si cumple los siguientes criterios:
  • Es divisible entre 4.
  • Si termina en 00, es divisible entre 400 (2000 y 2400 sí son bisiestos. 2100, 2200 y 2300 no lo son).

SI ((año actual divisible por 4) Y ((año actual no divisible por 100) O (año actual divisible por 400)))
Podremos utilizar la función MOD que da como resultado el residuo de la división, por ejemplo:
2017 Mod 4 = 1, porque 2017/4 da como residuo 1.

Dim anio_actual As Integer =Date.Now.Year
If (anio_actual Mod 4 = 0 And anio_actual Mod 100 <> 0 Or anio_actual Mod 400 = 0) Then
      'Año bisiesto
Else
      'Año no bisiesto
 End If

jueves, 6 de abril de 2017

lunes, 27 de marzo de 2017

Exportar un DataGridView a Excel

Para el llenado del DataGridView utilizaremos en código de http://vbpuntonet.blogspot.mx/2012/06/llenar-un-datatable-manualmente-y.html

Agregaremos la referencia:

Imports Microsoft.Office.Interop

Copiamos el siguiente código que creara el archivo de Excel con la información del DataGridView:


Por último creamos el botón que llamara la función:





martes, 21 de febrero de 2017

Exportar GridView a Excel, Word y PDF

Una vez que tengamos en GridView con nuestra información podemos exportar a:

Excel


Word


PDF
Para el archivo .PDF utilizaremos la librería: iTextSharp

En caso de tener el error :
El control 'ctl00 MainContent GridView' de tipo 'GridView' debe colocarse dentro de una etiqueta de formulario con runat=server."
Revisa el siguiente link: http://vbpuntonet.blogspot.mx/2017/02/error-el-control-ctl00-maincontent.html

Error: El control 'ctl00 MainContent GridView' de tipo 'GridView' debe colocarse dentro de una etiqueta de formulario con runat=server.

Estoy realizando la exportación de un GridView a .PDF pero al tratar de ejecutar el código me envía el error:

El control 'ctl00 MainContent GridView' de tipo 'GridView' debe colocarse dentro de una etiqueta de formulario con runat=server."

La solución que dan es agregar :
Public Overrides Sub VerifyRenderingInServerForm(control As System.Web.UI.Control)

ya que el error lo envía en : GridView3.RenderControl(hw)



El error se captura pero al no tener nada en VerifyRenderingInServerForm deja pasar el error, no es lo correcto pero es una solución rápida.

martes, 7 de febrero de 2017

Crear un módulo de visitantes e imprimir la etiqueta con sus datos y foto

El módulo de visitantes esta desarrollado en ASP.Net, para esto utilice el Capture Imagen, es un pequeño archivo .SWF, podrás realizar la descarga en: http://www.aspsnippets.com/Articles/Capture-Image-Photo-from-Web-Camera-Webcam-in-ASPNet-using-C-and-VBNet.aspx


Para el módulo utilice una webcam y una impresora térmica Brother, puedes utilizar cualquier tipo de impresora siempre y cuando se ajuste al tamaño de etiqueta deseado.

Como inicio deberás crear una tabla en SQL server que será donde almacenaras la información de los visitantes.


Creamos un nuevo proyecto Web y copiamos los archivos necesarios para tomar la foto, también creamos un carpeta llama Imagen que será donde guardaremos las fotos.


Crearemos un Form donde insertaremos el código para tomar la foto y donde capturaremos los datos del visitante, para saber como insertar el código revisa el link Capture Imagen.


Dentro de la FORM copiamos el código para guardar la imagen, crearemos una variable de sesión que solo guardara el nombre de la imagen.
El contenido de la variable de sesión es la que guardaremos en la tabla en el campo str_rutafoto.


Una vez guardado el registro con los datos y la ruta de la imagen crearemos la etiqueta.
Dentro del botón Etiqueta llamaremos una segunda FORM donde crearemos el formato de la etiqueta diseñando todo dentro de un PANEL.

 
Por medio de web no podemos enviar a imprimir directo a la impresora térmica lo que haremos será crear un botón donde exportaremos a un archivo en Word que será enviado a la impresora que tenemos en modo local.
Copiamos el siguiente código en el botón Generar etiqueta donde exportaremos todo el contenido del Panel.
Se genera un archivo en Word con el contenido del PANEL.

Al exportar a Word se visualizaran los campos de la etiqueta de la siguiente forma.

 
No se visualizaran las imágenes porque no se encuentra la ruta, para ello debemos llamarlas en el código:


Al generar de nuevo el archivo en Word se visualizara las imágenes.

 
Al envía a imprimir y seleccionar la impresora se deberá cambiar el tamaño y forma de la hoja de Word, pero como esto es muy laborioso para realizarlo cada vez que se genera una nueva etiqueta, lo debemos realizar por medio de código.

En el botón Generar etiqueta cambiamos el código por:


El código anterior genera un archivo en Word con la medidas de nuestra etiqueta, manda a llamar las imágenes así como los datos, se visualizara de la siguiente manera:

 
Para finalizar solo debemos seleccionar la impresora Brother e imprimir.


SI TE FUE UTIL DEJAME UN COMENTARIO.

jueves, 2 de febrero de 2017

Crear una barra de enlaces con animación y sonido

Vamos a crear un barra de enlace con VB.Net donde nos abrirá una página web, cada uno de los iconos tendrá una animación y sonido al pasar el mouse sobre la imagen.

Crearemos un proyecto y agregaremos Picture dependiendo la cantidad de imágenes que tengamos.

Al seleccionar cada una de la imágenes cambiaremos el SideMode a StretchImage, esto es para crear el efecto de agrandado en la imagen.


Tecleamos el siguiente código en cada Picture:
  • _MouseHover = agranda la imagen
  • _Mouseleave = restaura la imagen al tamaño original
  • _click = crea el enlace a la página web
  • sonido = llama el archivo de sonido


Una vez copiado el código de cada evento el resultado al pasar el mouse sobre cada imagen será:

martes, 17 de enero de 2017

Exportar form .ASPX a Word

Para poder realizar la exportación del contenido de una Form .aspx deberás insertar todo el contenido que deseas exportar a un Panel.
Crea un botón y copia el siguiente código para exportar el contenido:

Se creara el archivo exporta.doc que contendrá todo lo que parece dentro del Panel en formato HTML, tal vez las imágenes no aparecen en el archivo .Doc porque las mandas a llamar desde una ruta del servidor, para esto solo deberás llamar la imagen con la IP o dominio del servidor : Me.imagen1.imageurl=http://10.20.30.40/imagenes/logo.jpg

jueves, 8 de diciembre de 2016

Saber el total de dias habiles entre 2 fechas y obtener la fecha final

Me solicitarón realizar un proceso donde al seleccionar una fecha inicial y agregar la cantidad de días a pagar debe aparece la fecha final tomando solo los días hábiles.

Por ejemplo, se tiene la fecha de hoy: 08/12/2016 y deseas pagar a 15 días, si tomáramos los días naturales la fecha de pago seria el 23/12/2016 pero como deseas que solo sean los días hábiles (Lunes a viernes) la fecha de pago deberá ser: 29/12/2016.

Para esto utilizamos el siguiente código:
      Dim v_diastotal as string ="15"

 
Los 120 días que aparecen en la fecha final solo es como referencia, al final sumo los 15 días de la variable dias + los días sábado y domingo de la variable días_syd.

viernes, 25 de noviembre de 2016

Seleccionar todos los Items de un CheckBoxList

Supongamos que tenemos un CheckBoxList con varios ítems, podemos seleccionar el ítem dando un Click sobre la casilla.



Pero si queremos seleccionar todos los ítems con un solo Click hacemos lo siguiente, creamos un botón y copiamos el siguiente código:


martes, 8 de noviembre de 2016

Cambia el color de un renglón en un DataGrid View

Cambia el color de un renglón de un DataGridView tomando una condición, cuando la columna del DataGridView llamada NOMBRE_COLUMNA contenga la palabra SISTEMAS cambiara todo el reglón a color azul.



lunes, 24 de octubre de 2016

Obtener día primero y día final del mes actual en un DateTimePicker

Crearemos DateTimePicker1 para la fecha inicio y DateTimePicker2 para la fecha final, copiar el siguiente código:

El resultado será:

jueves, 20 de octubre de 2016

Reemplazar caracteres de una cadena

Cuando tenemos un texto con caracteres raro que nuestro programa no identifica envía los códigos en HTML, para poder reemplazarlos utilizo la siguiente función:

Public Function cambiar_caracteres(cambiarcadena As String) As String
        cambiarcadena = cambiarcadena.Replace("Á", "A")
        cambiarcadena = cambiarcadena.Replace("á", "a")
        cambiarcadena = cambiarcadena.Replace("É", "e")
        cambiarcadena = cambiarcadena.Replace("é", "e")
        cambiarcadena = cambiarcadena.Replace("Í", "I")
        cambiarcadena = cambiarcadena.Replace("í", "i")
        cambiarcadena = cambiarcadena.Replace("Ó", "O")
        cambiarcadena = cambiarcadena.Replace("ó", "o")
        cambiarcadena = cambiarcadena.Replace("Ú", "U")
        cambiarcadena = cambiarcadena.Replace("ú", "u")
        cambiarcadena = cambiarcadena.Replace("Ñ", "N")
        cambiarcadena = cambiarcadena.Replace("ñ", "n")
        Return cambiarcadena
 End Function

La función la puedes utilizar:
Dim campo as string = "La caña esta sobre el camión"
Dim Resultado as string = cambiar_caracteres(campo)

Resultado = "La cana esta sobre el camion"

martes, 18 de octubre de 2016

Envia variables a otra actividad Xamarin Android

Creamos 2 clases, en la clase 1 visualizaremos los campos con la información y estos los enviaremos a variables que serán visualizara en la actividad 2.

Clase 1:
Para enviar los datos a una variable utilizamos PutExtra.




Clase 2:
Creamos la clase llama Registroedita.cs y copiamos el código:
Creamos 5 campos Text con su respectivo nombre en el layout Registroedita.axml, para llamar los datos de una variable utilizamos Extras.GetString().



miércoles, 28 de septiembre de 2016

DataGridView a Excel, otra forma

Como primer paso llamaremos la referencia:



Una vez que tengamos la referencia anexada a nuestro proyecto creamos un Foms y llamamos los IMPORTS:

El siguiente paso es llenar nuestro DataGridView con la información de nuestra tabla.

Copiamos el siguiente código que realizara la exportación a Excel:

Por último creamos un botón que llama el procedimiento:

Comparte