Finished Logo Project Debugger

http://mfiles.naver.net/6dba5a8c97cba1173f66/data17/2007/5/29/282/hyeon_logo-cth1249.bin

MAKE SURE THAT YOU RENAME .BIN TO .EXE

Paul's Project

Public Class Form1 Private Structure LayOutSettings Dim PictureFileName Dim MyCurrentSettingFileName As String End Structure Private MyLayOut As New LayOutSettings
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown Select Case e.KeyCode Case Keys.Down If e.Control = True Then Label1.Top = (Label1.Top + 10) Else : Me.Opacity = Me.Opacity - 0.1 End If Case Keys.Up If e.Control = True Then Label1.Top = Label1.Top - 10 Else Me.Opacity = Me.Opacity + 0.1
End If Case Keys.Left If e.Control = True Then Label1.Left = Label1.Left - 10 End If Case Keys.Right If e.Control = True Then Label1.Left = Label1.Left + 10 End If End Select End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.BorderStyle = BorderStyle.None Me.BackColor = Color.White Me.KeyPreview = True
End Sub
Private Sub FontToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FontToolStripMenuItem.Click FontDialog1.ShowDialog() Label1.Font = FontDialog1.Font
End Sub
Private Sub FontColorToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FontColorToolStripMenuItem.Click ColorDialog1.ShowDialog() Label1.ForeColor = ColorDialog1.Color End Sub
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click Form2.show() End Sub
Private Sub SolidToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SolidToolStripMenuItem.Click Label1.BorderStyle = BorderStyle.FixedSingle End Sub
Private Sub NoneToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NoneToolStripMenuItem.Click Label1.BorderStyle = BorderStyle.None End Sub
Private Sub SolidToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SolidToolStripMenuItem1.Click Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Sizable End Sub
Private Sub NoneToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NoneToolStripMenuItem1.Click Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None End Sub
Private Sub TransparencyColorToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TransparencyColorToolStripMenuItem.Click ColorDialog1.ShowDialog() Me.TransparencyKey = ColorDialog1.Color End Sub
Private Sub LoadPictureToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LoadPictureToolStripMenuItem.Click OpenFileDialog1.ShowDialog() MyLayOut.PictureFileName = OpenFileDialog1.FileName Me.BackgroundImage = System.Drawing.Image.FromFile(MyLayOut.PictureFileName)
End Sub
Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click Me.Close() End Sub
Private Sub NewToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NewToolStripMenuItem.Click Dim oForm As New Form1 oForm.Show() End Sub
Private Sub SaveToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaVeToolStripMenuItem.Click SaveFileDialog1.ShowDialog() SaveMySettings(SaveFileDialog1.FileName) ' SaveFileDialog1.ShowDialog() ' MyLayOut.MyCurrentSettingFileName = SaveFileDialog1.FileName() ' If MyLayOut.MyCurrentSettingFileName <> "" Then ' 'Dim sContents As String
' ' IO.File.WriteAllText(MyLayOut.MyCurrentSettingFileName, sContents) ' IO.File.WriteAllText(MyLayOut.MyCurrentSettingFileName, MyLayOut.TextLeft & vbNewLine &amp; MyLayOut.TextTop & vbNewLine & MyLayOut.TextWidth & vbNewLine & MyLayOut.TextHeight & vbNewLine & MyLayOut.TextText & vbNewLine & MyLayOut.TextFont & vbNewLine & MyLayOut.TextBorder & vbNewLine & MyLayOut.FormLeft & vbNewLine & MyLayOut.FormTop & vbNewLine & MyLayOut.FormWidth & vbNewLine & MyLayOut.FormHeight & vbNewLine & MyLayOut.FormColor & vbNewLine & MyLayOut.FormBorder & vbNewLine & MyLayOut.OpacityLevel & vbNewLine & MyLayOut.TransparencyColor & vbNewLine &amp; MyLayOut.PictureFileName & vbNewLine & Label1.ForeColor.A & vbNewLine & Label1.ForeColor.R & vbNewLine & Label1.ForeColor.G & vbNewLine & Label1.ForeColor.B)
' End If
'End Sub
'Private Sub SaveAsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveAsToolStripMenuItem.Click
' SaveFileDialog1.ShowDialog()
' MyLayOut.MyCurrentSettingFileName = SaveFileDialog1.FileName()
' If MyLayOut.MyCurrentSettingFileName <> "" Then ' IO.File.WriteAllText(MyLayOut.MyCurrentSettingFileName, MyLayOut.TextLeft & vbNewLine &amp; MyLayOut.FormTop & vbNewLine & MyLayOut.TextHeight & vbNewLine & MyLayOut.TextWidth & vbNewLine & MyLayOut.FormLeft & vbNewLine & MyLayOut.FormTop & vbNewLine & MyLayOut.FormWidth & vbNewLine & MyLayOut.FormHeight & vbNewLine & MyLayOut.TextText & vbNewLine & MyLayOut.TextFont & vbNewLine & MyLayOut.TextColor & vbNewLine & MyLayOut.TextBorder & vbNewLine & MyLayOut.FormLeft & vbNewLine & MyLayOut.FormTop & vbNewLine & MyLayOut.FormWidth & vbNewLine & MyLayOut.FormHeight & vbNewLine & MyLayOut.FormColor & vbNewLine & MyLayOut.FormBorder & vbNewLine & MyLayOut.OpacityLevel & vbNewLine & MyLayOut.TransparencyColor & vbNewLine & MyLayOut.PictureFileName) ' End If End Sub
Private Sub BorderToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BorderToolStripMenuItem.Click
End Sub
Private Sub MoveAmountToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MoveAmountToolStripMenuItem.Click
End Sub
Private Sub FileToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FileToolStripMenuItem.Click 'MyLayOut.TextLeft = Label1.Left 'MyLayOut.TextTop = Label1.Top 'MyLayOut.TextWidth = Label1.Width 'MyLayOut.TextHeight = Label1.Height ''MyLayOut.TextMoveAmount = "" 'MyLayOut.TextText = Label1.Text 'MyLayOut.TextFont = Label1.Font.Name 'MyLayOut.TextColor = Label1.ForeColor.Name 'MyLayOut.TextBorder = Label1.BorderStyle
'MyLayOut.FormLeft = Me.Left 'MyLayOut.FormTop = Me.Top 'MyLayOut.FormWidth = Me.Width 'MyLayOut.FormHeight = Me.Height ''MyLayOut.FormMoveAmount = "" 'MyLayOut.FormColor = Me.BackColor.Name 'MyLayOut.FormBorder = Me.FormBorderStyle
'MyLayOut.OpacityLevel = Me.Opacity 'MyLayOut.TransparencyColor = Me.TransparencyKey.Name
End Sub
Private Sub OpenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenToolStripMenuItem.Click OpenFileDialog1.ShowDialog() ReadMySettings(OpenFileDialog1.FileName) ' Dim sFile As String ' Dim aFields ' Dim b As Byte ' Dim MyColor1 As New Color
' OpenFileDialog1.ShowDialog() ' sFile = System.IO.File.ReadAllText(OpenFileDialog1.FileName) ' aFields = Split(sFile, vbNewLine)
' Label1.Left = aFields(0) ' Label1.Top = aFields(1) ' Label1.Width = aFields(2) ' Label1.Height = aFields(3) ' 'lblText Movement ' Label1.Text = aFields(4) ' Label1.Font = New Font(CStr(aFields(5)), 55, FontStyle.Italic, GraphicsUnit.Point, b) ' Label1.BorderStyle = 0
' Me.Left = aFields(7) ' Me.Top = aFields(8) ' Me.Width = aFields(9) ' Me.Height = aFields(10) ' 'Me Movement ' 'Me.BackColor = aFields(11) ' Me.FormBorderStyle = aFields(12)
' Me.Opacity = aFields(13) ' 'Me.TransparencyKey = aFields(14) ' If aFields(15) <> "" Then ' ' Me.BackgroundImage = aFields(15) ' End If ' MyColor1.FromArgb(aFields(16), aFields(17), aFields(18), aFields(19)) ' Label1.ForeColor = MyColor1 End Sub Private Sub ReadMySettings(ByVal sPathFile As String)
'Dim sPathFile As String = Application.StartupPath & "MyData.txt" Dim aContents Dim sFileName As String aContents = IO.File.ReadAllText(sPathFile).Split(vbNewLine)
Me.Left = aContents(0) Me.Top = aContents(1) Me.Width = aContents(2) Me.Height = aContents(3)
Me.BackColor = Color.FromArgb(aContents(4), aContents(5), aContents(6), aContents(7)) Me.TransparencyKey = Color.FromArgb(aContents(8), aContents(9), aContents(10), aContents(11))
Label1.BackColor = Color.FromArgb(aContents(12), aContents(13), aContents(14), aContents(15)) Label1.ForeColor = Color.FromArgb(aContents(16), aContents(17), aContents(18), aContents(19)) Label1.Left = aContents(20) Label1.Top = aContents(21) Label1.Text = aContents(22) Label1.Font = New Font(CStr(aContents(23)), CSng(aContents(24)), CLng(aContents(25)), CLng(aContents(26)), CByte(aContents(27))) Label1.AutoSize = True 'Me.BackgroundImage = System.Drawing.Image.FromFile(aContents(28)) 'sFileName = CStr(aContents(28)) 'Dim aSplit 'Dim aSplit2 'aSplit = Split(sFileName, ":") 'aSplit2 = Split(aSplit(1), "S")
'sFileName = Replace(aContents(28), aSplit2(0), "\") 'MsgBox(sFileName) 'MsgBox("\") Dim aSplit aSplit = Split(aContents(28), "C") MsgBox(aSplit(0)) sFileName = "C" & aSplit(1) MsgBox("a" & aContents(28))
Me.BackgroundImage = System.Drawing.Image.FromFile(sFileName) MsgBox("Finished", MsgBoxStyle.Information) End Sub Private Sub SaveMySettings(ByVal sPathFileName As String)
'Dim sPathFile As String = Application.StartupPath & "MyData.txt" Dim sContents As String
sContents = Me.Left & vbNewLine sContents = sContents & Me.Top & vbNewLine sContents = sContents & Me.Width & vbNewLine sContents = sContents & Me.Height & vbNewLine
sContents = sContents & Me.BackColor.A & vbNewLine sContents = sContents & Me.BackColor.R & vbNewLine sContents = sContents & Me.BackColor.G & vbNewLine sContents = sContents & Me.BackColor.B & vbNewLine
sContents = sContents & Me.TransparencyKey.A & vbNewLine sContents = sContents & Me.TransparencyKey.R & vbNewLine sContents = sContents & Me.TransparencyKey.G & vbNewLine sContents = sContents & Me.TransparencyKey.B & vbNewLine
sContents = sContents & Label1.BackColor.A & vbNewLine sContents = sContents & Label1.BackColor.R & vbNewLine sContents = sContents & Label1.BackColor.G & vbNewLine sContents = sContents & Label1.BackColor.B & vbNewLine
sContents = sContents & Label1.ForeColor.A & vbNewLine sContents = sContents & Label1.ForeColor.R & vbNewLine sContents = sContents & Label1.ForeColor.G & vbNewLine sContents = sContents & Label1.ForeColor.B & vbNewLine
sContents = sContents & Label1.Left & vbNewLine sContents = sContents & Label1.Top & vbNewLine sContents = sContents & Label1.Text & vbNewLine
sContents = sContents & Label1.Font.Name & vbNewLine sContents = sContents & Label1.Font.Size & vbNewLine sContents = sContents & Label1.Font.Style & vbNewLine sContents = sContents & Label1.Font.Unit & vbNewLine sContents = sContents & Label1.Font.GdiCharSet & vbNewLine sContents = sContents & MyLayOut.PictureFileName
IO.File.WriteAllText(sPathFileName, sContents, System.Text.Encoding.Unicode)
MsgBox("Saved", MsgBoxStyle.Information) End SubEnd Class

