You are viewing our Forum Archives. To view or take place in current topics click here.
Importing application information [Source]
Posted:
Importing application information [Source]Posted:
Status: Offline
Joined: Jul 08, 201212Year Member
Posts: 68
Reputation Power: 2
Status: Offline
Joined: Jul 08, 201212Year Member
Posts: 68
Reputation Power: 2
Knocked this up quickly as I saw the Icon Extractor thing and thought this may be of use to somebody.
Some users requested before, that I try and make it more readable... so I tried a little harder (Even though I prefer it being condensed...)
Make 8 Textboxes.
Name The textboxes this (note the numbers refer to the textbox numbers, e.g, Textbox1 = 1, Textbox2 = 2)
1 = title
2 = description
3 = company
4 = product
5 = copyright
6 = trademark
7 = version1
8 = assemblyver
Make a button called import and add this code
Simple stuff, but can come in quite handy.
Some users requested before, that I try and make it more readable... so I tried a little harder (Even though I prefer it being condensed...)
Make 8 Textboxes.
Name The textboxes this (note the numbers refer to the textbox numbers, e.g, Textbox1 = 1, Textbox2 = 2)
1 = title
2 = description
3 = company
4 = product
5 = copyright
6 = trademark
7 = version1
8 = assemblyver
Make a button called import and add this code
Using Ofd As New OpenFileDialog
Ofd.FileName = "*.exe"
Ofd.Filter = "Executable Files (*.exe)|*.exe"
If Ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim info As FileVersionInfo = FileVersionInfo.GetVersionInfo(ofd.FileName)
title.Text = info.ProductName
description.Text = info.FileDescription
company.Text = info.CompanyName
product.Text = info.ProductName
copyright.Text = info.LegalCopyright
trademark.Text = info.LegalTrademarks
version1.Text = info.ProductVersion
assemblyver.Text = info.FileVersion
End If
End Using
Simple stuff, but can come in quite handy.
#2. Posted:
Status: Offline
Joined: Jul 08, 201212Year Member
Posts: 68
Reputation Power: 2
Status: Offline
Joined: Jul 08, 201212Year Member
Posts: 68
Reputation Power: 2
Surprised nobody even commented...
- 0useful
- 0not useful
#3. Posted:
Status: Offline
Joined: Apr 16, 201014Year Member
Posts: 4,309
Reputation Power: 179
This is pretty cool but useless just the same, nice job for posting it still
- 0useful
- 0not useful
You are viewing our Forum Archives. To view or take place in current topics click here.