|
You last visited: Today at 00:26
Advertisement
[Hilfe] Quellcode auslesen... [Fehler!]
Discussion on [Hilfe] Quellcode auslesen... [Fehler!] within the AutoIt forum part of the Coders Den category.
11/03/2012, 10:41
|
#1
|
elite*gold: 25
Join Date: Nov 2011
Posts: 266
Received Thanks: 60
|
[Hilfe] Quellcode auslesen... [Fehler!]
ich habe ein problem beim auslesen des quellcodes unzwar will ich mir ein tool basteln der mir beim pc start die ungelesenen nachrichten ausliest...
#RequireAdmin
#include <WinHTTP.au3>
$hSession = _WinHttpOpen("Mozilla/5.0 (Windows NT 6.1; rv:16.0) Gecko/20100101 Firefox/16.0")
$hConnect = _WinHttpConnect($hSession, "www.elitepvpers.com")
$sHtml1 = _WinHttpSimpleRequest($hConnect, "GET", "")
FileWrite("Antwort 1.html", $sHtml1)
$sHtml2 = _WinHttpSimpleRequest($hConnect, "POST", "forum/login.php?do=login" , "www.elitepvpers.com" , "### Username & Passwort werden natürlich nicht angezeigt ")
FileWrite("Antwort 2.html", $sHtml2)
$sHtml3 = _WinHttpSimpleRequest($hConnect, "GET", "forum/" , "www.elitepvpers.com")
FileWrite("Antwort 3.html", $sHtml3)
Sleep(5000);Wartezeit
$aReturn = StringRegExp($sHtml3, "<a href='http://www.elitepvpers.com/forum/private.php'>Private Messages</a>: Unread (\d+?)",3)
;(\d+?) gibt den wert an oderso... wie ich es verstanden habe
MsgBox(64,"Private Nachrichten",$aReturn)
_WinHttpCloseHandle($hConnect)
_WinHttpCloseHandle($hSession)
hoffe ihr könnt mir sagen warum immer der wert 1 rauskommt obwohl ich da 0 stehen habe....
mfg bluebasher
|
|
|
11/03/2012, 12:18
|
#2
|
elite*gold: 0
Join Date: Feb 2011
Posts: 244
Received Thanks: 64
|
Am Besten lass es dir von
Code:
#include <Array.au3>
_arraydisplay($aReturn)
Und StringRegExp gibt dir etwas zurück deshalb bei MsgBox(64,"Private Nachrichten",$aReturn[COLOR="Red"][0][/COLOR])
ausgeben.
|
|
|
11/03/2012, 12:29
|
#3
|
elite*gold: 12
Join Date: Jun 2012
Posts: 2,049
Received Thanks: 138
|
Quote:
Originally Posted by Deadly_chaos
Am Besten lass es dir von
Code:
#include <Array.au3>
_arraydisplay($aReturn)
Und StringRegExp gibt dir etwas zurück deshalb bei MsgBox(64,"Private Nachrichten",$aReturn[COLOR="Red"][0][/COLOR])
ausgeben.
|
Daran liegt es nicht.
Ich habe mir mal erlaubt, dass ganze zum laufen zu bringen.
Wie Deadly_chaos schon bemerkt hat, gibt die Funktion StrinRegExp ein Array zurück, muss man aber nicht weiter beachten, weil ich das Offset von StringRegExp auf 1 gesetzt hab. Somit gibt es zwar auch ein Array zurück, aber nur mit der ersten Übereinstimmung. Somit braucht man auch nicht bei dem Text der Msgbox das Array[0] hinzufügen.
So, das Script:
Bei dem Post-Befehl halt noch deine Login-Daten reinschreiben. Meine Pfeile (--> & <--) natürlich auchnoch entfernen
Hab auchnoch n paar Get-Befehle rausgenommen, braucht man nicht, und die RegEx-Funktion etwas verändert.
Code:
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.8.1
Author: Fl00d3R
Script Function:
Liest die Anzahl der privaten Nachrichten auf http://www.elitepvpers.com/ aus
#ce ----------------------------------------------------------------------------
#RequireAdmin
#include <WinHTTP.au3>
$hSession = _WinHttpOpen("Mozilla/5.0 (Windows NT 6.1; rv:16.0) Gecko/20100101 Firefox/16.0")
$hConnect = _WinHttpConnect($hSession, "www.elitepvpers.com")
_WinHttpSimpleRequest($hConnect, "POST", "forum/login.php?do=login" , "http://www.elitepvpers.com/" , "vb_login_username=-->Username<--&vb_login_password=-->Passwort<--&cookieuser=0&s=&securitytoken=1351940869-8e58a7ca8c5d64c9319972106c370de3e03e874a&do=login&vb_login_md5password=&vb_login_md5password_utf=")
$sHtml = _WinHttpSimpleRequest($hConnect, "GET")
$aReturn = StringRegExp($sHtml, "<a href='http://www.elitepvpers.com/forum/private.php'>Private Messages</a>: Unread ([0-9]), Total ",1)
MsgBox(64,"Private Nachrichten",$aReturn)
_WinHttpCloseHandle($hConnect)
_WinHttpCloseHandle($hSession)
Bei Fragen, meldest dich bitte per PN.
MfG Fl00d3R
|
|
|
11/03/2012, 13:00
|
#4
|
elite*gold: 25
Join Date: Nov 2011
Posts: 266
Received Thanks: 60
|
erstmal ein thanks für eure hilfe...
so jetzt zeigt der 0 an schick mal bitte ein pn
Gestern ging es noch jetzt wieder gleiches Problem
Wegen [0]... wenn ich sie rausnehme wird immer 1 angezeigt
Hier nochmal $aReturn
Code:
$aReturn = StringRegExp($sHtml, "<li><a href='http://www.elitepvpers.com/forum/private.php'>Private Nachrichten</a>: Ungelesen <strong>([0-9])</strong>, insgesamt", 3)
|
|
|
11/04/2012, 13:55
|
#5
|
elite*gold: 10
Join Date: Nov 2012
Posts: 2
Received Thanks: 0
|
Ja ehm... Du bekommst kein Array Zurück...
EDIT: First POST
|
|
|
11/04/2012, 18:39
|
#6
|
elite*gold: 528
Join Date: Jan 2012
Posts: 2,127
Received Thanks: 2,404
|
Hier kannst du dein RegExp testen:
Code:
; =======================================================================
;Original idea by w0uter
; Modified by steve8tch
;2008 updated to work with newer PCRE implemetation
; removed use of message boxes and splash screens
; created status bar to display messages
; added timer
;2011 updated
; fixes:
; Help file button did not work with compiled scripts
; x64 OS aware.
; Different separator charactor used in GUICtrlSetData (thanks FichteFoll)
; Display formating fixed when number of results from StringRegExp = 9, or 99, or 999 etc (thanks FichteFoll)
; =======================================================================
#include <GuiConstantsEx.au3>
#include <EditConstants.au3>
#include <WindowsConstants.au3>
#include <ButtonConstants.au3>
#include <StaticConstants.au3>
Opt("MustDeclareVars", 1)
Global Const $sSep = Chr(11) ; --> 0x0B = VT - use as a separator for use in the combo control. By default this uses a "|" and this charactor is likely to be used in a pattern file
Opt("GUIDataSeparatorChar",$sSep)
Global $sInitialDir = @ScriptDir
Global $sPatterns = "(.*)"
Global Const $iGreen = 0xAAFFD5
Global Const $iGrey = 0xD4D0C8
Global Const $iRed = 0xFF8888
Global Const $iBlack = 0x000000
Global Const $iBlue = 0x0000FF
Global Const $iSoftYellow = 0xFBFFC6
Global Const $iYellow = 0xFFFC8A
Global $hGui_StringToTest ; $hGui_StringToTest holds the currently selected tab for the input string to be tested (ie from the edit box or from the text file)
; results from StringRegExp come in 3 forms: a single string (rtn flag 0), a single array (rtn flag 1,2,3) or an array of arrays (rtn flag 4)
Global $bResultTrueFalseExpected = False
Global $bArrayOfArraysExpected = False
Global $sInitialDir ; use to save the location of the previous "Browse" function
Global $sPatterns = readDatFile()
GUICreate("StringRegExp Original idea -by w0uter, modified Steve8tch", 550, 596, (@DesktopWidth - 550) / 2, (@DesktopHeight - 570) / 2)
GUICtrlCreateGroup("The pattern - $ptn", 10, 210, 530, 60)
GUICtrlCreateGroup("Output", 140, 280, 400, 280)
GUICtrlCreateGroup(" Return Flag", 10, 280, 120, 120)
GUICtrlCreateGroup(" Offset", 10, 410, 120, 50)
GUICtrlCreateGroup("@Error @Extended", 10, 470, 120, 50)
Global $hGui_Radio_0 = GUICtrlCreateRadio("0", 60, 300, 50, 18)
Global $hGui_Radio_1 = GUICtrlCreateRadio("1", 60, 318, 50, 18)
Global $hGui_Radio_2 = GUICtrlCreateRadio("2", 60, 336, 50, 18)
Global $hGui_Radio_3 = GUICtrlCreateRadio("3", 60, 354, 50, 18)
Global $hGui_Radio_4 = GUICtrlCreateRadio("4", 60, 372, 50, 18)
GUICtrlSetState($hGui_Radio_1, $GUI_CHECKED)
Global $hGui_tab = GUICtrlCreateTab(10, 10, 530, 190)
Global $hGui_tabitem1 = GUICtrlCreateTabItem("Copy and Paste the text to check - $str")
Global $hGui_inputEditBox = GUICtrlCreateEdit("", 20, 40, 510, 150, BitOR($ES_WANTRETURN, $WS_VSCROLL, $WS_HSCROLL, $ES_AUTOVSCROLL, $ES_AUTOHSCROLL))
GUICtrlSetBkColor($hGui_inputEditBox, $iSoftYellow)
Global $hGui_tabitem2 = GUICtrlCreateTabItem("Load text from File")
Global $hGui_browse = GUICtrlCreateButton("Browse for file", 20, 40, 100, 20)
Global $hGui_pathToInputFile = GUICtrlCreateEdit("", 130, 40, 400, 20, BitOR($ES_WANTRETURN, $WS_HSCROLL, $ES_AUTOHSCROLL))
Global $hGui_inputFromFile = GUICtrlCreateEdit("", 20, 70, 510, 120, BitOR($ES_WANTRETURN, $WS_VSCROLL, $WS_HSCROLL, $ES_AUTOVSCROLL, $ES_AUTOHSCROLL))
GUICtrlSetBkColor($hGui_inputFromFile, $iSoftYellow)
GUICtrlCreateTabItem("");
Global $hGui_Out = GUICtrlCreateEdit("", 150, 296, 380, 262, BitOR($ES_WANTRETURN, $WS_VSCROLL, $WS_HSCROLL, $ES_AUTOVSCROLL, $ES_AUTOHSCROLL))
GUICtrlSetBkColor($hGui_Out, $iSoftYellow)
Global $hGui_Pattern = GUICtrlCreateCombo("", 70, 230, 430, 30)
GUICtrlSetFont($hGui_Pattern, 14, -1, -1, "Arial")
GUICtrlSetColor($hGui_Pattern, $iBlue)
GUICtrlSetBkColor($hGui_Pattern, $iYellow)
GUICtrlSetData($hGui_Pattern, $sPatterns, "(.*)")
Global $hGui_doPtnAdd = GUICtrlCreateButton("Add", 504, 225, 30, 18)
Global $hGui_doPtnDel = GUICtrlCreateButton("Del", 504, 245, 30, 18)
Global $hGui_test = GUICtrlCreateButton("Test", 20, 235, 40, 20, $BS_DEFPUSHBUTTON)
Global $hGui_Offset = GUICtrlCreateInput("1", 40, 430, 60, 20)
Global $hGui_err = GUICtrlCreateInput("", 20, 490, 40, 20, $ES_READONLY)
Global $hGui_ext = GUICtrlCreateInput("", 70, 490, 50, 20, $ES_READONLY)
Global $hGui_Help = GUICtrlCreateButton("StringRegExp HELP", 10, 530, 120, 30)
;Global $hGui_Exit = GUICtrlCreateButton("EXIT", 10, 530, 55, 30)
Global $hGui_timerDisplay = GUICtrlCreateLabel("Time (ms)", 3, 573, 142, 20, $SS_SUNKEN)
Global $hGUI_StatusBar = GUICtrlCreateLabel("Status..", 150, 573, 395, 20, $SS_SUNKEN)
$hGui_StringToTest = $hGui_inputEditBox ; default - read the string to be tested from the edit box
; setup tool tips
; GUICtrlSetTip required IE version 5+
If Number(StringLeft(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Explorer", "Version"), 1)) > 4 Then
GUICtrlSetTip($hGui_Radio_0, "Returns 1 (matched) or 0 (no match)", "Return Flag= 0", 1, 1)
GUICtrlSetTip($hGui_Radio_1, "Returns an array containing the matches.", "Return Flag = 1", 1, 1)
GUICtrlSetTip($hGui_Radio_2, "Returns the full matched string AND an array containing the matches (Perl / PHP style).", "Return Flag = 2", 1, 1)
GUICtrlSetTip($hGui_Radio_3, "Returns an array containing the global matches.", "Return Flag = 3", 1, 1)
GUICtrlSetTip($hGui_Radio_4, "Returns an array of arrays containing the full matched strings AND global matches. (Perl / PHP style).", "Return Flag = 4", 1, 1)
GUICtrlSetTip($hGui_Offset, "[optional] The string position to start the match (starts at 1) The default is 1.", "Offset option", 1, 1)
Else
GUICtrlSetTip($hGui_Radio_0, "Returns 1 (matched) or 0 (no match)")
GUICtrlSetTip($hGui_Radio_1, "Returns an array containing the matches.")
GUICtrlSetTip($hGui_Radio_2, "Returns the full matched string AND an array containing the matches (Perl / PHP style).")
GUICtrlSetTip($hGui_Radio_3, "Returns an array containing the global matches.")
GUICtrlSetTip($hGui_Radio_4, "Returns an array of arrays containing the full matched strings AND global matches. (Perl / PHP style).")
GUICtrlSetTip($hGui_Offset, "[optional] The string position to start the match (starts at 1) The default is 1.")
EndIf
GUISetState()
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $hGui_test
doStringRegExpTest()
Case $hGui_browse
doBrowseForFile()
Case $hGui_tab
If GUICtrlRead($hGui_tab) = 0 Then
$hGui_StringToTest = $hGui_inputEditBox
Else
$hGui_StringToTest = $hGui_inputFromFile
EndIf
Case $hGui_doPtnAdd
doPtnAdd(GUICtrlRead($hGui_Pattern))
Case $hGui_doPtnDel
doPtnDel(GUICtrlRead($hGui_Pattern))
Case $hGui_Help
doDisplayHelp()
Case Else
;;
EndSwitch
WEnd
Func doStringRegExpTest()
Local $aA, $aB ;use for arrays
Local $i, $j ; use for stepping through arrays
Local $c ; counter
Local $hTimer, $t ; use for timing
Local $iErr, $iExt ; use to hold result of @error and @extended
Local $sResult = "" ; use to hold result
Local $iStrLgth ; use to the string length of the number of results expected. (eg Use in the StringFormat function
Local $x, $y ; local vars.
GUICtrlSetData($hGui_Out, "")
GUICtrlSetData($hGUI_StatusBar, "Performing test..... please wait.")
GUICtrlSetBkColor($hGUI_StatusBar, $iGreen)
;set up timer
$hTimer = TimerInit()
$aA = StringRegExp(GUICtrlRead($hGui_StringToTest), GUICtrlRead($hGui_Pattern), getReturnFlag(), getOffset())
$iErr = @error
$iExt = @extended
$t = TimerDiff($hTimer)
GUICtrlSetData($hGui_timerDisplay, $t & " ms")
GUICtrlSetData($hGui_err, $iErr)
GUICtrlSetData($hGui_ext, $iExt)
Select
Case $iErr = 0
GUICtrlSetData($hGUI_StatusBar, "Valid pattern - updating display. Please wait....")
GUICtrlSetBkColor($hGUI_StatusBar, $iGreen)
Case $iErr = 1
GUICtrlSetData($hGUI_StatusBar, "Array is invalid. No matches")
GUICtrlSetBkColor($hGUI_StatusBar, $iRed)
Case $iErr = 2
GUICtrlSetData($hGUI_StatusBar, "Bad pattern, (array is invalid). @Extended = offset of error in pattern.")
GUICtrlSetBkColor($hGUI_StatusBar, $iRed)
EndSelect
If $iErr = 0 Then
$x = UBound($aA)
If $bArrayOfArraysExpected Then
$y = UBound($aA[0])
$x *= $y
EndIf
$iStrLgth = StringLen(String($x - 1))
If $bArrayOfArraysExpected Then ; results -> array of arrays expected
$c = 0 ; use $c as a counter to help display the results
If UBound($aA) Then
For $i = 0 To UBound($aA) - 1
$aB = $aA[$i]
For $j = 0 To UBound($aB) - 1
$sResult &= StringFormat("%0" & $iStrLgth & "i", $c) & ' => ' & $aB[$j] & @CRLF
$c += 1
Next
$sResult &= @CRLF
Next
GUICtrlSetData($hGui_Out, $sResult)
GUICtrlSetData($hGUI_StatusBar, "Complete")
EndIf
ElseIf $bResultTrueFalseExpected Then ; result string expected
If $aA = 1 Then
$sResult &= "1 <-- SUCCESS, matches found" & @CRLF
Else
$sResult &= "0 <-- FAIL, no matches found" & @CRLF
EndIf
GUICtrlSetData($hGui_Out, $sResult)
GUICtrlSetData($hGUI_StatusBar, "Complete")
Else ; a single array expected
If UBound($aA) Then
For $i = 0 To UBound($aA) - 1
$sResult &= StringFormat("%0" & $iStrLgth & "i", $i) & ' => ' & $aA[$i] & @CRLF
Next
GUICtrlSetData($hGui_Out, $sResult)
GUICtrlSetData($hGUI_StatusBar, "Complete")
EndIf
EndIf
EndIf
EndFunc ;==>doStringRegExpTest
Func getReturnFlag()
$bArrayOfArraysExpected = False
$bResultTrueFalseExpected = False
Switch $GUI_CHECKED
Case GUICtrlRead($hGui_Radio_0)
$bResultTrueFalseExpected = True
Return 0
Case GUICtrlRead($hGui_Radio_1)
Return 1
Case GUICtrlRead($hGui_Radio_2)
Return 2
Case GUICtrlRead($hGui_Radio_3)
Return 3
Case GUICtrlRead($hGui_Radio_4)
$bArrayOfArraysExpected = True
Return 4
EndSwitch
EndFunc ;==>getReturnFlag
Func getOffset()
Local $x
$x = Int(GUICtrlRead($hGui_Offset))
If @error Then
Return 1
Else
Return $x
EndIf
EndFunc ;==>getOffset
Func doBrowseForFile()
Local $sFilePath, $sFileTxt
$sFilePath = FileOpenDialog("Select text file to test", $sInitialDir, "Text files (*.*)", 1)
$sInitialDir = StringTrimRight($sFilePath, StringInStr($sFilePath, "\", "-1"))
GUICtrlSetData($hGUI_StatusBar, "Loading file..")
GUICtrlSetBkColor($hGUI_StatusBar, $iGreen)
GUICtrlSetData($hGui_pathToInputFile, $sFilePath)
$sFileTxt = FileRead($sFilePath)
GUICtrlSetData($hGUI_StatusBar, "File loaded... updating display")
GUICtrlSetData($hGui_inputFromFile, $sFileTxt)
GUICtrlSetData($hGUI_StatusBar, "")
GUICtrlSetBkColor($hGUI_StatusBar, $iGrey)
EndFunc ;==>doBrowseForFile
Func readDatFile()
Local $sDat, $sOut = ""
Local $sHeader = "[do not delete this file - Patterns are listed below]" & @CRLF
Local $sDatFile = @AppDataDir & "\StringRegExpGUIPattern.dat"
If FileExists($sDatFile) = 0 Then
$sDat = $sHeader & "(.*)"
FileWrite($sDatFile, $sDat)
$sOut = "(.*)"
Else
$sDat = FileRead($sDatFile)
$sDat = StringReplace($sDat, $sHeader, "") ; strip out header line
;Strip out any leading or trailing @CRLF
If StringLeft($sDat, 2) = @CRLF Then $sDat = StringTrimLeft($sDat, 2)
If StringRight($sDat, 2) = @CRLF Then $sDat = StringTrimRight($sDat, 2)
If $sDat <> "" Then ; we should have 1 or more patterns
$sOut = StringReplace($sDat, @CRLF, $sSep)
Else
FileWrite($sDatFile, $sHeader & "(.*)")
$sOut = "(.*)"
EndIf
EndIf
Return $sOut
EndFunc ;==>readDatFile
Func doPtnDel($x)
Local $sDat
Local $sDatFile = @AppDataDir & "\StringRegExpGUIPattern.dat"
$sDat = FileRead($sDatFile)
;now find and remove this entry from the dat file
$sDat = StringReplace($sDat, $x, "")
;If $x was in the middle of the dat file - we will now need to find and remove any double @CRLF entries
$sDat = StringReplace($sDat, @CRLF & @CRLF, @CRLF)
;If $x was at the begining or the end of the file - we now need to stop off a leading or trailing @CRLF entry
If StringLeft($sDat, 2) = @CRLF Then $sDat = StringTrimLeft($sDat, 2)
If StringRight($sDat, 2) = @CRLF Then $sDat = StringTrimRight($sDat, 2)
;Now delete the previous dat file and create a new one
If FileDelete($sDatFile) Then
FileWrite($sDatFile, $sDat)
Else
MsgBox(0, "***ERROR**", "Failed to delete entry from the dat file" & @CRLF & _
"Reason: Failed to delete old file.")
EndIf
;Now read in new dat file
$sPatterns = readDatFile()
GUICtrlSetData($hGui_Pattern, $sSep & $sPatterns, "(.*)")
EndFunc ;==>doPtnDel
Func doPtnAdd($x)
Local $sDat
Local $sDatFile = @AppDataDir & "\StringRegExpGUIPattern.dat"
$sDat = FileRead($sDatFile)
;now add this entry fto the end of the dat file
$sDat &= @CRLF & $x
;Now delete the previous dat file and create a new one
If FileDelete($sDatFile) Then
FileWrite($sDatFile, $sDat)
Else
MsgBox(0, "***ERROR**", "Failed to delete entry from the dat file" & @CRLF & _
"Reason: Failed to delete old file.")
EndIf
;Now read in new dat file
$sPatterns = readDatFile()
GUICtrlSetData($hGui_Pattern, $sSep & $sPatterns, $x)
EndFunc ;==>doPtnAdd
Func doDisplayHelp()
Local $sPathToHelpFile
Local $sPathToAutoIt
Local $iErr = 0
If @Compiled = 0 Then
$sPathToHelpFile = StringLeft(@AutoItExe, StringInStr(@AutoItExe, "\", 0, -1))
Run($sPathToHelpFile & "Autoit3Help.exe StringRegExp")
If @error = 1 Then $iErr = 1
Else
;Try and file to help file (if available at all)
If @OSArch = "X86" Then
$sPathToAutoIt = RegRead('HKLM\Software\AutoIt v3\AutoIt', 'InstallDir')
Run($sPathToAutoIt & "\Autoit3Help.exe StringRegExp")
If @error Then $iErr = 1
Else
$sPathToAutoIt = RegRead('HKLM64\Software\AutoIt v3\AutoIt', 'InstallDir')
If $sPathToAutoIt = "" Then
$sPathToAutoIt = RegRead('HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\AutoIt v3\AutoIt', 'InstallDir')
If $sPathToAutoIt = "" Then
$iErr = 1
EndIf
EndIf
If $iErr = 0 Then ; we picked up a location from the registry queires above
Run($sPathToAutoIt & "\Autoit3Help.exe StringRegExp")
If @error Then $iErr = 1
EndIf
EndIf
EndIf
If $iErr = 1 Then MsgBox(0, "error", "Cannot find help file - sorry")
EndFunc ;==>doDisplayHelp
MfG
|
|
|
|
Similar Threads
|
Autoit Quellcode auslesen
04/19/2012 - AutoIt - 1 Replies
Hallo,
Ich habe 2 Problemchen ^^
1. Ich hab ein Spiel. Da will ich mir mal denn Quellcode anschauen. Aber es geht nicht ich kann kein recht klick seiten quell text anzeigen oder irgen was anderes. Ich hab mal gelesen man kann mit auto it sich denn Quelltext von egal wo herhollen ich glaub das war mit TCP und Msgbox ^^ wenn mir jemand helfen könnte wie ich an denn Quellcode komme währe ich im sehr dankbar.
2. Ich will ein bot machen der automatisch geld gold ... in die gildenkasse...
|
!!! Hilfe Visual Basic / Prozess Auslesen / Value Im Textbox Wieder Geben... Hilfe!!!
12/16/2011 - .NET Languages - 10 Replies
So Hey Liebe Leute...
Es Geht Um Visual Basic 2010
So Ich Habe eine Frage...
So Meine Frage...
Ich Habe Mir Ein Kleines Programm Gecodet..
|
Quellcode bestimme Sachen auslesen
05/28/2011 - AutoIt - 2 Replies
Hi epvpers,
man muss ja bei manchen Facebook Videos erst auf den "like" Button drücken damit man sie sehen kann, wenn man jedoch im Quellcode sucht findet man einen youtube link und kann aufs video zugreifen ohne den like button drücken zu müssen, jetzt die frage:
ist es möglich diesen link aus den Quelltext automatisch rauszusuchen??
ich würde dann damit ein tool erstellen....
Quellcode:<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"...
|
Autoit quellcode Hilfe--funcktion error..missing separator character after keywords
02/27/2009 - Rappelz - 9 Replies
Hey Leute Habe nen Problem
Also mein bot sollte eignt laufen tut er aber nich ..keine ahnung wieso nach mouseclick schliest er automatisch ..
hier mal der quellcode
MouseClick ("left",536, 367)
|
All times are GMT +2. The time now is 00:26.
|
|