|
Hi!
I need to make reverse engineering on an exe file which is written in VB. I tried VB Decompiler Lite V7.7, vbReFormer(free version) and VbRezQ however they just decompiled the code into native code. what I need to the is get the code in VB is it possible? do you any recommendation about a new tool ?
Thanks!!!
|
|
|
|
|
If you are after a VB.NET decompiler I would suggest Lutz Roder's .NET Reflector. I believe it is available via the Red Hat website.
Steve Jowett
-------------------------
Real programmers don't comment their code. If it was hard to write, it should be hard to read.
|
|
|
|
|
Yes. I also tried it but it doesn't decompile because it complains that CLI header does not exist in the file. Because native applications does not have CLI header.
|
|
|
|
|
The program was written in vb.net or vb6?
|
|
|
|
|
I am not sure but when I decompiled with VB Decompiler Lite V7.7 version is stated as 5. as I pasted to below.
VERSION 5.00
Begin VB.Form Form8
Caption = "HLBP"
ScaleMode = 1
AutoRedraw = False
FontTransparent = True
BorderStyle = 1 'Fixed Single
'Icon = n/a
LinkTopic = "Form8"
MaxButton = 0 'False
MinButton = 0 'False
Visible = 0 'False
ClientLeft = 3585
ClientTop = 2385
ClientWidth = 7875
ClientHeight = 5295
|
|
|
|
|
You can't use the .NET tools to decompile this application. If it was compiled as P-code, then you might have success with this[^] decompiler. If it's compiled to native format, then you're out on your own - you cannot decompile a native executable.
You could disassemble it, but that would probably cost ten times as much as a complete rewrite from scratch.
As a sidenote; people don't like the idea of other people looking at and using their source-code. They usually put a lot of effort into writing it, and some may choose to use extra safety-precautions like obfuscation. There's a lot of money in protecting executables from what you're trying to do 
I are Troll
|
|
|
|
|
How can I decide whether code is compiled as P-code or native code? I could only get the native code of the exe file like
Private Sub Txtsex_Change() '46B130
0046B130: push ebp
0046B131: mov ebp, esp
0046B133: sub esp, 0000000Ch
0046B136: push 00402746h ; MSVBVM60.DLL.__vbaExceptHandler
0046B13B: mov eax, fs:[00h]
0046B141: push eax....
moreover I could not open your link. Is it broken?
|
|
|
|
|
I have missed to say that I am completely same side nobody wants to decompilation of their code but I have to do this for my graduation project
|
|
|
|
|
hande54 wrote: but I have to do this for my graduation project
In that case, do you want a compiled executable (in VB) with it's source? You'd still have to decompile it to graduate, but at least you'd have the original source to verify your results against 
You also wouldn't need the link to the decompiler, since that would be cheating. In case you still want it, it's not broken[^].
I are Troll
|
|
|
|
|
That looks like native Intel (x86) machine code to me. I don't think it will be an easy task to convert it to any form of Visual Basic unless you are a compiler writer.
|
|
|
|
|
Hi. I'm using the following code to send an email via SMTP with an attachment.
This code works fine without the lines in CAPS; However, when I include these lines I get a file not found error, despite the fact that the file exists in the right path with the right name.
The exact error message is: Could not find file
If I look at the detail of the error, for some reason it lists the file with full pathname twice.
I've tried it in C:\ and in the \bin\Debug folder, which is the default when just the filename is given.
Has anyone experienced this? Any suggestions? Thanks
Imports System.Net.Mail
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim mm As New Net.Mail.MailMessage("sender@email.org", "addressee@gmail.com")
Dim attachment As New System.Net.Mail.Attachment("text.xls")
mm.Body = "This is a test of the SMTP server."
mm.Subject = "Test"
Dim client As New Net.Mail.SmtpClient("smtp.gmail.com")
client.Send(mm)
End Sub
End Class
|
|
|
|
|
Check the code that you have posted!
There are no lines in CAPS. So unless a real expert comes along, you have little chance of an answer.
Henry Minute
Do not read medical books! You could die of a misprint. - Mark Twain
Girl: (staring) "Why do you need an icy cucumber?"
“I want to report a fraud. The government is lying to us all.”
|
|
|
|
|
Dhruva Hein wrote: Dim attachment As New System.Net.Mail.Attachment("text.xls")
First, are you sure that's the filename?? Or was it supposed to be "test.xls"?
Next, instead of the filename only, build and use a fully qualified path to the file. This will eliminate the "assumption" of what the "current directory" is and most likely, solve your problem.
|
|
|
|
|
Duh! Thanks, guys! The only excuse I can claim is that I had a fever when I "wrote" that code.
Programming today is a race between software engineers striving to build bigger and better idiot-proof programs, and the Universe trying to produce bigger and better idiots. So far, the Universe is winning.
|
|
|
|
|
Hi,
When the user starts to enter into the richTextbox, I want to get the data's in UPPER Case format.
So any better ideas?
Thanks
|
|
|
|
|
Dim test As New TextBox
test.Text = "woo"
Dim s As String
s = test.Text.ToUpper()
Or am I missing what you intended to do?
|
|
|
|
|
and where would you suggest to put that snippet? in the TextChanged event? it would mean all of the text would be replaces on every keystroke, not really efficient I would say (an RTB can contain lots of text, not saying it should though). I'd rather manipulate the new character on entry, maybe through KeyPressEventArgs.KeyChar
Luc Pattyn
I only read code that is properly indented, and rendered in a non-proportional font; hint: use PRE tags in forum messages
Local announcement (Antwerp region): Lange Wapper? Neen!
|
|
|
|
|
I didn't know it was as the keys where pressed, I thought it was for a button press to validate text or use the contents of the textbox at some other point in time, my mistake.
|
|
|
|
|
Are you trying to capture each keystroke and re-write the character if it needs to be upper case ? It can be done, but just uppercase the text after the user has completed entering in the data and use the logic given by ElloitA.
|
|
|
|
|
TextBox has CharacterCasing property which seems missing in the RichTextBox. Hence, you will need to handle the KeyPress event and convert the pressed key character to uppercase.
It's not necessary to be so stupid, either, but people manage it. - Christian Graus, 2009 AD
|
|
|
|
|
Hi,
can anyone one guide me on this issue? can't seem to find a solution the web.
Dim cReport as reportdocument
cReport = new reportdocument()
cReport.Load("c:\report.rpt") 'this line causes load report failed
cReportViewer.reportsource=cReport
creportViewer.refresh()
When i comment the loading part, I get invalid report source
thanks for your help
|
|
|
|
|
Hmm ...
Those are the steps I use to load my Crystal reports.
Silly question, "Are you sure the report is stored on the root ?"
(C:\report.rpt)
|
|
|
|
|
|
Now I got it load but no data showing..any idea
|
|
|
|
|
You have to set a few other properties in addition to the report file path. These are the codes I use...
<br />
Private Sub loadReport()<br />
<br />
'Prepare to read data<br />
Dim ta As New DSHelpDeskLiteTableAdapters.HLPCases_VW_ListReportTableAdapter<br />
Dim dt As DSHelpDeskLite.HLPCases_VW_ListReportDataTable<br />
<br />
'Read data<br />
dt = ta.GetData()<br />
<br />
'Verify the path to the Crystal Report's .RPT file:<br />
Dim strReportPath As String = HostingEnvironment.ApplicationPhysicalPath & "DesktopModules\HelpDeskLite\Reports\" & REPORTNAME & ".rpt"<br />
Label1.Text = strReportPath<br />
<br />
If Not IO.File.Exists(strReportPath) Then<br />
Throw (New Exception("Unable to locate report file:" & _<br />
vbCrLf & strReportPath))<br />
End If<br />
<br />
'Load the Crystal report's .RPT file and pass in the DataTable:<br />
<br />
Dim cr As New ReportDocument<br />
<br />
cr.SetDatabaseLogon("userid", "password", "server", "database")<br />
cr.Load(strReportPath)<br />
cr.SetDataSource(dt.DataSet)<br />
<br />
<br />
'Set the CrystalReportViewer's appearance and set the ReportSource:<br />
<br />
CrystalReportViewer1.ReportSource = cr<br />
<br />
End Sub<br />
Regards,
flameater
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