Layout application: Simplify saving and retriving settings

These two function simplify saving and retriving settings for the Layout application.
You will need to add the code for the picture filename.


Private Sub ReadMySettings()

Dim sPathFile As String = Application.StartupPath & "MyData.txt"
Dim aContents

aContents = IO.File.ReadAllText(sPathFile).Split(vbNewLine)

Me.Left = aContents(0)
Me.Top = aContents(1)
Me.Width = aContents(2)
Me.Height = aContents(3)

Me.BackColor = Color.FromArgb(aContents(4), aContents(5), aContents(6), aContents(7))
Me.TransparencyKey = Color.FromArgb(aContents(8), aContents(9), aContents(10), aContents(11))

Label1.BackColor = Color.FromArgb(aContents(12), aContents(13), aContents(14), aContents(15))
Label1.ForeColor = Color.FromArgb(aContents(16), aContents(17), aContents(18), aContents(19))
Label1.Left = aContents(20)
Label1.Top = aContents(21)
Label1.Text = aContents(22)
Label1.Font = New Font(CStr(aContents(23)), CSng(aContents(24)), CLng(aContents(25)), CLng(aContents(26)), CByte(aContents(27)))
Label1.AutoSize = True

MsgBox("Finished", MsgBoxStyle.Information)

End Sub
Private Sub SaveMySettings()

