tag:blogger.com,1999:blog-84422721986271209942024-02-07T16:59:49.925-05:00Desarrollando Aplicaciones con Microsoft Visual Studio 2005 - 2008Unknownnoreply@blogger.comBlogger15125tag:blogger.com,1999:blog-8442272198627120994.post-58944606111133709942009-08-11T16:18:00.002-05:002009-08-11T16:19:20.744-05:00Me he mudadoAhora estoy en :<br /><br /><a href="http://msnetwork.spaces.live.com/">http://msnetwork.spaces.live.com</a>Unknownnoreply@blogger.com3tag:blogger.com,1999:blog-8442272198627120994.post-90686041457615499372009-08-11T16:18:00.001-05:002009-08-11T16:18:40.331-05:00Me he mudadoAhora estoy en : <br /><br />http://msnetwork.spaces.live.comUnknownnoreply@blogger.com0tag:blogger.com,1999:blog-8442272198627120994.post-75269457658311270152008-09-12T14:39:00.005-05:002008-09-12T15:09:12.377-05:00Windows Live SDK<div style="text-align: justify;"><span style="color: rgb(51, 102, 255);">Microsoft dispone de varios kits de desarrollo de software disponible para los developers para desarrollar con Windows Live productos en línea. Microsoft suele ser muy bueno, sobre cómo hacer SDK disponible para los desarrolladores y esta no es la excepción. Sólo tienes que ir al </span><a style="color: rgb(51, 102, 255);" href="http://dev.live.com/">http://dev.live.com/</a><span style="color: rgb(51, 102, 255);"> para obtener toda la nueva y más reciente información sobre SDK Custom Domains, gadgets, la investigación, Virtual Earth, Expo, Messenger, Spaces y Windows Live ID. </span><br /></div><br /><a onblur="try {parent.deselectBloggerImageGracefully();} catch(e) {}" href="http://by1.storage.msn.com/x1pUJcgAdPVsbS2aQIsNdNLFQcoHxBo55se2RiLzASaYeTgrDHE9ZXWt-ZEFiOp47Ay0Taf_x80KPqIkoPxlQefyYrgUXq8uG2CYExgjCCiyT4ZfZJsK0WP4Uptn5zUru2XPql7dDeqaVTAdJRaVAJmSAP1SZU0-uhl"><img style="margin: 0px auto 10px; display: block; text-align: center; cursor: pointer; width: 320px;" src="http://by1.storage.msn.com/x1pUJcgAdPVsbS2aQIsNdNLFQcoHxBo55se2RiLzASaYeTgrDHE9ZXWt-ZEFiOp47Ay0Taf_x80KPqIkoPxlQefyYrgUXq8uG2CYExgjCCiyT4ZfZJsK0WP4Uptn5zUru2XPql7dDeqaVTAdJRaVAJmSAP1SZU0-uhl" alt="" border="0" /></a>Unknownnoreply@blogger.com2tag:blogger.com,1999:blog-8442272198627120994.post-7744217114723580722008-06-06T10:35:00.008-05:002008-12-08T17:28:02.971-05:00{Estamos} con los HEROES<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhUAwjDCjvhaz2Mg9euhJH7sJjvc7zb3_BR12AzIkA5b4QxFKk58ZOhhrhKd16sS_4lMCjRbO9O7tli3e1a2iel5Z-L3nrHFpNr5IRyHSUSBETbZGJBybdySb6g9d7zyuwz1Lo0X0awZHJi/s1600-h/image-heroes-community-launch.png"><img id="BLOGGER_PHOTO_ID_5208794225979235618" style="DISPLAY: block; MARGIN: 0px auto 10px; WIDTH: 320px; CURSOR: hand; HEIGHT: 127px; TEXT-ALIGN: center" height="117" alt="" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhUAwjDCjvhaz2Mg9euhJH7sJjvc7zb3_BR12AzIkA5b4QxFKk58ZOhhrhKd16sS_4lMCjRbO9O7tli3e1a2iel5Z-L3nrHFpNr5IRyHSUSBETbZGJBybdySb6g9d7zyuwz1Lo0X0awZHJi/s320/image-heroes-community-launch.png" width="320" border="0" /></a><span style="color:#333333;">"Un <strong>HEROE cotidiano</strong> es el que puede resolver los retos que le plantea la vida utilizando las <strong>mejores herramientas</strong> que tiene disponibles."</span><br /><div><span style="color:#333333;"></span></div><br /><div><span style="color:#666666;">Denle un vistazo a esa web</span></div><br /><div><a href="http://www.estamosconlosheroes.com/"><span style="color:#006600;">www.estamosconlosheroes.com</span></a></div><br /><div></div><br /><div><span style="color:#666666;">Microsoft está organizando una serie de eventos donde pretende mostrar los nuevos productos lanzados este año :</span><br /></div><ul><li><span style="color:#666666;">Windows Server 2008.</span></li><li><span style="color:#666666;">Visual Studio 2008.</span></li><li><span style="color:#666666;">Sql Server 2008.</span></li></ul><p><span style="color:#666666;">Pueden descargar versiones demostrativas de la página que mencione arriba.<br />Tambien en esa pagina pueden encontrar webcasts sobre los nuevos lanzamientos de Microsoft.<br /><br />Pueden agregar este contacto a messenger:<strong><span style="color:#333333;">oladelanzamientos2008@hotmail.com</span></strong> , es un robot que provee información acerca de estos nuevos productos.<br /></span></p>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-8442272198627120994.post-44532937524296810572008-05-29T12:14:00.003-05:002008-12-08T17:28:43.462-05:00Usando el MD5 para encriptar datos<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj8NxKj6dCOCM0bFPnNTzAc00PBWlE9gLtwEZKegdn_bvUJW2FHhGrURI8V-dzwLtn27o21z4GHAMGR1aVSjm9545T-xawaO8pwB_P1w2mOLhYSqckE0FZZjC91jQJdwjinW3sAX9DLJGtS/s1600-h/md51.bmp"><img id="BLOGGER_PHOTO_ID_5205853412424735922" style="DISPLAY: block; MARGIN: 0px auto 10px; CURSOR: hand; TEXT-ALIGN: center" alt="" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEj8NxKj6dCOCM0bFPnNTzAc00PBWlE9gLtwEZKegdn_bvUJW2FHhGrURI8V-dzwLtn27o21z4GHAMGR1aVSjm9545T-xawaO8pwB_P1w2mOLhYSqckE0FZZjC91jQJdwjinW3sAX9DLJGtS/s320/md51.bmp" border="0" /></a><br /><div><br /><span style="color:#009900;"><span style="color:#cc0000;">Imports System.Security.Cryptography<br />Imports System.Text<br />Public Class Form1</span><br /><span style="color:#cc33cc;">Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click</span><br /><span style="color:#333333;">Dim md5 As New MD5CryptoServiceProvider<br />MsgBox(getMd5Hash(texto.Text))</span><br /><span style="color:#993399;">End Sub</span><br /><span style="color:#3366ff;">Public Function getMd5Hash(ByVal input As String) As String<br />Dim md5Hasher As New MD5CryptoServiceProvider()<br />Dim data As Byte() = md5Hasher.ComputeHash(Encoding.Default.GetBytes(input))<br />Dim sBuilder As New StringBuilder()<br />Dim i As Integer<br />For i = 0 To data.Length - 1<br />sBuilder.Append(data(i).ToString("x2"))<br />Next i<br />Return sBuilder.ToString()<br />End Function</span><br /><span style="color:#cc0000;">End Class</span><br /></span><br /></div>Unknownnoreply@blogger.com5tag:blogger.com,1999:blog-8442272198627120994.post-63277669362303888762008-05-29T10:53:00.007-05:002008-12-08T17:28:43.788-05:00Empezando con Microsoft Expression Blend y Silverlight<span style="color:#3366ff;">Un ejemplo sencillo con el release de MEB de Marzo del 2008.<br />Creamos un nuevo proyecto para Silverlight 2.0 .<br />Vamos a la pestaña XAML y nos damos cuenta de lo siguiente:<br />Los controles agregados se van a ubicar dentro de la etiqueta Grid,<br />Si agregamos un boton , este va a tener las sgtes. propiedades:</span><br /><br /><p><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEihyphenhyphentUK9MCp40yeTwf-I_tz2iEmNG8EiiX9g_fgJHOjUZv3yr0hyphenhyphen-aY3VUfUGn-QooKtwrKgM7TVzf0k72Irv7yrouKqfJfYYLiZMp5M_NjkBvQQIo-vvg8j3ChfruS-gGWgGl_TG8tA2Ki/s1600-h/ex1.JPG"><img id="BLOGGER_PHOTO_ID_5205834815216344226" style="DISPLAY: block; MARGIN: 0px auto 10px; CURSOR: hand; TEXT-ALIGN: center" alt="" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEihyphenhyphentUK9MCp40yeTwf-I_tz2iEmNG8EiiX9g_fgJHOjUZv3yr0hyphenhyphen-aY3VUfUGn-QooKtwrKgM7TVzf0k72Irv7yrouKqfJfYYLiZMp5M_NjkBvQQIo-vvg8j3ChfruS-gGWgGl_TG8tA2Ki/s320/ex1.JPG" border="0" /></a> <span style="color:#009900;"><Button Margin="246,222,272,222" Content="Button" x:Name="boton"/><br /><br />El Content: es la propiedad de Texto del nombre, la que va se va a mostrar en el boton.<br /><br />El x:Name es el nombre de la variable de este boton.<br /><br />El Margin son las coordenadas del boton respecto al Grid, las distancias hacia los 4 lados.</span> </p><p><span style="color:#009900;">Con estas propiedades ya podemos empezar a programar.</span><br /><span style="color:#009900;">Al lado derecho del Expression Blend hay herramientas de propiedades, como Colores, Transparencias, Alineaciones, Rotación.</span><br /><span style="color:#009900;">En sí, el uso del Expression Blend va orientado a la parte de diseño de un aplicación en Silverlight.</span><br /><span style="color:#009900;">Si deseamos podemos abrir este mismo proyecto en Visual Studio que en este caso no soporta el arrastre directo hacia el Grid, sino que todo debería hacerse en forma manual .</span><br /><br /><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgoDddqHsb_1X2cibK6X60_U0a38m0fKmez2MYAgWuqxfBDVOHq0LwOEIhobUPcfSc6cUBDQPPbOLzcvz0JzKphEjUIEdTY4RpgCTLlPh7P8KnpLc_bMdk-ujIyfdu6m7FTSGXAcvxJEuWX/s1600-h/ex2.JPG"><img id="BLOGGER_PHOTO_ID_5205833947632950402" style="DISPLAY: block; MARGIN: 0px auto 10px; CURSOR: hand; TEXT-ALIGN: center" alt="" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgoDddqHsb_1X2cibK6X60_U0a38m0fKmez2MYAgWuqxfBDVOHq0LwOEIhobUPcfSc6cUBDQPPbOLzcvz0JzKphEjUIEdTY4RpgCTLlPh7P8KnpLc_bMdk-ujIyfdu6m7FTSGXAcvxJEuWX/s320/ex2.JPG" border="0" /></a><br /><span style="color:#009900;">Podemos darle un evento al boton, al darle clic por ejemplo que duplique su anchura.</span></p><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgG7VOoh6gFdwVOkuQB1-cxDS0Bz1sqUl9da8InSlmcTQFXkIFBwwX5tJEE4_TrJfMS7MxCLmKg_ADPH1C3Mqquke9lZlHMH2jHwPsZVB3lhIOaJNf0xp5LG_dJTOja3VD8nbVUhFvJoNPA/s1600-h/ex3.JPG"><img id="BLOGGER_PHOTO_ID_5205834338474974354" style="DISPLAY: block; MARGIN: 0px auto 10px; CURSOR: hand; TEXT-ALIGN: center" alt="" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgG7VOoh6gFdwVOkuQB1-cxDS0Bz1sqUl9da8InSlmcTQFXkIFBwwX5tJEE4_TrJfMS7MxCLmKg_ADPH1C3Mqquke9lZlHMH2jHwPsZVB3lhIOaJNf0xp5LG_dJTOja3VD8nbVUhFvJoNPA/s320/ex3.JPG" border="0" /></a>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-8442272198627120994.post-51691830044413215502008-03-12T23:28:00.002-05:002008-03-12T23:38:12.469-05:00Primeros pasos en Silverlight<span style="color:#3366ff;">He aquí los primeros pasos para comenzar a usar Silverlight , la nueva herramienta de Microsoft orientada al diseño web.<br /><br /></span><span style="color:#3366ff;"><strong>Silverlight 1.0<br /></strong>Runtime:<br />Microsoft Silverlight 1.0 :<br />Herramientas:<br /></span><a href="http://msdn2.microsoft.com/en-us/ie/bb188238.aspx"><span style="color:#006600;">Microsoft Visual Studio 2005</span></a><span style="color:#3366ff;"><span style="color:#006600;">.</span> Instalando el SDK siguiente se añaden nuevas plantillas de proyectos para Silverlight.<br />SDK:<br /></span><a href="http://go.microsoft.com/fwlink/?LinkID=89144&clcid=0x409%20"><span style="color:#006600;">Microsoft Silverlight 1.0 Software Development Kit</span></a><span style="color:#3366ff;"><span style="color:#006600;">.</span> Contiene Dcumentación, ejemplos y los templates para el Visual Studio 2005.<br /><br /><strong>Silverlight 1.1</strong><br />Runtime:<br />Microsoft Silverlight 1.1 Alpha<br />Herramientas: </span><br /><span style="color:#3366ff;">Todas las versiones del Visual Studio 2008 soportan el XAML y el Silverlight 1.1<br /></span><span style="color:#3366ff;">SDK:<br /></span><a href="http://go.microsoft.com/fwlink/?LinkID=89145&clcid=0x409%20"><span style="color:#006600;">Microsoft Silverlight 1.1 Software Development Kit Alpha September Refresh</span></a><span style="color:#3366ff;"><span style="color:#006600;">.</span> </span>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-8442272198627120994.post-50159136990396305412008-03-01T13:06:00.002-05:002008-03-01T13:18:11.044-05:00Subiendo imágenes en ASP.NETAquí les paso el código de una clase que hice para subir imagenes a un servidor en formato jpg,jpeg y gif:<br /><p><br /><span style="color:#cc0000;">Imports Microsoft.VisualBasic</span><br /><span style="color:#3366ff;">Public Class Upload<br /></span><span style="color:#009900;">#Region "Variables de Clase"<br />Dim extensiones() As String = {"jpg", "jpeg", "gif"}<br />Dim tamaño As Double<br />Const size As Integer = 50<br />Public control As System.Web.UI.WebControls.FileUpload<br />Public user As String<br />Public ubicacion As String = "UplImages\"<br />Public extension As String<br />Public cuenta As String<br />#End Region<br />#Region "Metodos de Clase"<br /></span><span style="color:#3366ff;">Function upload(ByVal server) As Boolean<br />Dim vlext As String = MyClass.obtenerExtension(control.PostedFile.FileName)<br />tamaño = control.PostedFile.InputStream.Length / 1000<br />Dim GuardarImagenEn As String<br />GuardarImagenEn = ubicacion & user & "." & vlext<br />If verificarExtension(vlext) = True And tamaño <= size Then<br />Try<br />Dim subirImagen As System.Drawing.Image<br />subirImagen = System.Drawing.Image.FromStream(control.PostedFile.InputStream)<br />subirImagen.Save(server.MapPath(GuardarImagenEn))<br />Catch ex As Exception<br />MsgBox("Error: " & ex.Message)<br />End Try<br />End If<br />End Function<br /></span><span style="color:#990000;">Function verificarExtension(ByVal ext As String) As Boolean<br />Try<br />Dim n As Integer = MyClass.extensiones.Length - 1<br />Dim i As Integer<br />For i = 0 To n - 1<br />If MyClass.extensiones(i) = ext Then<br />Return True<br />End If<br />Next<br />Return False<br />Catch ex As Exception<br />End Try<br />End Function<br />Function obtenerExtension(ByVal controlText As String)<br />Dim ext As String<br />Dim parts() As String<br />parts = controlText.Split(".")<br />ext = parts(parts.Length - 1)<br />MyClass.extension = ext<br />Return ext<br />End Function<br />#End Region<br />End Class</span></p>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-8442272198627120994.post-71600979270227909192008-01-09T10:05:00.000-05:002008-01-09T10:19:28.289-05:00Uso de Procedimientos Almacenados<span style="color:#3366ff;">Los procedimientos almacenados son equivalentes a funciones que se guardan en la base de datos.Por ejemplo:</span><br /><span style="color:#cc0000;">Creamos un procedimiento almacenado en el SQL Server:</span><br /><br /><em><span style="color:#009900;">create procedure nuevo_cliente</span></em><br /><em><span style="color:#009900;">@id_cliente char(10),</span></em><br /><em><span style="color:#009900;">@nombres char(50),</span></em><br /><em><span style="color:#009900;">@apellidos char(50),</span></em><br /><em><span style="color:#009900;">@direccion char(50),</span></em><br /><em><span style="color:#009900;">@telefono char(10),</span></em><br /><em><span style="color:#009900;">@ruc char(10),</span></em><br /><em><span style="color:#009900;">@dni char(10)</span></em><br /><em><span style="color:#009900;">as</span></em><br /><em><span style="color:#009900;">insert into cliente values(@id_cliente,@nombres,@apellidos,@direccion,@telefono,@ruc,@dni)</span></em><br /><br /><span style="color:#333333;">Declaramos en la cabecera los Imports necesarios</span><br /><em><span style="color:#ff0000;">Imports System.Data<br />Imports System.Data.SqlClient</span></em><br /><br /><span style="color:#009900;">en el evento Load del formulario en VB,por ejemplo , escribimos:</span><br /><br /><span style="color:#3333ff;">Try</span><br /><span style="color:#3333ff;">xcon.Open()</span><br /><span style="color:#3333ff;">Dim com As New SqlCommand("nuevo_cliente")</span><br /><span style="color:#3333ff;">com.Connection = xcon</span><br /><span style="color:#3333ff;">com.CommandType = CommandType.StoredProcedure </span><em><span style="color:#009900;">'Indicamos el tipo de comando</span></em><br /><span style="color:#3333ff;">Dim id As Stringid = txtRUC.Text.Substring(0, 4) & txtNombre.Text.Substring(0, 3) & txtApellido.Text.Substring(0, 3)</span><br /><span style="color:#3333ff;">com.Parameters.Add("@id_cliente", SqlDbType.Char, 10).Value = id</span><br /><span style="color:#3333ff;">com.Parameters.Add("@nombres", SqlDbType.Char, 50).Value = txtNombre.Text</span><br /><span style="color:#3333ff;">com.Parameters.Add("@apellidos", SqlDbType.Char, 50).Value = txtApellido.Text</span><br /><span style="color:#3333ff;">com.Parameters.Add("@direccion", SqlDbType.Char, 50).Value = txtDireccion.Text</span><br /><span style="color:#3333ff;">com.Parameters.Add("@telefono", SqlDbType.Char, 10).Value = txtTelefono.Text</span><br /><span style="color:#3333ff;">com.Parameters.Add("@ruc", SqlDbType.Char, 10).Value = txtRUC.Text</span><br /><span style="color:#3333ff;">com.Parameters.Add("@dni", SqlDbType.Char, 10).Value = txtDNI.Textcom.ExecuteNonQuery()</span><br /><span style="color:#3333ff;">If xcon.State = ConnectionState.Open Then</span><br /><span style="color:#3333ff;">xcon.Close()</span><br /><span style="color:#3333ff;">End If</span><br /><span style="color:#3333ff;">MsgBox("Cliente agregado con exito", MsgBoxStyle.Information, "Error")</span><br /><span style="color:#3333ff;">Catch ex As Exception</span><br /><span style="color:#3333ff;">MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error")</span><br /><span style="color:#3333ff;">xcon.Close()</span><br /><span style="color:#3333ff;">End Try</span>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-8442272198627120994.post-85092268250815308612007-11-25T22:25:00.000-05:002008-12-08T17:28:43.981-05:00GRIDVIEW EN ASP.NET<span style="color:#3366ff;">Algo que desde hace tiempo estaba leyendo y nadie daba solucion clara, al menos en VB. NET. </span><div><span style="color:#3366ff;">Obtener valores de las columnas de una fila seleccionada de un Control GridView de ASP.NET.</span></div><div><span style="color:#3366ff;">Primero agregamos la propiedad Seleccionar fila del GridView:</span></div><br /><div></div><img id="BLOGGER_PHOTO_ID_5136990702267221410" style="DISPLAY: block; MARGIN: 0px auto 10px; WIDTH: 421px; CURSOR: hand; HEIGHT: 120px; TEXT-ALIGN: center" height="94" alt="" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEippVGfjcoqaYW6B0XpuDgOpM95YYOvse29pE3wa7CsLTGmWksCcEt6WkX9FUrgvJjrcVOByAG2Dy1U5QzcuINMfCp7LYZ9gDFZtbcHdueZyIKCxQU6s_xC2vy0w27ilqzoWhhkSWku5HJl/s320/gv001.bmp" width="353" border="0" /><br /><div></div><div><span style="color:#3366ff;">Luego damos doble click en el gridview y escribimos el sgte codigo en el evento SelectedIndexChanged:</span></div><br /><p><em><span style="color:#009900;">Protected Sub dgCliente_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles dgCliente.SelectedIndexChanged<br /></span></em><em><span style="color:#3333ff;"><span style="color:#993399;">lblMensaje.Text = dgCliente.SelectedRow.Cells(2).Text</span><br /></span><span style="color:#009900;">End Sub</span></em></p><p><strong><span style="color:#990000;">Explicando:</span></strong></p><p><em><span style="color:#009900;"><strong>dgcliente</strong> : </span><span style="color:#cc0000;">es el nombre del gridview</span></em></p><p><em><span style="color:#009900;"><strong>dgCliente.SelectedRow</strong> : </span><span style="color:#cc0000;">obtiene la fila seleccionada</span></em></p><p><em><span style="color:#009900;"><strong>dgCliente.SelectedRow.Cells(2)</strong> : <span style="color:#cc0000;">obtiene la columna 2 (en mi caso) de la fila</span> </span><span style="color:#cc0000;">seleccionada</span></em></p><p><em><span style="color:#009900;"><strong>dgCliente.SelectedRow.Cells(2).Text</strong> : </span><span style="color:#cc0000;">simplemente lo convierte a una cadena de texto</span></em></p>Unknownnoreply@blogger.com7tag:blogger.com,1999:blog-8442272198627120994.post-75372613510419941952007-10-24T14:35:00.000-05:002008-12-08T17:28:44.144-05:00Aplicaciones usando WebServices =D<div><span style="color:#3366ff;">Un servicio es una aplicacion distribuida que te permite obtener datos y acceder a funciones cifradas en xml:</span><br /><span style="color:#3366ff;">Agregamos un nuevo servicio.asmx a nuestro sitio web:</span><br /><span style="color:#990000;"><em><%@ WebService Language="VB" Class="WebService" %><br />Imports System.Web<br />Imports System.Web.Services<br />Imports System.Web.Services.Protocols<br /><webservice(namespace>_<br /><?xml:namespace prefix = webservicebinding(conformsto /><webservicebinding(conformsto:=wsiprofiles.basicprofile1_1)>_</em><br /></span></webservicebinding(conformsto:=wsiprofiles.basicprofile1_1)><span style="color:#33cc00;"><em><span style="color:#009900;">Public Class WebService<br />Inherits System.Web.Services.WebService</span><br /></em></span><em><span style="color:#3366ff;"><webmethod()>_<br />Public Function HelloWorld() As String<br />Return "Hello World"<br />End Function<br /></span><span style="color:#009900;">End Class</span></em><br /><em><span style="color:#009900;"></span></em><br /><em><strong><span style="color:#666666;">Este servicio web devuelve este archivo en XML:</span></strong></em><br /><em><span style="color:#6666cc;"><div><?xml version="1.0" encoding="utf-8" ?><br /></div><div><div><string xmlns="<strong>http://tempuri.org/</strong>">Hello World</string> </div><div> </div></div><img id="BLOGGER_PHOTO_ID_5136999399575995826" style="DISPLAY: block; MARGIN: 0px auto 10px; CURSOR: hand; TEXT-ALIGN: center" alt="" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg5BEkeSL8BB3v97u_Bl5VTiIj69xZcj1fdgD-649r0BezPm5rHgqfvHxBzcilTQ1p0Sth23rtslxExOuWnG3qOBbM9oQdVSdUCcvk0S0RPKUPNZOwDh2RoE3DhEyGSKjvWJjo4KYBfHt4e/s320/ws001.bmp" border="0" /><br /></span></em><em><span style="color:#6666cc;"></span></em></div>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-8442272198627120994.post-59587827286350103342007-10-14T13:06:00.000-05:002008-12-08T17:28:44.740-05:00Un simple lector de archivos XML<span style="color: rgb(51, 102, 255);">Creamos un formulario similar al siguiente:</span><br /><a onblur="try {parent.deselectBloggerImageGracefully();} catch(e) {}" href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEigj9RfA1tGo48ORPfLsLK7wCRKysX57pPXP7dLpoxn39-Y8RQGB_Aj-owGYc7kG0EvCE4Go0lrDhCt34pRH5YnUFPK_flCIwrlJFvzWL8dhyphenhyphen6fXR-I0yEcYz9z7xfU2SXCcAFkYN0ykc3u/s1600-h/form1.JPG"><img style="margin: 0px auto 10px; display: block; text-align: center; cursor: pointer;" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEigj9RfA1tGo48ORPfLsLK7wCRKysX57pPXP7dLpoxn39-Y8RQGB_Aj-owGYc7kG0EvCE4Go0lrDhCt34pRH5YnUFPK_flCIwrlJFvzWL8dhyphenhyphen6fXR-I0yEcYz9z7xfU2SXCcAFkYN0ykc3u/s320/form1.JPG" alt="" id="BLOGGER_PHOTO_ID_5121258311992242450" border="0" /></a><span style="color: rgb(153, 0, 0);"><span style="color: rgb(51, 51, 153); font-style: italic;">...Además agregamos un OpenFile Dialog<br /><br /></span>Public Class Form1</span><br /><span style="color: rgb(51, 102, 255); font-style: italic;"> Dim ds As New DataSet</span> 'Declaramos un dataset<span style="color: rgb(51, 102, 255); font-style: italic;"> <br />Dim archivo As String</span><br /><span style="color: rgb(0, 153, 0);"> Sub abrir()<br /><span style="color: rgb(255, 102, 0);">'Creamos una subrutina para mostrar el dialogo "Abrir Archivo "</span><br /></span> <span style="color: rgb(51, 102, 255); font-style: italic;">OpenFile.ShowDialog()</span> <span style="color: rgb(51, 102, 255); font-style: italic;"> archivo = OpenFile.FileName<br /><span style="color: rgb(255, 102, 0);">'La funcion ReadXml carga el archivo XML en el dataset</span> </span><span style="color: rgb(51, 102, 255); font-style: italic;"><br /> ds.ReadXml(archivo)</span> <span style="color: rgb(51, 102, 255); font-style: italic;"><br /> MsgBox("Carga del archivo correcta.", MsgBoxStyle.Information)<br /><span style="color: rgb(255, 102, 0);">'Llenamos el datagrid</span> </span><span style="color: rgb(51, 102, 255); font-style: italic;"><br /> dgdatos.DataSource = ds.Tables(0).DefaultView</span><br /><span style="color: rgb(0, 153, 0);"> End Sub<br /><br /></span> <span style="color: rgb(0, 153, 0);">Private Sub btnCargar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCargar.Click<br /><span style="color: rgb(255, 102, 0);">'En el evento click del boton Cargar escribimos este codigo:</span><br /></span> <span style="font-style: italic; color: rgb(51, 102, 255);"> abrir()</span> <span style="font-style: italic; color: rgb(51, 102, 255);"> btnCargar.Enabled = False</span> <span style="font-style: italic; color: rgb(51, 102, 255);"> btnGrabar.Enabled = True</span><br /><span style="color: rgb(0, 153, 0);"> End Sub</span><br /><br /> <span style="color: rgb(0, 153, 0);">Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load</span><br /> <span style="font-style: italic; color: rgb(51, 102, 255);"> btnCargar.Enabled = True</span> <span style="font-style: italic; color: rgb(51, 102, 255);"> btnGrabar.Enabled = False</span><br /> <span style="color: rgb(0, 153, 0);">End Sub</span><br /><br /> <span style="color: rgb(0, 153, 0);">Private Sub btnGrabar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGrabar.Click<br /><span style="color: rgb(255, 102, 0);">'En el evento click del boton Grabar usamos la funcion WriteXml para guardar los cambios</span><br /></span> <span style="color: rgb(51, 102, 255);">ds.WriteXml(archivo)</span><br /><span style="color: rgb(51, 102, 255);"> MsgBox("Guardaste el archivo correctamente", MsgBoxStyle.Information)</span><br /><span style="color: rgb(0, 153, 0);"> End Sub</span><br /><span style="color: rgb(153, 0, 0);">End Class</span>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-8442272198627120994.post-48258136059858541422007-10-05T22:22:00.000-05:002007-10-05T22:40:03.575-05:00Detalles en Publicacion de un Proyecto en VB. NET<span style="color:#3366ff;">Algunos detalles que debemos considerar al momento de Publicar nuestra aplicacion:</span><br /><ol><li><span style="color:#009900;">Clickeando en Proyecto</span><span style="color:#009900;"> /Propiedades de (nombre de la aplicacion) .En la opcion Pantalla de Bienvenida seleccionamos nuestro <strong><em>SplashScreen </em></strong>(creado agregando un nuevo elemento de Pantalla de Bienvenida a nuestro Proyecto)</span></li><li><span style="color:#009900;">En el boton Información del ensamblado nos saldrá una ventana con información referida al software que hemos creado.</span></li><li><span style="color:#009900;">Pueden cambiar el tradicional icono de la ventana en blanco por uno personalizado .Aquí un link para convertir una imagen en icono(*.ico) : <a href="http://www.chami.com/html-kit/services/favicon/"><span style="color:#993300;"><a href="http://www.chami.com/html-kit/services/favicon/">http://www.chami.com/html-kit/services/favicon/</a></span></a></span></li></ol>Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-8442272198627120994.post-7670996906536097202007-09-30T13:14:00.000-05:002007-09-30T13:27:13.418-05:00Pasar de código PHP a ASP.NET (2)<span style="color:#3366ff;"></span><br /><table border="0" color="gray"><tbody><tr><th></th><th><p align="center"><span style="color:#660000;">PHP</span></p></th><th><p align="center"><span style="color:#660000;">ASP</span></p></th></tr><tr><td><span style="color:#3366ff;"><strong>Metodo POST</strong></span></td><td><span style="color:#009900;">$_POST["variable"]</span></td><td><span style="color:#009900;">Request.Form("variable")</span></td></tr>MEtodos POST y GET equivalentes entre PHP y ASP.NET <tr><td><span style="color:#3366ff;"><strong>Metodo GET</strong></span></td><td><span style="color:#009900;">$_GET["variable"]</span></td><td><span style="color:#009900;">Request.QueryString("variable")</span></td></tr><br /></tbody></table>Unknownnoreply@blogger.com1tag:blogger.com,1999:blog-8442272198627120994.post-23037841112146114142007-09-29T21:17:00.000-05:002007-09-30T13:00:34.050-05:00Pasar de código PHP a ASP.NET (1)Equivalencias entre Codigo PHP y ASP.NET:<br /><span style="FONT-WEIGHT: bold; COLOR: rgb(51,102,255)"></span><br /><span style="FONT-WEIGHT: bold; COLOR: rgb(51,102,255)">En PHP:</span><br /><br /><span style="COLOR: rgb(51,51,0); FONT-STYLE: italic">mysql_pconnect("direccion_servidor","usuario","contraseña");</span><br /><span style="COLOR: rgb(51,51,0); FONT-STYLE: italic">mysql_select_db("nombre_bd");</span><br /><span style="COLOR: rgb(51,51,0); FONT-STYLE: italic">$consulta=mysql_query("select * from tabla");</span><br /><span style="COLOR: rgb(51,51,0); FONT-STYLE: italic">$n=mysql_num_rows($consulta);</span><br /><span style="COLOR: rgb(51,51,0); FONT-STYLE: italic">for($i=0;$i<$n;$i++)</span><br /><span style="COLOR: rgb(51,51,0); FONT-STYLE: italic">{</span><br /><span style="COLOR: rgb(51,51,0); FONT-STYLE: italic">$resultado=mysql_fetch_array($consulta);</span><br /><span style="COLOR: rgb(51,51,0); FONT-STYLE: italic">echo $resultado["nombre"];//Por ejemplo campo nombre</span><br /><span style="COLOR: rgb(51,51,0); FONT-STYLE: italic">}</span><br /><br /><span style="FONT-WEIGHT: bold; COLOR: rgb(51,102,255)">En ASP.NET:<br /><br /></span>En un archivo de tipo aspx(en el page_load por ejemplo):<br /><br /><span style="COLOR: rgb(0,153,0); FONT-STYLE: italic"><%@ Import Namespace ="System.Data" %><br /><%@ Import Namespace ="System.Data.SqlClient" %><br /><%@ Page Language="VB" AutoEventWireup="true" CodeFile="pagina.aspx.vb" Inherits="_Default" %><br />'Se declara el AutoEventWireup para ejecutar el codigo VB<br />'Lo sgte en el page_load:<br /><br /></span><span style="FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)">dim sqlcon as new SqlConnection("server=direccion;database=nombre_bd;uid=usuario;pwd=password;")<br />dim sqldaad as new SqlDataAdapter("select * from tabla",sqlcon)<br />Dim ds As New DataSet()<br />xcmd.Fill(ds, "nombres")<br />repetidor.DataSource = ds.Tables("nombres")<br />repetidor.DataBind()<br /><br /><span style="COLOR: rgb(0,0,0)"><span style="FONT-STYLE: italic">En la pagina aspx se creó el siguiente codigo en el body<br /><span style="COLOR: rgb(0,153,0)">asp:repeater runat=server id=repetidor</span><br /><span style="COLOR: rgb(0,153,0)">itemtemplate</span><br /></span></span></span></span><span style="COLOR: rgb(0,153,0); FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(0,0,0)"><span style="FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><%#Container.DataItem("nombre")%></span></span></span></span></span><br /><span style="COLOR: rgb(0,153,0); FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(0,0,0)"><span style="FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)">/itemtemplate</span><br /><span style="COLOR: rgb(0,153,0)">/asp:repeater</span><br /></span></span></span></span><span style="COLOR: rgb(0,153,0); FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(0,0,0)"><span style="FONT-STYLE: italic"><?xml:namespace prefix = asp /><asp:repeater id="repetidor" runat=""><asp: id="repetidor" runat="server"></ASP:></asp:repeater></span></span></span></span><span style="FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(0,0,0)"><span style="FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><asp:repeater id="repetidor" runat="server"><asp:repeater id="repetidor" runat="server"><br /></asp:repeater></asp:repeater></span></span></span></span></span><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(0,0,0)"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(51,51,153)"><span style="COLOR: rgb(0,0,0)">Ahora, veamos las analogia</span></span></span></span></span><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(0,0,0)"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(51,51,153)"><span style="COLOR: rgb(0,0,0)">s:</span></span></span></span></span><span style="FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(0,0,0)"><span style="FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(51,51,153)"><span style="FONT-STYLE: italic"><br /><br /></span></span></span></span></span></span></span><span style="FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(0,0,0)"><span style="FONT-STYLE: italic"><span style="COLOR: rgb(0,153,0)"><span style="COLOR: rgb(51,51,153)"><span style="FONT-STYLE: italic"></span></span></span></span></span></span></span><ul><li style="COLOR: rgb(51,102,255)">La funcion mysql_pconnect() y mysql_select_db() son equivalentes al objeto SqlConnection() .</li><li style="COLOR: rgb(51,102,255)">La consulta mysql_query() lo es al objeto SqlDataAdapter().</li><li style="COLOR: rgb(51,102,255)">El objeto de tipo DataSet() es similar al mysql_fetch_array, que guarda la informacion de la respuesta de la consulta.</li><li style="COLOR: rgb(51,102,255)">El control asp:repeater <asp:repeater>hace lo mismo que el for($i=0;$i<$n;$i++).</asp:repeater></li><li style="COLOR: rgb(51,102,255)">El ItemTemplate es la plantilla de cada resultado arrojado</li><li><span style="COLOR: rgb(51,102,255)">El <%#Container.DataItem("nombre")%>es equivalente al resultado del array $resultado("nombre").</span><br /></li></ul>Unknownnoreply@blogger.com0