Nicht angemeldet.
Hier können Sie Ihre eigenen Skripte und UDF's veröffentlichen undanderen zum Download anbieten oder von anderen herunterladen
Opt("MustDeclareVars", 1) Local $sMessage,$sUsername,$sUrl,$sPassword,$oHTTP,$f,$HTTPPost #Region Benutzerdaten $sUsername = "Der Username von Twitter" $sPassword = "Das Passwort von Twitter" #EndRegion _sendStatus("Den Text, Status den ihr schickt kommt hier") Func _sendStatus($sMessage) $sUrl = "http://twitter.com/statuses/update.xml" $oHTTP = ObjCreate("Microsoft.XMLHTTP") $oHTTP.open ("Post", $sUrl,false,$sUsername,$sPassword) $oHTTP.send ("status=" & $sMessage) $HTTPPost = $oHTTP.responseText $f = FileOpen("update.xml",10) FileWrite($f,$HTTPPost) FileClose($f) EndFunc
Dauerhaft angemeldet bleiben?