Dim sPathFile As String = Application.StartupPath & "MyData.txt"
Dim sContents As String

sContents = Me.Left & vbNewLine
sContents = sContents & Me.Top & vbNewLine
sContents = sContents & Me.Width & vbNewLine
sContents = sContents & Me.Height & vbNewLine

sContents = sContents & Me.BackColor.A & vbNewLine
sContents = sContents & Me.BackColor.R & vbNewLine
sContents = sContents & Me.BackColor.G & vbNewLine
sContents = sContents & Me.BackColor.B & vbNewLine

sContents = sContents & Me.TransparencyKey.A & vbNewLine
sContents = sContents & Me.TransparencyKey.R & vbNewLine
sContents = sContents & Me.TransparencyKey.G & vbNewLine
sContents = sContents & Me.TransparencyKey.B & vbNewLine

sContents = sContents & Label1.BackColor.A & vbNewLine
sContents = sContents & Label1.BackColor.R & vbNewLine
sContents = sContents & Label1.BackColor.G & vbNewLine
sContents = sContents & Label1.BackColor.B & vbNewLine

sContents = sContents & Label1.ForeColor.A & vbNewLine
sContents = sContents & Label1.ForeColor.R & vbNewLine
sContents = sContents & Label1.ForeColor.G & vbNewLine
sContents = sContents & Label1.ForeColor.B & vbNewLine

