Leer el resto de esta entrada »

Leer el resto de esta entrada »

Como se dieron cuenta, este mes de Octubre estamos llenos de actividades, y la semana que entra, se iniciarán 2 nuevos cursos referentes a la plataforma .NET:

Curso de ASP.NET 3.5

Este curso se llevará a cabo en las Instalaciones del ITZ, e iniciará el Martes 14 de Octubre, de 5:00 pm a 8:00 pm. Durante Octubre, se impartirán el curso Martes y Jueves, a partir de noviembre el curso cambiara de fechas

Requisitos: Conocimientos Basicos de .Net, y software necesario instalado con anterioridad

Cupo: Lugares Disponibles

Curso Visual Basic 2008

Este Miércoles 15 de Octubre, se dará inicio al curso de Visual Basic 2008 en las instalaciones de la UNID Zacatecas. Este curso será en el CTC de la institución, y se impartirá todos los Miércoles, de 5:30 pm a 9:00 pm.

Requisitos: Tener el software necesario instalado con anterioridad

Cupo: Cerrado, sin disponibilidad.

Recursos

Para el curso de ASP.Net 3.5: Se necesita el Software Visual Studio 2008 con SP1 o Visual Web Developer Express 2008 con SP1.

Descarga del Visual Web Developer Express 2008 con SP1: http://www.microsoft.com/express/download/default.aspx

Para el curso de VB 2008: Se necesita el Software Visual Studio 2008, o el Visual Basic Express 2008.

Descarga del Visual Basic Express 2008: http://www.microsoft.com/express/download/default.aspx

Próximamente esperen más cursos y talleres!!!

Saludos!!!

César Iván Flores Castañeda |Microsoft Student Partner | MCTS Windows Vista

The samples from Microsoft simply use the comments from MSDN on functions/methods that are part of a class's interface implementation.

I 'documented' a few of my functions by copying the summary out of MSDN but it's a tedious job and consequently I decided to try and automate it.
Although Visual Basic 'sucks' or is a least quite some change from writing C/C++/C# code all the time, the Automation model is very powerful and quite nice to use.

My macro provides two methods:

• One to add comments to all methods that are part of an interface's implementation
• One to add comments to the method the cursor currently resides in

My code currently only adds comments from interface definitions that have been defined outside the current project. It's pretty nifty in my opinion because usually these interface comments won't change a lot and thus it's safe to add them to the source code, while the interfaces one has written themself can still change and the macros can't track that and/or update the comments afterwards.

However, I've added a configuration boolean, so this behavior can be turned off if needed.

My code won't remove or replace comments, it will just add the comment in front of other comments - if the comment doesn't already exist - I've tried to make it quite safe, so code loss or corruption will be avoided.

I hope this code is helpful. I'm releasing it under the Microsoft Public License. If there are good reasons to use a different license, feel free to tell me so :)

Cheers,
Andreas

[sourcecode lang='vb']
' Andreas 'BlackHC' Kirsch 2008
' released under Microsoft Public License
Imports System
Imports EnvDTE

Public Module CommentImplementedMethods
' we usually only want to use external interfaces because it's safer to assume those won't change anytime soon
Const UseExternalInterfaceCommentsOnly = True

Private Function GetSummaryFromDocComment(ByVal docComment As String) As String
Const summaryStartTag = "

'Private Function GetInterfaceByName(ByRef classObject As CodeClass, ByRef name As String) As CodeInterface
' For Each implementedInterface As CodeInterface In classObject.ImplementedInterfaces
' If implementedInterface.Name = name Then
' Return implementedInterface
' End If
' Next
'End Function

Private Function GetMethod(ByRef interfaceObject As CodeInterface, ByRef methodObject As CodeFunction) As CodeFunction
Dim prototypeFlags As Int32 = vsCMPrototype.vsCMPrototypeParamTypes Or vsCMPrototype.vsCMPrototypeType
Dim prototype As String = methodObject.Prototype(prototypeFlags)

Dim separationIndex = methodObject.Name.IndexOf("."c)
If separationIndex <> -1 Then
Dim interfaceName = methodObject.Name.Substring(0, separationIndex)
If interfaceName <> interfaceObject.Name Then
Return Nothing
End If

Dim realMethodName = methodObject.Name.Substring(separationIndex + 1)
prototype = prototype.Replace(methodObject.Name, realMethodName)
End If

For Each member As CodeElement In interfaceObject.Members
If member.Kind <> vsCMElement.vsCMElementFunction Then
Continue For
End If

