PlItems

ID: 123
PlCodelang: PL/pgSQL
PlGroup: Datum, Zeit
PlItemTitle: Alter zu gegebenen Datum ermitteln
Code: select age({ts '1983-08-21 17:25:00'})

ID: 124
PlCodelang: PL/pgSQL
PlGroup: Strings
PlItemTitle: String nach Delimenter zerlegen
Code: SELECT split_part('A;B;C;D;E',';',2) -- Result: B

ID: 125
PlCodelang: Python
PlGroup: Encoding / Decoding
PlItemTitle: Datei nach Base64 encodieren
Code: myfile = 'myDoc.pdf' ReturnValue = open(myfile).read().encode("base64") # in ReturnValue ist nun der Base64-String

ID: 126
PlCodelang: C#
PlGroup: Encoding / Decoding
PlItemTitle: Datei nach Base64 encodieren
Code: myfile = "myPDF.pdf"; string ReturnValue = ""; if (System.IO.File.Exists(myfile)) { using (FileStream BinaryFile = new FileStream(myfile, FileMode.Open)) { BinaryReader BinRead = new BinaryReader(BinaryFile); byte[] BinBytes = BinRead.ReadBytes(Convert.ToInt32(BinaryFile.Length)); ReturnValue = Convert.ToBase64String(BinBytes); BinaryFile.Close(); } }

ID: 127
PlCodelang: Mumps
PlGroup: Konsolenverwaltung
PlItemTitle: Einlesen Konsoleneingabe
Code: WRITE !,"What's your name? " READ yourname

ID: 128
PlCodelang: Python
PlGroup: Konsolenverwaltung
PlItemTitle: Einlesen Konsoleneingabe
Code: yourname = raw_input('What\'s your name? ')

ID: 129
PlCodelang: Bash Script
PlGroup: Variablen
PlItemTitle: Wert einer Variable zuweisen
Code: # Aktuelles Verzeichnis in einer Variable setzen mydir="Mein Verzeichnis lautet $PWD" echo $mydir

ID: 130
PlCodelang: MySQL
PlGroup: Datenbank
PlItemTitle: CSV erstellen
Code: -- http://dev.mysql.com/doc/refman/5.0/en/group-by-functions.html#function_group-concat SELECT R.TITEL AS TITEL ,R.ANLEITUNG AS ANLEITUNG ,GROUP_CONCAT(CONCAT(CAST(RZ.MENGE AS CHAR),' ',RZ.EINHEIT,' ' ,Z.ZUTAT) SEPARATOR ',') AS ZUTATEN ,R.NOTIZ AS NOTIZ FROM REZEPT AS R LEFT JOIN REZEPT_HAS_ZUTAT AS RZ ON R.ID=RZ.REZEPT_ID LEFT JOIN ZUTAT AS Z ON RZ.ZUTAT_ID=Z.ID AND RZ.REZEPT_ID=R.ID

ID: 131
PlCodelang: PHP
PlGroup: Netzwerk, Email
PlItemTitle: Emails mit pop3 lesen
Code: // Orginal von http://www.sebastianviereck.de/php-pop3-mails-aus-postfach-auslesen/ $mailserver="pop.foo.de"; $port="110/pop3"; $user="name@foode"; $pass="foo"; getEmailsImap($mailserver, $port, $user, $pass); //open connection to mailbox, read all unread mails function getEmailsImap($mailserver, $port, $user, $pass) { $imap = imap_open( "{" . $mailserver . ":" . $port . "}INBOX", $user, $pass ); if ($imap) { echo "Connected\n"; $check = imap_mailboxmsginfo($imap); echo "Date: " . $check->Date . "<br />\n" ; echo "Driver: " . $check->Driver . "<br />\n" ; echo "Unread: " . $check->Unread . "<br />\n" ; echo "Size: " . $check->Size . "<br />\n" ; $totalrows = imap_num_msg($imap); //iterate through all unread mails for ($index = 0; $index < $totalrows; $index++) { $header = imap_header($imap, $index + 1); //get mail subject dump("<h1>".$header->subject."</h1>"); //get mail sent date $prettydate = date(DateTime::ISO8601 , $header->udate); dump( $prettydate ); //get email author $email = "{$header->from[0]->mailbox}@{$header->from[0]->host}"; dump( $email ); //get mail body dump( imap_body($imap, $index + 1)); } //close connection to mailbox imap_close($imap); return true; } else { dump("Can't connect: " . imap_last_error()); return false; } } function dump($var) { echo "<pre><div align='left'>"; print_r($var); echo "</div></pre>"; }

