Benutz deinen eigenen Rechner. Musst es ja nicht rund um die Uhr am laufen haben
Beiträge von blubbstar
-
-
Bei nem Vserver oder Root nicht. Bei dir normalerweise schon, ist aber nicht schlimm, gibt ja dyndns.org oder Ähnliches.
-
VServer oder Root
Aber mit Windows bekommste kaum nen billigen VServer. -
[autoit]
$code = ''
[/autoit]
For $i = 1 To 7
$rndm = Random(87, 122, 1)
If $rndm < 97 Then $rndm -= 39
$code &= Chr($rndm)
Next
MsgBox(0, "", $code) -
Hier mal bissal was gebastelt:
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
$inifile = @SystemDir & "\GroupPolicy\Machine\Scripts\scripts.ini"
GUICreate("abc", 250, 100)
GUICtrlCreateLabel("Dateipfad:", 10, 13, 60, 20)
$InputFile = GUICtrlCreateInput("", 75, 10, 115, 20)
GUICtrlCreateLabel("Parameter:", 10, 43, 65, 20)
$InputParameter = GUICtrlCreateInput("", 75, 40, 115, 20)
$ButtonFile = GUICtrlCreateButton("...", 205, 10, 30, 20)
$ButtonAdd = GUICtrlCreateButton("Eintragen", 75, 70, 115, 20)
GUISetState()While True
[/autoit]
$msg = GUIGetMsg()
If $msg = -3 Then Exit
If $msg = $ButtonFile Then
$file = FileOpenDialog("Öffnen", Default, "(*.*)")
If Not @error Then GUICtrlSetData($InputFile, $file)
EndIf
If $msg = $ButtonAdd Then
If GUICtrlRead($InputFile) <> "" Then
$count = 0
While True
$iniread = IniRead($inifile, "Startup", $count & "CmdLine", "")
If $iniread = "" Then ExitLoop
$count += 1
WEnd
IniWrite($inifile, "Startup", $count & "CmdLine", GUICtrlRead($InputFile))
IniWrite($inifile, "Startup", $count & "Parameters", GUICtrlRead($InputParameter))
MsgBox(0, "", "Eingetragen ;D!")
EndIf
EndIf
WEnd -
Schau mal da:
Dein WindowsOrdner\system32\GroupPolicy\Machine\Scripts
Dort habe ich 2 Ordner, Shutdown & Startup. Außerdem ist da noch ne versteckte Datei, darin stehen die Sachen die ich eingetragen habe. -
GUISetBkColor, lol.
-
[autoit]
#include <array.au3>
[/autoit]
$str = '<a href="index.php?page=User&userID=525">Noobstyler</a>' & @CRLF & _
'<a href="index.php?page=User&userID=564">IceAngel</a>'
$array = StringRegExp($str, 'userID=\d*">(.+)</a>', 3)
_ArrayDisplay($array) -
Hier mal nen bissel was:
Spoiler anzeigen
[autoit]#include<Inet.au3>
[/autoit]
#include<Array.au3>
$sText=_INetGetSource("http://www.autchat.spacequadrat.de/joomla/index.php?option=com_content&view=article&id=4:wie-kann-ich-meinen-link-bei-euch-sehen&catid=1:faq&Itemid=7")
$authorregexp = StringRegExp($sText, 'Geschrieben von: (.+)\t', 3)
$author = "Geschrieben von: "&$authorregexp[0]
$date = StringRegExp($sText,'class="createdate">\r\n\t\t(.+)\t</td>', 3)
$mailregexp = StringRegExp($sText, "var addy_text\d* = '(.+)';\n", 3)
$mail = $mailregexp[0]
For $i = 1 to 122
$mail = StringReplace($mail, "&#"&$i&";", Chr($i))
Next
$mail = StringReplace($mail, "' + '", "")
$textregexp = StringRegExp($sText, ">(.+)\n <script language='JavaScript' type='text/javascript'>", 3)
$text = StringReplace(StringReplace($author & @CRLF & $date[0] & @CRLF & $textregexp[0] & $mail & " " &$textregexp[1], "ü", "ü"), "ö", "ö")
MsgBox(0, "", $text) -
Benutz mal die UDF von Progandy. Bist du auch sicher das Mysql auf diesem Rechner läuft, auf dem du es testest?
-
Du willst es ändern? Das geht doch einfach so:
[autoit]$AR_CD_DVD_ROM_Listbox [2][2] = $CD_DROM_Drives
[/autoit] -
Mit GUICtrlSetBkColor den Hintergrund ändern und dem Pic evtl. mal noch nen Parameter 0 dranhängen.
Hm ne, habsch mich getäuscht. -
So vielleicht:
[autoit]$MsgBox = MsgBox(17, "Warnung", ":-)")
[/autoit]
If $MsgBox = 1 Then
;OK gedrückt
EndIf -
[autoit]
ClipPut(InputBox("Zwischenspeicher", "Text:"))
[/autoit] -
[autoit]
$path = "C:\abc\defgh\hallo.exe"
[/autoit]
$newpath = StringLeft($path, StringInStr($path, "\", 2, -1))
MsgBox(0, "", $newpath) -
Mit ein bisschen mehr deutsch wäre das vielleicht lösbar...
-
Trotzdem kann jeder die Datei dann so modifizieren wie er will
-
Probier mal das:
[autoit]$str = '75682E61727478652E707466'
[/autoit]
$newstr = ''
For $i = StringLen($str)-1 To 0 Step -2
$newstr &= StringMid($str, $i, 2)
Next
MsgBox(0, "", $newstr) -
Lol, für die UDF musst du doch die PID übergeben?
-
[autoit]
#include <array.au3>
[/autoit]
#include <Inet.au3>
$html = _INetGetSource("http://fah-web.stanford.edu/cgi-bin/main.py?qtype=teampage&teamnum=158376")
$username = StringRegExp($html, 'name=.+ (.+) </a> </TD>', 3)
$points = StringRegExp($html, 'pts=\d+".+ (.+) </a> </TD>', 3)
$wu = StringRegExp($html, 'pts=\d+&.+ (.+) </a> </TD>', 3)
_ArrayDisplay($username)
_ArrayDisplay($points)
_ArrayDisplay($wu)