Dim method As CodeFunction = member
If method.Prototype(prototypeFlags) = prototype Then
Return method
End If
Next

Return Nothing
End Function

Private Function GetInterfaceMethod(ByRef methodObject As CodeFunction) As CodeFunction
Dim parentClass As CodeClass = methodObject.Parent
For Each implementedInterface As CodeInterface In parentClass.ImplementedInterfaces
If implementedInterface.InfoLocation = vsCMInfoLocation.vsCMInfoLocationProject And UseExternalInterfaceCommentsOnly Then
Continue For
End If
Dim matchedMethod = GetMethod(implementedInterface, methodObject)
If Not IsNothing(matchedMethod) Then
Return matchedMethod
End If
Next
End Function

Private Function GetCurrentMethod() As CodeFunction
Dim sel As TextSelection = _
CType(DTE.ActiveDocument.Selection, TextSelection)
Dim pnt As TextPoint = CType(sel.ActivePoint, TextPoint)

Dim method As CodeFunction = pnt.CodeElement(vsCMElement.vsCMElementFunction)
Return method
End Function

Private Sub AddCommentToMethod(ByRef methodObject As CodeFunction, ByRef newComment As String)
If methodObject.Comment.IndexOf(newComment) <> -1 Then
' This comment has already been added
Exit Sub
End If
methodObject.Comment = newComment & vbNewLine & methodObject.Comment
End Sub

Public Sub CommentImplementedMethod()
Try
Dim currentMethod = GetCurrentMethod()
If IsNothing(currentMethod) Then
MsgBox("Not inside a method scope at the moment!")
Exit Sub
End If

Dim interfaceMethod = GetInterfaceMethod(currentMethod)
If IsNothing(interfaceMethod) Then
If UseExternalInterfaceCommentsOnly Then
MsgBox("*External* interface method could not be found!")
Else
MsgBox("Interface method could not be found!")
End If
Exit Sub
End If

Dim newComment = GetSummaryFromDocComment(interfaceMethod.DocComment)
AddCommentToMethod(currentMethod, newComment)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub

Private Sub TraverseAndCommentImplementedMethods(ByRef elements As CodeElements)
For Each child As CodeElement In elements
If child.Kind = vsCMElement.vsCMElementFunction Then
Dim currentMethod = CType(child, CodeFunction)
If IsNothing(currentMethod) Then
Exit Sub
End If

Dim interfaceMethod = GetInterfaceMethod(currentMethod)
If IsNothing(interfaceMethod) Then
Exit Sub
End If

Dim newComment = GetSummaryFromDocComment(interfaceMethod.DocComment)
AddCommentToMethod(currentMethod, newComment)
End If
TraverseAndCommentImplementedMethods(child.Children)
Next
End Sub

Public Sub CommentAllImplementedMethodsInFile()
Try
TraverseAndCommentImplementedMethods(DTE.ActiveDocument.ProjectItem.FileCodeModel.CodeElements)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
End Module
[/sourcecode]

Insgesamt nahmen 45 Personen an der Onlineumfrage teil. Dabei kamen verschiedenste Antworten zusammen. Die folgende Übersicht soll einen Denkanstoß geben, in welche Richtung man bei der Entwicklung eines Webbrowsers gehen sollte. Die hier veröffentlichenten Ergebnisse können gerne als Basis für die Entwicklung eigener Projekte genommen werden. Bei weiteren Fragen kommentieren Sie einfach diesen Artikel.

14 Fragen zur Wichtigkeit von Browserkomponenten

Hierbei gab es eine Skala von 0 bis 9, wobei 0 für "sehr unwichtig" und 9 für "sehr wichtig" steht. Die folgenden Werte ergeben sich aus dem Durchschnitt der befragten Personen:

• Tabbing 9
• Favoriten 8
• verschlüsselte Übertragung auf den Webserver 8
• Ressourcenschonend 8
• Startseite 7
• Erweiterbarkeit durch Plug-ins 7
• automatische Updates 6
• optische Gestaltung 6
• Features 5
• farbliche Gestaltung 5
• automatische Löschung vom Browserverlauf  5
• News-Seite 3
• E-Mail-Management 2
• farbliche Unterscheidung der Tabs 2

Lieblings- und Hassbrowser

Des Weiteren wurden die Teilnehmer befragt, welches ihr persönlicher Lieblings- und welcher ihr absoluter Hassbrowser sei. Die Zahl hinter dem Browser zeigt, wieviele Nutzer diesen Browser als Lieblings- oder als Hassbrowser angaben:

Lieblingsbrowser