sContents = sContents & Label1.Left & vbNewLine
sContents = sContents & Label1.Top & vbNewLine
sContents = sContents & Label1.Text & vbNewLine

sContents = sContents & Label1.Font.Name & vbNewLine
sContents = sContents & Label1.Font.Size & vbNewLine
sContents = sContents & Label1.Font.Style & vbNewLine
sContents = sContents & Label1.Font.Unit & vbNewLine
sContents = sContents & Label1.Font.GdiCharSet & vbNewLine

IO.File.WriteAllText(sPathFile, sContents)

MsgBox("Saved", MsgBoxStyle.Information)
End Sub

Window Application

Lily Baik

Public Class Form1
Private Structure Layoutsettings
Dim PictureFileName As String
Dim TextHeight As String
Dim TextWidth As String
Dim TextTop As String
Dim TextLeft As String
Dim TextMoveAmount As String
Dim TextText As String
Dim TextFont As String
Dim TextColor
Dim TextBorder As String
Dim FormLeft As String
Dim FormTop As String
Dim FormWidth As String
Dim FormHeight As String
Dim FormMoveAmount As String
Dim FormColor
Dim FormBorder As String
Dim OpacityLevel As String
Dim TransparencyColor
Dim PicturePathFile As String
Dim MyCurrentSettingFile As String
End Structure
Private mylayout As New Layoutsettings

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
Select Case e.KeyCode
Case Keys.Down
If e.Control = True Then
Label1.Top = (Label1.Top + 10)
Else : Me.Opacity = Me.Opacity - 0.1
End If
Case Keys.Up
If e.Control = True Then
Label1.Top = Label1.Top - 10
Else
Me.Opacity = Me.Opacity + 0.1
End If
Case Keys.Left
If e.Control = True Then
Label1.Left = Label1.Left - 10
End If
Case Keys.Right
If e.Control = True Then
Label1.Left = Label1.Left + 10
End If
End Select
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Label1.BorderStyle = BorderStyle.None
Me.BackColor = Color.White
Me.KeyPreview = True
End Sub
Private Sub FontToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FontToolStripMenuItem.Click
FontDialog1.ShowDialog()
Label1.Font = FontDialog1.Font
End Sub
Private Sub FontColorToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FontColorToolStripMenuItem.Click
ColorDialog1.ShowDialog()
Label1.ForeColor = ColorDialog1.Color
End Sub
Private Sub SolidToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SolidToolStripMenuItem.Click
Label1.BorderStyle = BorderStyle.FixedSingle
End Sub
Private Sub NoneToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NoneToolStripMenuItem.Click
Label1.BorderStyle = BorderStyle.None
End Sub
Private Sub SolidToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SolidToolStripMenuItem1.Click
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Sizable
End Sub
Private Sub NoneToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NoneToolStripMenuItem1.Click
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
End Sub
Private Sub TransparencyColorToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TransparencyColorToolStripMenuItem.Click
ColorDialog1.ShowDialog()
Me.TransparencyKey = ColorDialog1.Color
End Sub
Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk
End Sub
Private Sub LoadpictureToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LoadpictureToolStripMenuItem.Click
OpenFileDialog1.ShowDialog()
mylayout.PictureFileName = OpenFileDialog1.FileName
Me.BackgroundImage = System.Drawing.Image.FromFile(mylayout.PictureFileName)
End Sub
Private Sub NewToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NewToolStripMenuItem1.Click
Dim oForm As New Form1
oForm.Show()
End Sub
'Private Sub SaveToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveToolStripMenuItem.Click
' mylayout.TextLeft = Label1.Left
' mylayout.TextTop = Label1.Top
' mylayout.TextWidth = Label1.Width
' mylayout.TextHeight = Label1.Height
' SaveFileDialog1.ShowDialog()
' mylayout.MyCurrentSettingFile = SaveFileDialog1.FileName

