Sign in to follow this  
Followers 0
mojehyip

Stringsbetween need put to INPUT

7 posts in this topic

HI

Just trying do some program what coolect informations. Just administration tool to check someone ip with ability to login on site > take string from line and put it into INPUT.

For practics i maked one more time but now compile not working, i make functions and strings from pl.fakenamegenerator.com and all data should be in input = How do that.

Problems:

C:\Program Files (x86)\AutoIt3\Include\IE.au3 (1953) : ==> Variable must be of type "Object".:
Return SetError($_IEStatus_Success, 0, $o_object.document.body.innerHTML)
Return SetError($_IEStatus_Success, 0, $o_object.document^ ERROR

Also question about:

$input1 = GUICtrlCreateInput("cos", 184, 152, 185, 21)

I want get some like that:

$input1 = GUICtrlCreateInput($name + $from + "How many awards:" + $awards, 184, 152, 185, 21)
$name = ("Brian")
$from = ("Poland") 
$Awards = ("50")

My code.

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <GUIListBox.au3>
#include <Misc.au3>
#include <String.au3>
#include <Array.au3>




;ToolTip("Załadowany",0,0,"STATUS") Check this cool named action

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Form1", 924, 568, 50, 20)

Global $oIE = _IECreateEmbedded()
Local $kod_strony = _IEBodyReadHTML($oIE)

_IENavigate($oIE, "auto:blank")

$Save = GUICtrlCreateButton("Zapisz", 820, 448, 81, 33, $WS_GROUP)
$Tab1 = GUICtrlCreateTab(3, 60, 800, 500)
GUICtrlSetFont(-1, 10, 800, 0, "Segoe Print")
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("Fake ustawienia")

#region Zmienne lokalne



 ; czyta stronę
local $g_Imie = _StringBetween($kod_strony, '<span class="given-name">', '</span>') ;od jakiego miejsca do jakiego miejsca przeczytać
$g_Nazwisko = _StringBetween($kod_strony, '<span class="family-name">', '</span>')
$g_Ulica = _StringBetween($kod_strony, '<span class="street-address">', '</span>')
$g_Miejscowosc = _StringBetween($kod_strony, '<span class="locality">', '</span>')
$g_wojewodztwo = _StringBetween($kod_strony, '<span class="region">', '</span>')
$g_kodpocztowy = _StringBetween($kod_strony, '<span class="postal-code">', '</span>')
$g_dataurodzenia = _StringBetween($kod_strony, '<li class="bday">', '</li>')
$g_haslo = _StringBetween($kod_strony, '<li class="lab">Hasło:</li><li>', '</li>')
$g_login = _StringBetween($kod_strony, '<li class="lab">Użytkownik:</li><li>', '</li>')
$g_email = _StringBetween($kod_strony, '<li class="email"><span class="value">', '</span>')
$g_creditcard = _StringBetween($kod_strony, '<li class="lab">MasterCard:</li><li>', '</li>')
$g_cvv2 = _StringBetween($kod_strony, '<li class="lab">CVC2</li><li>', '</li>')
$g_expire = _StringBetween($kod_strony, '<li class="lab">Wygasa:</li><li>', '</li>')
$g_www = _StringBetween($kod_strony, '<span class="">', '</span>')


#endregion
$input1 = GUICtrlCreateInput("cos", 184, 152, 185, 21)
$Input2 = GUICtrlCreateInput("Ulica + Numer domu", 184, 208, 185, 21)
$Input3 = GUICtrlCreateInput("Miasto + Kod pocztowy", 184, 264, 185, 21)
$Input4 = GUICtrlCreateInput("xxxxxxxxxxxxxxxx", 408, 136, 89, 21)
$Input5 = GUICtrlCreateInput("xxxxxxxxxxxxxxxxxxx", 408, 160, 105, 21)
$Input6 = GUICtrlCreateInput("       @teleworm.us", 408, 184, 113, 21)
$Input7 = GUICtrlCreateInput("eliteportal.eu", 408, 208, 105, 21)
$Input8 = GUICtrlCreateInput("0000 0000 0000 0000", 408, 232, 129, 21)
$Input9 = GUICtrlCreateInput("000", 408, 256, 41, 21)
$Input10 = GUICtrlCreateInput("00/0000", 408, 280, 73, 21)

$Pic1 = GUICtrlCreatePic("", 272, 128, 49, 17)

$Label0 = GUICtrlCreateInput("Miesiąc 0, 0000 (00 lat)", 184, 320, 185, 21)
$Label1 = GUICtrlCreateLabel("Imię i Nazwisko", 192, 128, 77, 17)
$Label2 = GUICtrlCreateLabel("Ulica + Numer domu", 192, 184, 100, 17)
$Label3 = GUICtrlCreateLabel("Miasto, Kod pocztowy", 192, 240, 108, 17)
$Label4 = GUICtrlCreateLabel("Data urodzenia => Wiek", 184, 296, 119, 17)
$Label5 = GUICtrlCreateLabel("Login", 376, 136, 30, 17)
$Label6 = GUICtrlCreateLabel("Haslo", 376, 160, 31, 17)
$Label7 = GUICtrlCreateLabel("Email", 376, 184, 29, 17)
$Label7 = GUICtrlCreateLabel("Email", 376, 184, 29, 17)
$Label8 = GUICtrlCreateLabel("www", 376, 208, 28, 17)
$Label9 = GUICtrlCreateLabel("Visa", 376, 232, 24, 17)
$Label10 = GUICtrlCreateLabel("CVV2", 376, 256, 31, 17)
$Label11 = GUICtrlCreateLabel("Expire", 376, 280, 33, 17)

$Generator = GUICtrlCreateButton("Generuj moje dane", 384, 312, 177, 73)
GUICtrlSetFont(-1, 10, 800, 0, "Segoe Print")

GUISetState(@SW_SHOW)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
Reg1()
Case $Button2
Case $Button13
Case $Button15
EndSwitch
WEnd

Share this post


Link to post
Share on other sites



bump

Share this post


Link to post
Share on other sites

A running script that shows the problem might be helpful to your getting an answer.


If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

Share this post


Link to post
Share on other sites

I have problem with my autoit code

Problems:

[ autoit ] ( ?do=embed' frameborder='0' data-embedContent> )

C:Program Files (x86)AutoIt3IncludeIE.au3 (1953) : ==> Variable must be of type "Object".: Return SetError($_IEStatus_Success, 0, $o_object.document.body.innerHTML) Return SetError($_IEStatus_Success, 0, $o_object.document^ ERROR

My code.

[ autoit ] ( - ?do=embed' frameborder='0' data-embedContent> )

#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <GUIListBox.au3> #include <Misc.au3> #include <String.au3> #include <Array.au3> ;ToolTip("Załadowany",0,0,"STATUS") Check this cool named action #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 924, 568, 50, 20) Global $oIE = _IECreateEmbedded() Local $kod_strony = _IEBodyReadHTML($oIE) _IENavigate($oIE, "auto:blank") $Save = GUICtrlCreateButton("Zapisz", 820, 448, 81, 33, $WS_GROUP) $Tab1 = GUICtrlCreateTab(3, 60, 800, 500) GUICtrlSetFont(-1, 10, 800, 0, "Segoe Print") GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT) $TabSheet1 = GUICtrlCreateTabItem("Fake ustawienia") #region Zmienne lokalne ; czyta stronę local $g_Imie = _StringBetween($kod_strony, '<span class="given-name">', '</span>') ;od jakiego miejsca do jakiego miejsca przeczytać $g_Nazwisko = _StringBetween($kod_strony, '<span class="family-name">', '</span>') $g_Ulica = _StringBetween($kod_strony, '<span class="street-address">', '</span>') $g_Miejscowosc = _StringBetween($kod_strony, '<span class="locality">', '</span>') $g_wojewodztwo = _StringBetween($kod_strony, '<span class="region">', '</span>') $g_kodpocztowy = _StringBetween($kod_strony, '<span class="postal-code">', '</span>') $g_dataurodzenia = _StringBetween($kod_strony, '<li class="bday">', '</li>') $g_haslo = _StringBetween($kod_strony, '<li class="lab">Hasło:</li><li>', '</li>') $g_login = _StringBetween($kod_strony, '<li class="lab">Użytkownik:</li><li>', '</li>') $g_email = _StringBetween($kod_strony, '<li class="email"><span class="value">', '</span>') $g_creditcard = _StringBetween($kod_strony, '<li class="lab">MasterCard:</li><li>', '</li>') $g_cvv2 = _StringBetween($kod_strony, '<li class="lab">CVC2</li><li>', '</li>') $g_expire = _StringBetween($kod_strony, '<li class="lab">Wygasa:</li><li>', '</li>') $g_www = _StringBetween($kod_strony, '<span class="">', '</span>') #endregion $input1 = GUICtrlCreateInput("cos", 184, 152, 185, 21) $Input2 = GUICtrlCreateInput("Ulica + Numer domu", 184, 208, 185, 21) $Input3 = GUICtrlCreateInput("Miasto + Kod pocztowy", 184, 264, 185, 21) $Input4 = GUICtrlCreateInput("xxxxxxxxxxxxxxxx", 408, 136, 89, 21) $Input5 = GUICtrlCreateInput("xxxxxxxxxxxxxxxxxxx", 408, 160, 105, 21) $Input6 = GUICtrlCreateInput(" @teleworm.us", 408, 184, 113, 21) $Input7 = GUICtrlCreateInput("eliteportal.eu", 408, 208, 105, 21) $Input8 = GUICtrlCreateInput("0000 0000 0000 0000", 408, 232, 129, 21) $Input9 = GUICtrlCreateInput("000", 408, 256, 41, 21) $Input10 = GUICtrlCreateInput("00/0000", 408, 280, 73, 21) $Pic1 = GUICtrlCreatePic("", 272, 128, 49, 17) $Label0 = GUICtrlCreateInput("Miesiąc 0, 0000 (00 lat)", 184, 320, 185, 21) $Label1 = GUICtrlCreateLabel("Imię i Nazwisko", 192, 128, 77, 17) $Label2 = GUICtrlCreateLabel("Ulica + Numer domu", 192, 184, 100, 17) $Label3 = GUICtrlCreateLabel("Miasto, Kod pocztowy", 192, 240, 108, 17) $Label4 = GUICtrlCreateLabel("Data urodzenia => Wiek", 184, 296, 119, 17) $Label5 = GUICtrlCreateLabel("Login", 376, 136, 30, 17) $Label6 = GUICtrlCreateLabel("Haslo", 376, 160, 31, 17) $Label7 = GUICtrlCreateLabel("Email", 376, 184, 29, 17) $Label7 = GUICtrlCreateLabel("Email", 376, 184, 29, 17) $Label8 = GUICtrlCreateLabel("www", 376, 208, 28, 17) $Label9 = GUICtrlCreateLabel("Visa", 376, 232, 24, 17) $Label10 = GUICtrlCreateLabel("CVV2", 376, 256, 31, 17) $Label11 = GUICtrlCreateLabel("Expire", 376, 280, 33, 17) $Generator = GUICtrlCreateButton("Generuj moje dane", 384, 312, 177, 73) GUICtrlSetFont(-1, 10, 800, 0, "Segoe Print") GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 Reg1() Case $Button2 Case $Button13 Case $Button15 EndSwitch WEnd

Share this post


Link to post
Share on other sites

ANYONE CAN HELP?

Share this post


Link to post
Share on other sites

#6 ·  Posted (edited)

I'm Getting confused

Please be a little more clear and post the Autoit code inside Autoit Tags

Edit : more preferably give the address of the website and mention the information you want

Also keep in mind that your request doesnt break the Forum Rules

Edited by PhoenixXL

My code:

PredictText: Predict Text of an Edit Control Like Scite. Remote Gmail: Execute your Scripts through Gmail. StringRegExp:Share and learn RegExp.

Run As System: A command line wrapper around PSEXEC.exe to execute your apps scripts as System (LSA). Database: An easier approach for _SQ_LITE beginners.

MathsEx: A UDF for Fractions and LCM, GCF/HCF. FloatingText: An UDF for make your text floating. Clipboard Extendor: A clipboard monitoring tool. 

Custom ScrollBar: Scroll Bar made with GDI+, user can use bitmaps instead. RestrictEdit_SRE: Restrict text in an Edit Control through a Regular Expression.

Share this post


Link to post
Share on other sites

mojehyip,

That looks very much like a site login script and I am sure that you are not really navigating to the "auto:blank" page - so why are you not using the real page? Furthermore it mentions @teleworm.us which is not a email address I am happy to see used. As a result I am locking this thread as I am fairly sure it breaks at least 2 of our rules. :naughty:

Please make sure you understand the Forum Rules before you post again. ;)

M23


Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______My UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.
Sign in to follow this  
Followers 0