• Firefox 26
• Opera 8
• IE 4
• Chrome 2
• andere 1

Hassbrowser 

• Opera 0
• Chrome 3
• andere 4
• Firefox 6
• IE 18

Die Auflösung

Im Rahmen der Umfrage wurde auch gefragt, welche Standard-Auflösung ein Browser haben sollte. Hierbei wurde wie folgt gewählt:

• skalierbar 11
• 1024x768 6
• 1280x1024 5
• 1680x1050 2

Was ist unerwünscht?

Schließlich wurde gefragt, was ein Browser auf keinen Fall haben sollte:

• Bugs, Sicherheitslücken 8
• Phonehome, Datenspeicherung 6
• zu viele Features 4
• Werbung, schlechtes Design 2
• automatische Updates 2
• fehlende Engine 2

Fazit

Anhand dieser Umfrage sollte man doch schon einigermaßen entscheiden können, was ein Webbrowser haben sollte und was er nicht haben sollte. Allerdings wollen wir hierzu keine Stellung beziehen, sondern der Leser soll sich selbst eine Meinung zu diesen Zahlen bilden.

Die Umfrage programmierte Biggs, dem wir dafür nochmals danken.

A few months ago, I started spending as much time on IRC as possible, in a channel made for web developers. I thought "gee, this might be an awesome place to pick up some learning aids and training material". It wasn't. Little did I know that the channel I'd joined was full of PHP developers who (if it weren't illegal) would go out and brutally assault or even murder every .NET developer they could find.
So I figured that maybe .NET was too complicated and started learning PHP. I'd never lost my love for .NET though and constantly demonstrated how it was superior to PHP at every opportunity. If you're into PHP, you should've stopped reading about a paragraph ago... It's only going to get worse for you.

For one thing, there are so many symbols and operators and comparative characters that you need to learn in PHP... EVERYTHING goes in brackets or parenthesis and Lord help you if you missed one out because you'll never find it.
At Microsoft though, the wonderful people who work day and night to deliver the high standard applications and services we have come to expect from the multi-billion dollar empire, have made Visual Basic as near to english as possible, so it's really easy to read through and learn.

Eventually after getting my hands on Visual Studio 2005, I found Beth Massi's Visual Basic Forms over Data video series and am currently going through it when I've got time.
I suggest that if you want to find top-notch training aids and tools, check out her blog, you WONT be disappointed.

-L

First attempt at a "useful" program was a dice roller for Cinematic Unisystem. Not fully functional yet (none of the buttons along the right have any function) but the dice rolling part works.

Update: New version uploaded with working "character sheet" section, "About Box" and Splash Screen

Download either from the box.net widget or from here

Public Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpbuffer As String, nSize As Long) As Long

E no form utilizando as rotinas abaixo, chamar "MostraUsuario".

Public Function sUserID() As String
  Dim sBuffer As String
  Dim lSize As Long
  sBuffer = Space$(255)
  lSize = Len(sBuffer)
  GetUserName sBuffer, lSize
  If lSize > 0 Then
    sUserID = Left$(sBuffer, lSize - 1)
  End If
End Function
Private Sub MostraUsuario()
    MsgBox sUserID
End Sub 

Funciona muito bem!!!

1. Start a new Windows Forms project
2. Add a button control to the default Form1
3. Add a OpenFileDialog to the default Form1
4. From the Project Menu, select Add Module
5. Add the following code to the new module:

   Option Explicit On

   Option Strict On

   Imports System.Text

   Module Module1

       Private Declare Auto Function GetShortPathName Lib "kernel32" ( _

           ByVal lpszLongPath As String, _

           ByVal lpszShortPath As StringBuilder, _

           ByVal cchBuffer As Integer) As Integer

       Public Function GetShortPath(ByVal longPath As String) As String

           Dim requiredSize As Integer = GetShortPathName(longPath, Nothing, 0)

           Dim buffer As New StringBuilder(requiredSize)

           GetShortPathName(longPath, buffer, buffer.Capacity)

           Return buffer.ToString()

       End Function

   End Module

6. Add the following code to Form1:

   Option Strict On

   Option Explicit On

   Imports System

   Imports System.Text

   Public Class Form1

       Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

           If OpenFileDialog1.ShowDialog(Me) = Windows.Forms.DialogResult.OK Then

               Dim msg As New StringBuilder()

               msg.AppendFormat("Long File Name: {0}", OpenFileDialog1.FileName)

               msg.AppendLine()

               msg.AppendFormat("Short File Name: {0}", GetShortPath(OpenFileDialog1.FileName))

               MessageBox.Show(msg.ToString())

           End If

       End Sub

   End Class