'End Sub.
Private Sub SaveToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveToolStripMenuItem.Click
SaveFileDialog1.ShowDialog()
mylayout.MyCurrentSettingFile = SaveFileDialog1.FileName()
mylayout.TextLeft = Label1.Left
mylayout.TextTop = Label1.Top
mylayout.TextWidth = Label1.Width
mylayout.TextHeight = Label1.Height
mylayout.TextMoveAmount = ""
mylayout.TextText = Label1.Text
mylayout.TextFont = Label1.Font.Name
mylayout.TextColor = Label1.ForeColor
mylayout.TextBorder = Label1.BorderStyle
mylayout.FormLeft = Me.Left
mylayout.FormTop = Me.Top
mylayout.FormWidth = Me.Width
mylayout.FormHeight = Me.Height
mylayout.FormMoveAmount = ""
mylayout.FormColor = Me.BackColor
mylayout.FormBorder = Me.FormBorderStyle
mylayout.OpacityLevel = Me.Opacity
mylayout.TransparencyColor = Me.TransparencyKey
mylayout.PicturePathFile=Me.BackgroundImage.
If mylayout.MyCurrentSettingFile <> "" Then
IO.File.WriteAllText(mylayout.MyCurrentSettingFile, Label1.Text & mylayout.TextWidth & mylayout.TextTop & mylayout.TextLeft & mylayout.TextHeight & mylayout.PictureFileName)
End If
End Sub
Private Sub MoveAmountToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MoveAmountToolStripMenuItem.Click
End Sub
End Class

setting and getting a color object

'setting a color object using Alpha, Red, Blue, Green arguments
Label1.BackColor = Color.FromArgb(255, 212, 11, 123)

'getting a color object Alpha, Red, Blue, Green arguments
Dim MyColor As Color = Color.FromArgb(255, 212, 11, 123)
Me.TransparencyKey = MyColor

DianaJung

http://rapidshare.com/files/32873424/project_________.zip.html

This conversion is written in Visual Basic .net.
Yoou wil need .Net2.0 to run this program^^

http://www.microsoft.com/downloads/details.aspx?FamilyID=0856EACB-4362-4B0D-8EDD-AAB15C5E04F5&displaylang=en

Converter

Written using Visual Basic .net.

You will need .NET 2.0 to run the program.

"Converter" only works in a windows computer.

If you have .NET, download "Converter.zip" only

Converter:
http://rapidshare.com/files/32873945/Converter.zip.html

If the program doesn't work, try downloading .NET 2.0 from microsoft.NET Framework 2.0: http://www.microsoft.com/downloads/details.aspx?FamilyID=0856EACB-4362-4B0D-8EDD-AAB15C5E04F5&displaylang=en By John Cho

joanna lee

http://rapidshare.com/files/32873470/conversion2.zip.html
made by
-joanna lee

"conversion"

this program will only work in a windows computer
if the program doesn't work,
then try downloading .net2 from microsoft

http://www.microsoft.com/downloads/details.aspx?FamilyID=0856EACB-4362-4B0D-8EDD-AAB15C5E04F5&displaylang=en

Exchanging Machine

Written using Visual Basic .net.

You will need .NET 2.0 to run the program.

Exchange Machine.exe at: https://ssl.rapidshare.com/cgi-bin/collectorszone.cgi?savedfiles=1&forbiddenfiles=0

.Net 2.0 :http://www.microsoft.com/downloads/details.aspx?FamilyID=0856EACB-4362-4B0D-8EDD-AAB15C5E04F5&displaylang=en

By Jacky Chen

Conversion Tool

Written using Visual Basic .net.
You will need .NET 2.0 to run the program.

Download Program
Download .NET Framework 2.0 from Microsoft


- by. Minsung