Después de once meses de vida y supongo de escuchar un montón de sugerencias, el equipo de Visual Studio nos anuncia la liberacion del primer SP. Espero que muchas de nuestras solicitudes hayan sido escuchadas :-), podéis comprobar si los rendimientos han sido mejorados o alguna de las pequeñas moscas que andaban sueltas han sido cazadas.
Agradezco mucho todas las consultas que me enviáis directamente a través de este blog, aunque es bueno precisar que las características y el diseño de los blogs no ayudan en poder gestionar adecuadamente las conversaciones. Estoy viendo la posibilidad de facilitar algún otro medio para poder disponer de un mayor nivel de interacción con los lectores de este blog.
Aprovecho este post, para recordaros que me podéis encontrar sin ningún lugar a duda en el foro de comunicaciones entre dispositivos en :
Esta vez se trata de una noticia que será de interés para los desarrolladores de software independientes “ISV”, desde octubre del año pasado se ha puesto en funcionamiento un nuevo sistema para certificar nuestras aplicaciones y aprovecharnos de las ventajas que ello comporta. Y lo mas importante… sin coste adicional.
Es una buena apuesta dedicar el tiempo necesario, para estar “Encima de la Ola”.
Puedes encontrar toda información que necesitaras en :
Espero sea de utilidad! para subir nuestro listón y saltar por encima de las dificultades de estos tiempos… que viéndolos en positivo vienen repletos de oportunidades 🙂 Pep Lluis,
Fernando, contestando a tu pregunta de cómo capturar los cambios en las señales de control de puerto serie, te dejo este ejemplo básico esperando te sea de utilidad.
Dim MiSerialPort AsNew IO.Ports.SerialPort Sub Inicializando() MiSerialPort.Open() AddHandler MiSerialPort.PinChanged, AddressOf MiSerialPort_PinChanged EndSub PrivateSub MiSerialPort_PinChanged(ByVal sender As System.Object, ByVal e As System.IO.Ports.SerialPinChangedEventArgs) SelectCase e.EventType Case IO.Ports.SerialPinChange.CtsChanged ‘Clear To Send If MiSerialPort.CtsHolding Then ‘CTS esta en ON Else ‘CTS esta en OFF EndIf Case IO.Ports.SerialPinChange.DsrChanged ‘Data Set Ready If MiSerialPort.DsrHolding Then ‘DSR esta en ON Else ‘DSR esta en OFF EndIf Case IO.Ports.SerialPinChange.Ring ‘Ring Case IO.Ports.SerialPinChange.Break ‘Break Case IO.Ports.SerialPinChange.CDChanged ‘Carrier Detect If MiSerialPort.CDHolding Then ‘… Else ‘…. EndIf EndSelect EndSub
Pues eso, que disfrutéis de una buena cena en compañía de vuestros seres más queridos y que empecemos renovados caminos con la ilusión de compartir destinos, viajes y experiencias.
Cuidado con las uvas, que son traidoras cuando se toman de 12 en 12. Un abrazo a todos y os espero dentro de unas horas, Pep Lluis,
respondiendo a la pregunta : “No encuentro como activar la pantalla de variables locales.”
En la ventana de variables locales podemos hacer un seguimiento de las variables y sus valores en tiempo de depuración, por lo tanto su icono no aparece cuando estamos editando. Una vez entremos en modo ‘debug’ podremos invocarla pulsando la siguiente secuencia de “teclas de acceso rápido” : CTRL+ALT+V y a continuación L … sencillo verdad. Aunque a menudo nos parece imposible cuando no encontramos lo que buscamos.
Si te fijas [V] de ventana y [L] de locales, en verdad una buena formula para no olvidar estas secuencias. Feliz Año nuevo! Pep Lluis,
He recibido algunas consultas entorno a la integracion del facebook en windows phone 7, en concreto sobre como acceder al ‘inbox’. En la consulta especificáis que os pide instalar ‘java-script’. A falta de conocer exactamente el escenario… os invito a leer vuestra ‘inbox’ usando la url para mobil «se que no es para tirar petardos, sin ninguna duda puedo daros fe de que funciona :-)». No olvideis que podeis descargaros la version gratuita de fcbk, disponible en cinco lenguages incluido el «spanish» desde el mismo terminal, entonces tendreis disponibles las tipicas «top news», «photos», «events», «notifications», «friends»…etc, aunque algunos la consideren light.
En todo caso el post responde a la pregunta «sin instalar nada».
I have received a question asking for How I can compute a SHA1 hash.
You can use this function or similar to get 160bit hash.
Imports System.Security.Cryptography
' Computing Hash for SHA1 Function SHA1(ByVal dataStream AsString) AsByte() Dim Ascii AsNewASCIIEncoding Dim tmpsource(dataStream.Length) AsByte tmpsource = Ascii.GetBytes(dataStream) Dim sha AsNewSHA1CryptoServiceProvider() Return sha.ComputeHash(tmpsource) EndFunction