7. Run the project using Ctrl+F5 and click the button.
8. Navigate to a file with  a long path and select ok.
9. The message box with both the long and short versions of the file name should appear.

Eine kleine Geschichte
Als CED letztens wieder einmal als Qualitätssicherer unterwegs war, analysierten wir wie immer sämtliche Programmkomponenten. Eine Analyse der ausführbaren Programmdatei nach dem Reverse Engineering-Prinzip ergab im Klartext den FTP-Server, den das Programm nutze, um Updates zu laden. Neben dem Servernamen fanden wir auch das Passwort - ebenfalls im Klartext. Dadurch konnten wir auf den FTP-Server des Herstellers mit Lese- und Schreibrechten zugreifen und beliebig Dateien verändern. Es war auch möglich, Dateien hochzuladen, die sich gegenüber der Software als Update ausgeben. Dadurch hätte ein Angreifer Schadcode auf den PC des Endverbrauchers laden können.

Probleme
Manche Programmiersprachen übersetzen den Quellcode nicht vollständig in Maschinencode. So ist es hier meist leicht, Klartext aus der fertigen Datei zu filtern. Zwar bleiben Kommentare (die meistens beim Kompilieren entfernt werden) oder lokale Objektnamen meistens gut versteckt, aber in der Regel findet man sämtliche Befehle und Abfragen, wodurch eine teilweise Herstellung des Programmcodes möglich bleibt. Das Problem ist, wie in der kleinen Geschichte beschrieben, meistens mit Sicherheitsrisiken verbunden. Wer will schon, dass sein Computer mit Viren verseucht wird, weil er ein Updates geladen hat, das gar keins war? Welcher Entwickler will die wochenlange Arbeit von seinem FTP-Server gelöscht haben? Des Weiteren ließen sich mit Reverse Engineering Kopierschutzmechanismen aushebeln, da dabei Verhaltensmuster der Software abgefragt werden können.

Lösungen
Klartext im Programmcode lässt sich meistens nur durch Verschlüsselung umgehen. Im Fall der kleinen Geschichte hätte man also entweder ganz auf die FTP-Einwahl verzichtet oder das Passwort sowie den Namen der FTP-Daten verschlüsselt online hinterlegt. Die Software hätte sie dann eingelesen, entschlüsselt und sich dann eingewählt. Allerdings müsste dann auch der ausgehende Netzwerkverkehr durch die Software verschlüsselt werden, denn sonst könnte man mit einem Netzwerkanalyse-Tool das Passwort bei der Abfrage wieder auslesen. Viele Weitere Ansätze finden Sie auch im englischsprachigen Reverse Engineering-Forum (http://www.reverse-engineering.net/).

btw happy lebaran guys
maaf lahir bathin....
have a great time ;)

let's prancing around the stage like we own the world....hey you...move your ass out of my way...

hmmm...btw i am currently taking some break from seemingly-never-ending-code-crafting-shit. hey...take a peek on my newly-refurbished-app: sistem manajemen hotel dan resor a.k.a hotel and resort management system 'Arcadia Hotel System 2009' VB6 + SkinCrafter 3.1, check the screenshot below (oopsss...there u go again....gimme a break)

whatttss ndra VB6??? hahahahaha...i know...i know....i'm ignoring the wall at the end of the tunnel ;) VB6 is dead, right???

current playlist:
andra and the backbone
the nunung cs
groove coverage
alterbridge
pay

here we go

carbon fibre style

keren kan custom skinnya, itu gw convert dari file msstyles lo cari aja bister.msstyles di deviantart ataw tempat laen trus convert pake skinbuilder.

Private SkinOb As New SKINCRAFTERLib.SCSkin3
Private Sub Form_Initialize()
SkinOb.InitLicenKeys "SKINCRAFTER", "SKINCRAFTER.COM", "support@skincrafter.com", "DEMOSKINCRAFTERLICENCE"
SkinOb.DefineLanguage 2
SkinOb.InitDecoration 1
SkinOb.LoadSkinFromFile "D:\\Skin.skf"
SkinOb.ApplySkin
End Sub

Untuk ngatasin ini pake App.Path aja gw yakin kebanyakan ente dah pada tau yak, ni sampel kode gw

