In einer Excel Tabelle lesen/schreiben

Mit dem folgenden Code kann man eine Excel Tabelle öffnen und lesen / schreiben. Hinweis: MS Excel muss dazu auf dem System installiert sein. ‚Excel im Hintergrund öffnen, Objekt erstellen und "Tabelle1" öffnen Set Excel = CreateObject("Excel.Application") Excel.Visible = False Excel.Workbooks.Open "C:beispiel.xls" Set sheet = Excel.Worksheets("Tabelle1")   ‚Alle Daten im aktuellen Druckbereich leeren ‚Hinweis: Die … Continue reading In einer Excel Tabelle lesen/schreiben

Zugriff auf Access Datenbanken

Einleitung: Da man auch in Visual Basic oft mit Datenbank zugriffen arbeitet, wird hier eine unabhängige, flexible Datenbank-Zugriffs Lösung als die, die in vielen Visual Basic Büchern beschreiben ist gezeigt. Die Lösung basiert auf "SQL" und ist wird auch in anderen Programmiersprachen verwendet. SQL lässt sich auch ganz gut in Visual Basic einbinden. Was ist … Continue reading Zugriff auf Access Datenbanken

Webseite einlesen

Diese Funktion läuft auch mit VBScript, ASP, VBA. Aufruf (Beispiel): fetch_page = getURL("<a href="http://www.example.com/")" target="blank">http://www.example.com/")</a> msgbox fetch_pagefetch_page = getURL("<a href="http://www.example.com/")" target="blank">http://www.example.com/")</a> msgbox fetch_page Private Function GetURL(URL)   ‚ — Konstanten für die Verwendung eines ADODB.Stream-Objektes Const adTypeText = 2 Const adReadAll = -1   ‚ — Instantiieren des Objekts MSXML2.ServerXMLHTTP ‚ Set objHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0") … Continue reading Webseite einlesen

Laufwerks-Buchstaben abhängig vom Disklabel zuweisen

Möchte man nach einer Neuinstallation die Laufwerksbuchstaben automatisch anpassen, kann man dies anhand des Labels (= Laufwerks-Name) tun. Folgender Ausschnitt weisst der Festplatte mit dem Namen BACKUP den Buchstaben "L:" zu. <B>Hinweis:</B> Das Beispiel benötigt "diskpart", dass aber bei Windows XP standardmässig schon dabei ist. Weitere Infos dazu gibts unter: http://groups.msn.com/windowsscript/powershell.msnw?action=get_message&mview=0&ID_Message=15313&LastModified=4675570881377551875&all_topics=1 ‚ Objekte die wir … Continue reading Laufwerks-Buchstaben abhängig vom Disklabel zuweisen

Backup aller mySQL Datenbanken

Ein komplettes Backup aller mysql-datenbanken lässt sich mit dem Befehl: mysqldump -A -a -C -c -e –user=root –password=****** > dump.sql durchführen. Die Optionen bedeuten hier: Kurze Option Lange Option Bedeutung -A –all-databases Alle Datenbanken sichern -a –create-options Erstellungseigenschaften der Tabelle einfügen -C –compress Den Datenverkehr zwischen mysql Server und Client komprimieren -c –complete-insert Die Spaltennamen … Continue reading Backup aller mySQL Datenbanken

Kommentarzeilen Entfernen

Als ich wieder mal eine Übersicht meiner Konfigurationsdateien brauchte, suchte ich nach einer Lösung die Kommentarzeilen von Files zu entfernen. Auch wenn man seine Konfiguration hilfesuchend an eine Mailingliste oder ein Forum senden möchte, stören die Kommentare mehr als dass sie nützen. Dies muss man lediglich in einer Datei namens confcat speichern, die im $PATH … Continue reading Kommentarzeilen Entfernen

Grafische echo-funktionen

Wie vielleicht schon aufgefallen ist, erscheinen bei booten vieler Linux-Distributionen die Bootmeldungen im Format: <FONT FACE="courier new">Starting ServiceXY… <FONT COLOR="green"><B>[DONE]</B></FONT></FONT> Solche Meldungen kann man mit nachfolgender Funktion ganz einfach in seine eigenen Shellscripts einfügen: Einfach diese Funktionen oben im Script einfügen und danach Meldungen schreiben wie: echo -n $"Starting XYZ…" # Startroutinen echo_ok echo_warning echo_doneecho … Continue reading Grafische echo-funktionen

Dialoge automatisiert Beantworten

Beim shellscripten steht man oft vor dem Problem, dass man ein Programm "steuern" muss. Unter Unix/Linux Shellscript kann man dies ganz einfach erreichen, wenn man ein ‚<<EOT‘ vor den Programmaufruf setzt. Danach kann normal die Eingaben angeben, ein erneutes ‚EOT‘ schliesst den Vorgang ab und schaltet wieder zur normalen Scriptsteuerung. Unten ist ein Beispiel zur … Continue reading Dialoge automatisiert Beantworten

NET SEND Meldung an alle SAMBA-Domain Benutzer

Mittels diesem Code wird eine NET SEND Meldung an alle SAMBA Domänenbenutzer gesendet, ähnlich dem "NET SEND * msg" unter Windows. Dabei wird das /etc/samba/smbpasswd file ausgelesen und eine Nachricht an alle Maschinenaccounts gesendet. for i in $(cut -d: -f1 /etc/samba/smbpasswd | grep "$" | cut -d$ -f1) do echo "Test an alle SAMBA Users … Continue reading NET SEND Meldung an alle SAMBA-Domain Benutzer

ICQ Status anzeigen

Die folgende Funktion zeigt an ob eine ICQ Benutzer online/offline ist. Testen kann man dies mit: <? echo is_online("123456789"); ?> function is_online($uin) { if (!is_numeric($uin)) return FALSE;   $fp = fsockopen(’status.icq.com‘, 80, &$errno, &$errstr, 8); if (!$fp) return FALSE; $request = "GET /online.gif?icq=".$uin."&img=5 HTTP/1.0rn" ."Host: status.icq.comrn" ."Connection: closernrn"; fputs($fp, $request);   do { $response = … Continue reading ICQ Status anzeigen