SMS Sender - 100%ig kosteloses SMS Senden!

1. offizieller Beitrag
    • Offizieller Beitrag

    Kleines Changlog siehe unten

    Hallo :)

    So diesmal hab ich ausnahmsweise mal ein nützliches tool geschrieben =) Mit diesem tool kann man 100ig umsonst smse versenden, weltweit! Ich benutze http://www.smsgott.de dafür, und das hab ich einfach "nur" automatiesiert..War doch recht kompliziert das programm zu schreiben, weil der sourcecode der html&php&java seiten doch recht.. naja unübersichtlich sind^^ Ihr müsst lediglich nur die handy nummer eingeben ( sie muss entweder so 0049171123123 oder so +49171123123 ausehen, nicht 0171123123!) und den text den ihr versenden möchtet (bis zu 160 Zeichen) Dann macht er alles automatisch. Ihr müsst am schluss nurnoch ein captcha Code eingeben, also einfach das was auf einem Bild steht müsst ihr in eine inputbox schreiben!

    So nun viel spaß damit. Ihr hab es ausprobiert und bei mir sind weder nebenkosten sonst noch iwas dummes aufgefallen!

    WICHTIG: Lest euch voher die AGBS durch, ich hafte nicht für eventuelle schäden! Auch wenn ich es 3 tage lang ausprobiert hab und mir nix aufgefallen ist was iwie illegal sein könnte lest sie euch bitte durch!

    So Lang genug geredet ;) Hier das Programm, die exe und au3 ist im anhang!

    Spoiler anzeigen
    [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=cell.ico
    #AutoIt3Wrapper_outfile=SMSSender.exe
    #AutoIt3Wrapper_Compression=4
    #AutoIt3Wrapper_Res_Comment=-
    #AutoIt3Wrapper_Res_Description=Sending a SMS to a Mobilephone
    #AutoIt3Wrapper_Res_Fileversion=2.0.0.0
    #AutoIt3Wrapper_Res_LegalCopyright=GtaSpider
    #AutoIt3Wrapper_Res_Language=1031
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    ;==============================================================
    ;========================Script by GtaSpider========================
    ;==========================Standart Editon=========================
    ;==============================================================
    ;Very much thanks to lod3n for examples & PaulIA for the A3LGDIPlus.au3

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    #region Initalizing
    #include <A3LGDIPlus.au3> ; Wird für das PNG bild gebraucht!
    #include <GuiCombo.au3>
    #Include <File.au3>
    #include <Array.au3>
    #include <ie.au3>
    #include <GUIConstants.au3>
    #include <inet.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Opt("TrayIconDebug", 1)
    HotKeySet("{ESC}", "ProbExit")
    HotKeySet("{TAB}", "ProbContrSwitch")

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    _GDIP_Startup ()

    [/autoit] [autoit][/autoit] [autoit]

    $pngSrcNok = @ScriptDir & "\pics\nok.png"
    $hImageNok = _GDIP_ImageLoadFromFile ($pngSrcNok)
    $hWidthNok = _GDIP_ImageGetWidth ($hImageNok)
    $hHeightNok = _GDIP_ImageGetHeight ($hImageNok)

    [/autoit] [autoit][/autoit] [autoit]

    $pngSrcAero = @ScriptDir & "\pics\aero2.png"
    $hImageAero = _GDIP_ImageLoadFromFile ($pngSrcAero)
    $hWidthAero = _GDIP_ImageGetWidth ($hImageAero)
    $hHeightAero = _GDIP_ImageGetHeight ($hImageAero)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Global Const $AC_SRC_ALPHA = 1
    Global Const $ULW_ALPHA = 2

    [/autoit] [autoit][/autoit] [autoit]

    Global $IDList[12], $controlGui, $maingui, $hImageNok
    $IDList[0] = '2'
    $IDList[1] = '31'
    $IDList[2] = '32'
    $IDList[3] = '33'
    $IDList[4] = '34'
    $IDList[5] = '54'
    $IDList[6] = '70'
    $IDList[7] = '78'
    $IDList[8] = '85'
    $IDList[9] = '141'
    $IDList[10] = '201'
    $IDList[11] = '144';standart server

    [/autoit] [autoit][/autoit] [autoit]

    #endregion Initalizing

    [/autoit] [autoit][/autoit] [autoit]

    #region OnlineGUI
    $onlinegui = GUICreate("Server list", $hWidthAero, $hHeightAero, -1, -1, $WS_POPUP + $WS_TABSTOP, $WS_EX_LAYERED)
    $controlonGui = GUICreate("ctrl", $hWidthAero, $hHeightAero, 0, -20, $WS_POPUP + $WS_TABSTOP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $onlinegui)
    GUICtrlCreatePic(@ScriptDir & "\pics\grey.gif", 0, 0, $hWidthNok, $hHeightNok)
    GUICtrlSetState(-1, $GUI_DISABLE)

    [/autoit] [autoit][/autoit] [autoit]

    $OnlCombo = GUICtrlCreateCombo("Server " & $IDList[11] & " (Default)", 8, 8, 200, 20)
    For $i = 0 To UBound($IDList) - 2
    GUICtrlSetData(-1, "Server " & $IDList[$i])
    Next

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $RadioTop = 8
    $RadioLeft = 8
    SetBitmap($onlinegui, $hImageAero, 0)
    GUIRegisterMsg($WM_NCHITTEST, "WM_NCHITTEST")
    GUISetState(@SW_SHOW, $onlinegui)
    GUISetState(@SW_SHOW, $controlonGui)
    For $i = 0 To 255 Step 10
    SetBitmap($onlinegui, $hImageAero, $i)
    Next
    SetBitmap($onlinegui, $hImageAero, 255)

    [/autoit] [autoit][/autoit] [autoit]

    $nextbut = GUICtrlCreateButton("> > N e x t > >", 8, 35, 200, 25, $BS_DEFPUSHBUTTON)
    GUISetState()

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $nextbut
    $tmp = GUICtrlRead($OnlCombo)
    $tmp = StringRegExpReplace($tmp, '\D', '')
    If (Not StringLen($tmp)) Or _INetGetSource('http://www.smsgott.de/?id=' & $tmp & '&a=p_f&track=false') = 'Free SMS tempor&auml;r wegen Wartungsarbeiten nicht verf&uuml;gbar.' Then
    MsgBox(48,"Error","Wrong Server ID!")
    ContinueLoop
    EndIf
    GUIDelete($onlinegui)
    GUIDelete($controlonGui)
    ExitLoop
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    #endregion OnlineGUI

    [/autoit] [autoit][/autoit] [autoit]

    #region Globals
    Global $CellularNumber = '+49'
    Global $Message = ""
    Global $ID = $tmp
    Global $ExitLoop = 0
    Global $oIE = _IECreateEmbedded()
    #endregion

    [/autoit] [autoit][/autoit] [autoit]

    #region - Cmdline
    If $CMDLINE[0] > 2 Then
    Global $CellularNumber = $CMDLINE[1]
    Global $Message = $CMDLINE[2]
    Global $ID = $IDList[$CMDLINE[3]]
    EndIf
    #endregion

    [/autoit] [autoit][/autoit] [autoit]

    #region WaitGUI

    [/autoit] [autoit][/autoit] [autoit]

    $waitgui = GUICreate("", $hWidthAero, $hHeightAero, -1, -1, $WS_POPUP + $WS_TABSTOP, $WS_EX_LAYERED+$WS_EX_TOOLWINDOW)

    [/autoit] [autoit][/autoit] [autoit]

    $controlwaGui = GUICreate("ctrl", $hWidthAero, $hHeightAero, 0, -20, $WS_POPUP + $WS_TABSTOP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $waitgui)
    GUICtrlCreatePic(@ScriptDir & "\pics\grey.gif", 0, 0, $hWidthNok, $hHeightNok)
    GUICtrlSetState(-1, $GUI_DISABLE)
    GUICtrlCreateLabel("Please wait while connect to SMS Gateway...", 4, 12, 210, 66, $SS_CENTER)
    GUICtrlSetBkColor(-1, -2)
    GUICtrlSetFont(-1, 14)
    GUICtrlSetColor(-1, 0xffffff)
    SetBitmap($waitgui, $hImageAero, 255)
    GUIRegisterMsg($WM_NCHITTEST, "WM_NCHITTEST")

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    #endregion WaitGUI
    #region captchagui
    $wgpProg = WinGetPos('Program Manager')
    $ScreenyWindow = GUICreate("", $wgpProg[2], $wgpProg[3], $wgpProg[0], $wgpProg[1], $WS_POPUP, $WS_EX_TOPMOST)
    GUISetBkColor(0)
    WinSetTrans($ScreenyWindow, "", 155)

    [/autoit] [autoit][/autoit] [autoit]

    $captchagui = GUICreate("", 160, 47, -1, -1, -1, -1, $ScreenyWindow)
    GUISetBkColor(0)
    GUICtrlCreateLabel("Please enter the code:", 2, 2, 156, 15)
    GUICtrlSetColor(-1, 0xffffff)
    $inpCode = GUICtrlCreateInput("", 105, 17, 52, 25, $ES_UPPERCASE)
    GUICtrlSetLimit(-1, 4)
    $childgui = GUICreate("", 96, 21, 2, 17, $WS_CHILD, -1, $captchagui)
    GUISetBkColor(0)
    GUICtrlCreateObj($oIE, -188, -36, 100 + 188, 25 + 36)
    #endregion captchagui

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    #region maingui
    $maingui = GUICreate("SMS Sender", $hWidthNok, $hHeightNok, -1, -1, $WS_POPUP + $WS_TABSTOP, $WS_EX_LAYERED)

    [/autoit] [autoit][/autoit] [autoit]

    $controlGui = GUICreate("ctrl", $hWidthNok, $hHeightNok, 0, 0, $WS_POPUP + $WS_TABSTOP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $maingui)

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreatePic(@ScriptDir & "\pics\grey.gif", 0, 0, $hWidthNok, $hHeightNok)
    GUICtrlSetState(-1, $GUI_DISABLE)

    [/autoit] [autoit][/autoit] [autoit]

    $inpcell = GUICtrlCreateInput($CellularNumber, 100, 218, 245, 40, $WS_TABSTOP, 0)
    GUICtrlSetResizing(-1, 802)
    GUICtrlSetBkColor(-1, 0xE8E8E8)
    GUICtrlSetFont(-1, 14)
    $edit = GUICtrlCreateEdit($Message, 100, 288, 245, 145, $ES_AUTOVSCROLL, 0)
    GUICtrlSetResizing(-1, 802)
    GUICtrlSetLimit(-1, 147)
    GUICtrlSetBkColor(-1, 0xE8E8E8)
    GUICtrlSetFont(-1, 14)
    $prog = GUICtrlCreateProgress(90, 165, 260, 20, 0)
    GUICtrlSetResizing(-1, 802)
    GUICtrlSetState(-1, $GUI_HIDE)
    $conbut = GUICtrlCreateButton("Send at Server " & $ID, 90, 165, 260, 20, 0)
    GUICtrlSetResizing(-1, 802)

    [/autoit] [autoit][/autoit] [autoit]

    SetBitmap($maingui, $hImageNok, 0)

    [/autoit] [autoit][/autoit] [autoit]

    GUIRegisterMsg($WM_NCHITTEST, "WM_NCHITTEST")
    GUISetState(@SW_SHOW, $maingui)
    GUISetState(@SW_SHOW, $controlGui)

    [/autoit] [autoit][/autoit] [autoit]

    For $i = 0 To 255 Step 10
    SetBitmap($maingui, $hImageNok, $i)
    Next
    SetBitmap($maingui, $hImageNok, 255)
    #endregion maingui

    [/autoit] [autoit][/autoit] [autoit]

    #region MainWhile
    While 1
    GUICtrlSetData($conbut, 'Send at Server ' & $ID)
    GUICtrlSetState($inpcell, $GUI_ENABLE)
    GUICtrlSetState($edit, $GUI_ENABLE)
    GUICtrlSetState($prog, $GUI_HIDE)
    GUICtrlSetState($conbut, $GUI_SHOW)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $conbut
    $CellularNumber = GUICtrlRead($inpcell)
    $Message = GUICtrlRead($edit)
    GUICtrlSetState($prog, $GUI_SHOW)
    GUICtrlSetState($conbut, $GUI_HIDE)
    GUICtrlSetState($inpcell, $GUI_DISABLE)
    GUICtrlSetState($edit, $GUI_DISABLE)
    _SendSMS($CellularNumber, $Message)
    $error = @error
    ExitLoop
    EndSwitch
    WEnd
    If $error Then
    MsgBox(48, "SMS Sender - By GtaSpider", "Wrong Mobile Phone Number! Error Code: " & @error)
    ContinueLoop
    EndIf
    GUISetState(@SW_SHOW, $ScreenyWindow)
    GUISetState(@SW_SHOW, $captchagui)
    GUISetState(@SW_SHOW, $childgui)
    WinSetOnTop($captchagui, "", 1)
    GUICtrlSetState($inpCode, $GUI_FOCUS)
    HotKeySet("{ENTER}", "_EnterCode")
    While GUIGetMsg() <> $GUI_EVENT_CLOSE
    If $ExitLoop Then ExitLoop
    WEnd
    Exit
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Exit
    #endregion MainWhile

    [/autoit] [autoit][/autoit] [autoit]

    #region Functions

    [/autoit] [autoit][/autoit] [autoit]

    Func ProbExit()
    If WinActive($controlGui) Or WinActive($maingui) Then
    Exit
    Else
    HotKeySet("{ESC}")
    Send("{ESC}")
    HotKeySet("{ESC}", "ProbExit")
    EndIf

    EndFunc ;==>ProbExit

    [/autoit] [autoit][/autoit] [autoit]

    Func ProbContrSwitch()
    If WinActive($controlGui) Or WinActive($maingui) Then
    If ControlGetHandle($controlGui, '', ControlGetFocus($controlGui)) = ControlGetHandle($controlGui, "", $edit) Then
    GUICtrlSetState($conbut, $GUI_FOCUS)
    ElseIf ControlGetHandle($controlGui, '', ControlGetFocus($controlGui)) = ControlGetHandle($controlGui, "", $inpcell) Then
    GUICtrlSetState($edit, $GUI_FOCUS)
    ElseIf ControlGetHandle($controlGui, '', ControlGetFocus($controlGui)) = ControlGetHandle($controlGui, "", $conbut) Then
    GUICtrlSetState($inpcell, $GUI_FOCUS)
    EndIf
    Else
    HotKeySet("{TAB}")
    Send("{TAB}")
    HotKeySet("{TAB}", "ProbContrSwitch")
    Return
    EndIf
    EndFunc ;==>ProbContrSwitch

    [/autoit] [autoit][/autoit] [autoit]

    Func _SendSMS($iCelNumb, $sMessage)
    GUICtrlSetData($prog, 5)
    Local $oSmsbox, $oMess, $oNumb, $oContBut, $sReadHtml
    If StringLen($sMessage) > 147 Then Return SetError(1, 0, -1)
    $iCelNumb = StringReplace($iCelNumb, "+", "00")
    If StringLen($iCelNumb) > 15 Then Return SetError(2, 0, -1)
    If Not StringIsDigit($iCelNumb) Then Return SetError(3, 0, -1)
    _IENavigate($oIE, 'http://www.smsgott.de/?id=' & $ID & '&a=p_f&track=false')
    GUICtrlSetData($prog, 25)
    $oSmsbox = _IEFormGetObjByName($oIE, "smsbox")
    $oMess = _IEFormElementGetObjByName($oSmsbox, 'nachricht')
    $oNumb = _IEFormElementGetObjByName($oSmsbox, 'empfaenger')
    GUICtrlSetData($prog, 30)
    _IEFormElementSetValue($oMess, $sMessage)
    _IEFormElementSetValue($oNumb, $iCelNumb)
    GUICtrlSetData($prog, 35)
    For $i = 40 To 60 Step 5
    Sleep(100)
    GUICtrlSetData($prog, $i)
    Next
    _IEFormSubmit($oSmsbox)
    GUICtrlSetData($prog, 65)
    _IENavigate($oIE, 'http://www.smsgott.de/index.php?id=' & $ID & '&do=verify');http://www.smsgott.de/index.php?id=2&do=verify
    GUICtrlSetData($prog, 75)
    $oIE.document.body.scroll = "no"
    EndFunc ;==>_SendSMS

    [/autoit] [autoit][/autoit] [autoit]

    Func _EnterCode()
    If Not WinActive($captchagui) Or WinActive($childgui) Then
    HotKeySet("{ENTER}")
    Send("{ENTER}")
    HotKeySet("{ENTER}", "_EnterCode")
    Return
    EndIf
    $ExitLoop = 1
    HotKeySet("{ENTER}")
    Local $oSmsform, $oCaptcha, $sDocRead
    GUISetState(@SW_HIDE, $childgui)
    GUISetState(@SW_HIDE, $captchagui)
    GUISetState(@SW_HIDE, $ScreenyWindow)
    GUICtrlSetData($prog, 85)
    $oSmsform = _IEFormGetObjByName($oIE, "smsform")
    $oCaptcha = _IEFormElementGetObjByName($oSmsform, 'captcha')
    _IEFormElementSetValue($oCaptcha, GUICtrlRead($inpCode))
    GUICtrlSetData($prog, 95)
    GUISetState(@SW_SHOW, $waitgui)
    GUISetState(@SW_SHOW, $controlwaGui)
    _IENavigate($oIE, 'javascript:verifySMS()')
    GUISetState(@SW_HIDE, $waitgui)
    GUISetState(@SW_HIDE, $controlwaGui)
    $sDocRead = _IEBodyReadText($oIE)
    GUICtrlSetData($prog, 100)
    If StringInStr($sDocRead, 'Es ist ein Fehler beim Versenden der SMS aufgetreten!') Then
    MsgBox(16, "Error!", "We intercepted an Error by sending SMS!" & @CRLF & "Please retry it in a few minutes again.")
    ElseIf StringInStr($sDocRead, 'Bitte Sicherheitscode eingeben') Then
    If MsgBox(52, "Wrong Captcha", "Wrong Captcha (Code) entered! Retry?") = 6 Then ShellExecute(@ScriptFullPath, $CellularNumber & ' "' & $Message & '" ' & Random(0, 10))
    Exit
    Else
    MsgBox(64, "All Done", "Successfully! SMS sended @" & @HOUR & ":" & @MIN & @CRLF & "Perhaps it takes up to 1 minute to receiving the SMS...")
    EndIf
    GUICtrlSetData($inpCode, '')
    EndFunc ;==>_EnterCode

    [/autoit] [autoit][/autoit] [autoit]

    Func OnAutoItExit()
    GUIDelete($controlGui)
    ;fade out png background
    For $i = 255 To 0 Step - 10
    SetBitmap($maingui, $hImageNok, $i)
    Next
    _API_DeleteObject ($hImageNok)
    Exit
    EndFunc ;==>OnAutoItExit

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Func WM_NCHITTEST($hWnd, $iMsg, $iwParam, $ilParam)
    If ($hWnd = $maingui) And ($iMsg = $WM_NCHITTEST) Then Return $HTCAPTION
    If ($hWnd = $onlinegui) And ($iMsg = $WM_NCHITTEST) Then Return $HTCAPTION
    EndFunc ;==>WM_NCHITTEST

    [/autoit] [autoit][/autoit] [autoit]

    Func SetBitmap($hGUI, $hImageNok, $iOpacity, $hWidth = '', $hHeight = '')
    Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend
    If $hWidth = '' Then $hWidth = _GDIP_ImageGetWidth ($hImageNok)
    If $hHeight = '' Then $hHeight = _GDIP_ImageGetHeight ($hImageNok)

    [/autoit] [autoit][/autoit] [autoit]

    $hScrDC = _API_GetDC (0)
    $hMemDC = _API_CreateCompatibleDC ($hScrDC)
    $hBitmap = _GDIP_BitmapCreateHBITMAPFromBitmap ($hImageNok)
    $hOld = _API_SelectObject ($hMemDC, $hBitmap)
    $tSize = DllStructCreate($tagSIZE)
    $pSize = DllStructGetPtr($tSize)
    DllStructSetData($tSize, "X", $hWidth)
    DllStructSetData($tSize, "Y", $hHeight)
    $tSource = DllStructCreate($tagPOINT)
    $pSource = DllStructGetPtr($tSource)
    $tBlend = DllStructCreate($tagBLENDFUNCTION)
    $pBlend = DllStructGetPtr($tBlend)
    DllStructSetData($tBlend, "Alpha", $iOpacity)
    DllStructSetData($tBlend, "Format", $AC_SRC_ALPHA)
    _API_UpdateLayeredWindow ($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA)
    _API_ReleaseDC (0, $hScrDC)
    _API_SelectObject ($hMemDC, $hOld)
    _API_DeleteObject ($hBitmap)
    _API_DeleteDC ($hMemDC)
    EndFunc ;==>SetBitmap

    [/autoit] [autoit][/autoit] [autoit]

    #endregion Funcitons

    [/autoit]

    Mfg Spider

    Voher gedownloadet: 78+28+95 (201!) mal!
    Packet enthält:
    Version 2.0
    Version 2.0 exe
    Version 1.51 Alte version
    Version 1.51 Snoopy Version
    Exe icon
    Version 1.51 Standart version Compiled
    Version 1.51 Snoopy version Compiled

    Für Version 2.0 braucht ihr PaulIA's Auto3Lib UDF, aber ich hab die dateien die gebruacht werden auch in der ZIP drin!

    Ein großer dank geht an PaulIA für den GDI+ (png) Support und an lod3n für ein PNG beispiel.

    Ausserdem ein dankeschön an huggy für das Handy icon der exe ;)

    Das Desing von der version 2.0 ist von mir Selber entworfen. Das Handy war aber ein bild aus einer Werbung ;) (will jetzt aber keine Werbung für das NOKIA handy machen ;-))

    habs mir durchgelesen die AGB.


    Kurze zusammenfassung:


    *) Keine Rassistischen / sexuellen / beleidigende SMS schicken
    *) Keine Werbung schicken
    *) Kein Spam
    *) Werbung darf von smsgott.de angehängt werden @ sms


    Ansonsten 100% gratis =)

    Also das Programm ist gut, aber natürlich gibts was zu meckern

    1. Cool wäre eine Anzeige die dieZeichen darstellt also 1/160 ... 78/160, dass man halt mal so den Überblick hat

    2. Man könnte doch eigentlich auch die richtige Nummer eingeben und die Null wird dann vorne gekillt, aba vlt geht das ja auch nich, hab ja kp :D

    3.Link auf die AGB`s evt

    4. Wieso steht auf dem Button nich einfach senden, sondern Send at Server 201?

    5. man könnte ne originellere GUI machen^^ zum Bsp ne Telefontastatur oda das sie aussieht wie ein Handy oda so.....

    6. weiß nicht ob das evt nich schon drinne ist, das halt geschaut wird, ob nicht schon alle 10000 SMS an diesem Tag versand wurden

    Man man man, ich hab immer nur zu meckern, was?^^


    Aber, hey, das Programm ist an scih schon echt ganz cool :)

    Waluev

    Flensburg ist wie Payback - wenn man 18 Punkte hat bekommt man ein Fahrrad.

    Einmal editiert, zuletzt von Waluev (24. Juni 2007 um 16:21)

    • Offizieller Beitrag

    Hallo.

    Danke für die infos huggy :)

    Waluev: 1. find ich nicht notwenig, da es nur unnötig cpu last kostet..
    2. nein.. weil man die vorwahl ja nicht weiß.. 0049 is nur für de 0043 z.b. is für österreicht usw..
    3. naja, die hab ich hier ja schon hingepostet...
    4. damitman weiß auf welchem server das gesendet wird... guck doch einfach mal in sourcecode.. da die arrays ganz oben angucken...
    5. find ich auch nicht notwendig.. ich steh mehr so auf schlichtes.. hauptsache es funktionier ;)
    6. nie ist das so.. also es werden so pro tag höchstens 1000 smse versendet.. falls zuviele gesendetr wurden sagt er auch bescheid im skript...

    stimmt^^

    Danke :)

    btw: Funktioniert es bei jedem?

    Mfg Spider

    auch gleich mal getestet und eine sms an mich senden lass, die bis jetzt noch nicht angekommen ist

    - GUI ist nicht schön gestaltet
    - Angabe wie viele Zeichen man noch hat fehlt
    - das Splash, das während des kontaktierens des sms-gateways kommt nervt
    - vielleicht noch ein Menu und Hinweis, dass man beim Captcha Enter drücken muss

    sms kam immer noch net an

    Mmmh, hab ich ja auch gemeint aba Spider hat sich nur aus der Afaire gezogen, es klingt so als würde er sich rechtfertigen, man Gta es waren nur ideen und Hinweise -.-


    Waluev

    Flensburg ist wie Payback - wenn man 18 Punkte hat bekommt man ein Fahrrad.

    Hallo!
    ip 661 nehmen damit geht es wunderbar,sms ist sofort angekommen.

    mfg: weedhead

    • Offizieller Beitrag

    Hallo!

    @walle: is mir bewusst, und ich bin sehr dankbar dadrum das ihr vorschläge macht :) aber mom hab ich nich sooo viel zeit.. heut is der letzt tag der kiwo (riesen fuerwerk usw..) und da muss ich jetzt hin ;)

    @levithan: Ich wollte die gui auch nicht schön gestalten, sondern praktisch und schlicht ;)

    Und enterdrücken bei captcha ist doch logisch oder? aber wenn du willst kann ich noch ein traytip machen..

    Und das Splash.. naja.. so ist es halt am einfachsten gehalten.. mir ging es weniger um die gui und ums ausehen als um die funktion!

    Wer lust hat kann gerne eine neue gui bauen, und meine funktion dafür benutzen :)

    genau, dafür sind die anderen da.. falls mal ein server down ist einfach ne andere id nehmen :)

    Mfg Spider

    würds noch cool finden wenn der user die id selbst wählen könnte(ist eigentlich nur spielerei)
    aber ansonsten geht das script wunderbar :) sms ist nach 10 sek sofort angekommen...WELL DONE spider ;)

    snoozer

    PS:aufruf per cmd-line ist ne schicke erweiterung denk die meisten werden das trotzdem per gui machen :)

    • Offizieller Beitrag

    Hallo!

    Kommandozeile hab ich auch eigentlich nur gemacht weil unten in zeile 164 (If MsgBox(52, "Wrong Captcha", "Wrong Captcha (Code) entered! Retry?") = 6 Then ShellExecute(@ScriptFullPath, $CellularNumber & ' "' & $Message & '" '&Random(0,10)) das steht.. fals iwas schief geht, verscuth er es einfach nochmal ;)

    Wegen ID: wie gesagt, wer lust hat kann gerne eine schöne gui machen usw.. sonst einfach nur $ID = $IDList[InputBox("","ID:","11")] oben hinsetzen ;)

    Mfg Spider

    • Offizieller Beitrag

    Hallo!

    So, hab nun noch paar sachen gefixt!

    Die leute da haben den Capatcha code von 3 auf 4 stellen verändert, ich gehe da natürlich mit.
    Und eine Server liste.. womit man sich die Servers aussuchen kann die man haben will! Der punkt rechtsdaneben ist der ping.. wenn der ping fehlschlägt ist der punkt rot, sonst Grün

    Das Programm gibt es oben zu downloaden!

    Mfg Spider

    Super Sache, nur der Standart Server funktioniert fast nie :)
    der 141 ging bissher jedesmal.

    Großes Lob :rock: und mach weiter so

    Wow, top =)

    Schnell.. und kostenlos =)
    supa ;)

    Aber ob die Automatisierung soo legal ist.. ^^
    Ich denke, dagegen steht bloß nichts in den AGB, weil
    die mit sowas garnicht rechnen ;)

    Nils =)

    There are only 10 types of people in the world:
    Those who understand binary - and those who don't.

    Einmal editiert, zuletzt von noels (26. Juni 2007 um 18:30)

    MMh, denke nicht das es da Probs gibt


    Gta hätte ja vlt noch nen Spamschutz einbauen können, dass man nur alle 10 Min schreiben kann oda so


    Waluev

    Flensburg ist wie Payback - wenn man 18 Punkte hat bekommt man ein Fahrrad.

    Alle 10 min ? 8|
    Also wenn ich da an meine Cousine denke... ;)
    ..
    Passt schon, der Spam-Schutz ist meiner Meinung ja
    schon in dem Captcha-Key drin ;)

    Edit:
    Wenige Sekunden zu spät ;)

    There are only 10 types of people in the world:
    Those who understand binary - and those who don't.

    Einmal editiert, zuletzt von noels (26. Juni 2007 um 18:55)

    Nur weil es nicht @ agb steht, heißts nicht dass es nicht illegal ist.

    Man umgeht so die einnahmequelle -- die Werbung.
    Die site finanziert sich ja durch werbung, also um es "halblegal" zu machen würde ich neben dem captcha bild auch den werbe button der site als SENDEN button definieren.

    So bekommen die vll n bissle was :P

    wenn du den ie sichtbar machst wird klar die werbung wird so oder so angeziegt.....nur ist sie bei unsichtbaren ie nicht scihtbar(klingt logisch und ist auch so^^)...ich glaube kaum dass die wissen wie die seite aufgerufen wird, dass können die nicht nachvollziehen......da sobald man mit IE.au3 arbeitet die browser identifikationen des IE(die dort eingestellt sind) gesendet werden und nicht mehr das autoit-browser dings....


    snoozer