ID: 132
PlCodelang: PHP
PlGroup: Dateihandling
PlItemTitle: Prüfen ob Datei schreibbar ist
Code: // Orginal von: http://www.sebastianviereck.de/php-nicht-schreibbare-dateien-finden-und-beheben/ function checkFileWritable($file) { if(!file_exists($file)) { file_put_contents($file, ""); } if(!chmod($file, 0644)) { $fileowner = fileowner($file); echo "counld not change File Permissions: $file, File Owner is: $fileowner"; if(!chown($file, ftpUserID)) { echo "counld not change File owner: $file "; mail(mailadresse, "Schreibeprobleme","File: $file, File Owner is: $fileowner"); } } }

ID: 133
PlCodelang: VB.NET
PlGroup: Strings
PlItemTitle: String nach einem Teilstring durchsuchen
Code: Dim longStr = "This is a long string" Dim searchFor = "long" position = InStr( longStr, searchFor )

ID: 134
PlCodelang: SSIS
PlGroup: Fallunterscheidung
PlItemTitle: Wenn-Dann Abfrage
Code: ' Using IF(IIF) logic in Derived Column (LEN(TRIM(Test)) > 0 ? SUBSTRING(Test,1,5) : NULL(DT_WSTR,5))

ID: 135
PlCodelang: T-SQL
PlGroup: Security
PlItemTitle: Zugriff auf DB-Tabellen für Schema/Package gewähren
Code: GRANT UPDATE,INSERT,SELECT,DELETE ON SCHEMA :: schema_test TO user_test

ID: 136
PlCodelang: PHP
PlGroup: Textdateien
PlItemTitle: Textdatei schreiben
Code: $datei = fopen("myfile.txt","w+"); // write rewind($datei); fwrite($datei, time()"); fclose($datei);

ID: 137
PlCodelang: T-SQL
PlGroup: Datenmengen
PlItemTitle: Differenzen anzeigen
Code: SELECT field_to_compare FROM Destination_Table EXCEPT SELECT field_to_compare FROM Source_Table

ID: 138
PlCodelang: T-SQL
PlGroup: Datenbank
PlItemTitle: String nach einem Teilstring durchsuchen
Code: -- Find characters which are also special characters for search terms, e.g. % or _ -- see also: http://msdn.microsoft.com/en-us/library/ms179859%28v=sql.105%29.aspx SELECT * FROM table_1 WHERE column_1 LIKE '%!_%' ESCAPE '!' -- Find results which includes the character "_". The escape character is defined as "!"

ID: 139
PlCodelang: T-SQL
PlGroup: Datenbank-Administration
PlItemTitle: Alle Transaktion/Jounal-Log Files verkleinern
Code: -- The script is designed to work on a sql server -- 2008R2. However it works on 2005 and sql server -- 2012 instances. -- It shrinks all log files for the databases -- created by users -- Written by Igor Micev, 2012 -- from SQLServerCentral.com declare @logname nvarchar(128) declare @dbname nvarchar(128) declare @dynamic_command nvarchar(1024) set @dynamic_command = null declare log_cursor cursor for select db_name(mf.database_id),name from sys.master_files mf where mf.database_id not in (1,2,3,4) --avoid system databases and mf.name not like 'ReportServer$%' and right(mf.physical_name,4) = '.ldf' and mf.state_desc='online' open log_cursor fetch next from log_cursor into @dbname,@logname while @@fetch_status = 0 begin set @dynamic_command = 'USE '+@dbname+' DBCC SHRINKFILE(N'''+@logname+''',0,TRUNCATEONLY)' exec sp_executesql @dynamic_command fetch next from log_cursor into @dbname,@logname set @dynamic_command = null end close log_cursor deallocate log_cursor

ID: 140
PlCodelang: T-SQL
PlGroup: Datenbank
PlItemTitle: Aktuellen Datenbanknamen ausgeben
Code: SELECT DB_NAME() AS DB_Name

ID: 141
PlCodelang: SQLite
PlGroup: Datenbank
PlItemTitle: Fremdschlüsselprüfung aktivieren
Code: -- http://www.sqlite.org/foreignkeys.html PRAGMA foreign_keys = ON; -- !! this is only valid for the current session. -- If you want to use this permanent, you have to use this statement every time you start a new session

ID: 142
PlCodelang: JavaScript
PlGroup: URL-Handling
PlItemTitle: Aktuelle URL bekommen
Code: // http://www.w3.org/TR/DOM-Level-2-HTML/html.html#ID-46183437 myURL = document.URL; // => http://myDNSNameOrIP:1234/path/testfile.html