Private SkinOb As New SKINCRAFTERLib.SCSkin3
Private Sub Form_Initialize()
Dim Lokasi As String
SkinOb.InitLicenKeys "SKINCRAFTER", "SKINCRAFTER.COM", "support@skincrafter.com", "DEMOSKINCRAFTERLICENCE"
SkinOb.DefineLanguage 2
SkinOb.InitDecoration 1
Lokasi = App.Path & "\skin.skf"
SkinOb.LoadSkinFromFile Lokasi
SkinOb.ApplySkin
End Sub

Plus supaya bisa jalan dengan baik pastikan file berikut elo sertakan
GDIPLUS.DLL
MFC80.DLL
Microsoft Visual C++ 2005 SP1 Redistributable Package
SkinCrafter3.dll

dan SkinCrafter3.dll harus di register di sistem, kalo mo manual sih kayak gini caranya

REGSVR32.EXE SkinCrafter3.dll

lebih oke kalo installermaker/setupcreator/apapun package creator pilihan elo mendukung registrasi otomatis. kalo gak yah manual aja ataw pake bat file...gampang kan

happy coding folks....

Pues dándole la vuelta me encontré con el método llamado System.String.Split, el cual este devuelve una matriz de cadenas en la que cada elemento es una palabra. Como entrada el Split toma una matriz de caracteres que indican los caracteres que se utilizan como delimitadores.

Aquí podremos usar los siguientes delimitadores:

• La Coma: ','
• El Punto: '.'
• El Espacio: ' '
• El Tabulador: '\t'
• Dos Puntos: ':'
• El Punto y Coma: ';'
• Comillas Dobles: ' " '

Al menos con esos he probado y me ha funcionado, así que aquí les dejo el código en Visual Basic y en C#. Recuerden que en C# al definir la matriz de Delimitadores cada delimitador debe estar entre comillas simples, ya que si lo hacen con comillas dobles le dará un error de tipo "string no es convertible a Char"

En Visual Basic no sucede lo mismo.

Visual Basic

'Se define los Delimitadores - Ojo cada delimitador entre comillas 

 'dobles y separados por el +

 Dim Delimitadores As Char() = ":" + "'" + "," + "." + ";" + "'"

 'Declaro la Matriz y le asigno el valor que proviene de un TextBox

 'Fijense en el metodo Split le digo cuales son los char[] que evaluara

 Dim strMatriz As String() = TextBox1.Text.Split(Delimitadores)

 'Y para visualizar el resultado lo mostramos en un GridView

 Me.GridView1.DataSource = strMatriz

 Me.GridView1.DataBind()

Visual Csharp

//Se define los Delimitadores - Ojo cada delimitador entre comillas simple

char[] Delimitadores = { ' ' , ',', '.', ':', '\t', ';', '"' };

//Declaro la Matriz y le asigno el valor que proviene de un TextBox

//Fijense en el metodo Split le digo cuales son los char[] que evaluara

string[] strMatriz = TextBox1.Text.Split(Delimitadores);

//Y para visualizar el resultado lo mostramos en un GridView

this.GridView1.DataSource = strMatriz;

this.GridView1.DataBind();

Hasta una próxima ocasión que siga publicando mas trucos.

Nota: Estos códigos pueden servir para aplicaciones Windows solo deben cambiar el lugar donde mostraran el resultado.

In the past few years, Microsoft has responded with some free enticements of its own in order to woo developers into its fold.  These include the following:

• Visual Studio .NET express editions of Visual Basic, C#, C++, and ASP.
• SQL Server Express edition.
• The ability with Vista Home Premium and Ultimate, and Windows XP Professional to provide limited web and server services using IIS.
• Virtual PC and Virtual Server to set up virtual machines.

The VS .NET express editions are fairly comprehensive, and some significant applications can be developed using those tools.  Applications developed with them can be migrated to the professional (paid software) versions of VS.  Databases and web sites can be migrated to full fledged Microsoft server versions.

What this means is that you can put together a fairly comprehensive set of Microsoft-centric tools for free to do some development with.  Plenty of reference information, including MSDN, is available over the Internet.

One thing that I've noted in looking at IDEs is that the Visual Studio IDE for VB, etc. is pretty good.  The PHP IDEs out there could learn a few things from them.  Whether you like Microsoft or not (and I think that some of their practices are predatory, if nothing else) the .NET development tools are pretty nice.

In addition, the SDKs are available for free download.  Documentation on how to use them is available over the Internet, and if you're a hard core command line / text editor developer, you can actually create VB programs and compile them just using the SDK - without going through the IDE.  For me, personally, I will stick with the VS IDE available in the express editions.

If you are interested, you can contact me instantly... e-mail: byron [at] quezon - tech dot com or regodonbv [at] yahoo dot com.