Benutzer-Werkzeuge

Webseiten-Werkzeuge


playground:playground

Dies ist eine alte Version des Dokuments!


PlayGround

Der Spielplatz, hier kann/soll getestet werden…
Diese Seite wird von Zeit zu Zeit gelöscht! Das ist auch gut so


playground

  1. hallo
  2. foo
    bar
  3. code hier
    hallo
  4. bauz-bumm
  5. und wie geht fett?
  6. und
  7. und wie ein Link auf neues Kapitel?

ein Zeilenumbruch kursiv?

  1. Nummerierter Listenpunkt
  • Listenpunkt

http://www.biblio.unisg.ch

Neues Kapitel

Viel Spass

test comment plugin
hidden comment: /*blablablabla*/
mehrzeileig: /*blabla blalsbld blasdkfbl */


Fett Kursiv underline durchgestrichen cd /tmp cp /tmp/

Dies ist ein Programm Code: private int wert;
Dies ist ein normaler Text mit einem Rahmen
filecontent

Dieser Text ist auf der gleichen Linie geschrieben
aber durch zwei Backslash's und einem Leerzeichen
ist dieser Text auf einer zweiten-dritten Linie

Level1

Level2

Level31

Level4

Level5

== == == ==

ora_upgrade_9.2.0.7_to_10.2.0.3

tabellentest:
jonas 17.03.2006 14:38

titelfeld1titelfeld2
zelle1 zelle2
titel? titel?
zeile

Hochgeladenes Bild:
:playground:test.jpg
Hochgeladenes Dokument:
:playground:testdokument.txt
Bid resize:
test.jpg


jonas 17.03.2006 14:37

Syntay Highlighting test:

'**********************
'* 8.3report.vbs
'*
'* 11.02.04, JFU
'* 
'**********************
 
Option Explicit
 
Dim fso, objFolder, read, readOnce, subreadonce, loc, locOnce, subloc, sublocOnce, path, oldFile, fileName, strLog, createLog
Dim x, y
If WScript.Arguments.Count > 0 Then
	path = WScript.Arguments.item(0)
 
Else
	path = InputBox("Pfad eingeben", "!!!")
 
End If
 
Set fso = CreateObject("Scripting.FileSystemObject")
 
For Each objFolder in rloc
	strLog = strLog & chr(13) & objFolder.path & chr(13)
 
	createLog.WriteLine()
	createLog.WriteLine(objFolder.path)	
 
	If len(objFolder.Name) > 12 Then
 
			strLog = strLog & "--> FOLDER: " & objFolder.Name & " --> " & "zu lange!!" & chr(13)
			createLog.WriteLine("--> FOLDER: " & objFolder.Name & " --> " & "zu lange!!")
		Else
 
			strLog = strLog & "FOLDER: " & objFolder.Name & " --> " & "OK!!" & chr(13)		
			createLog.WriteLine("OK FOLDER: " & objFolder.Name)
		End If 
 
	set read = objFolder.Files
 
	Next
 
	set subloc = fso.GetFolder(objFolder.path).subFolders
	set sublocOnce = fso.GetFolder(objFolder.path)		
	set subreadonce = sublocOnce.Files
 
		If subloc.Count > 0 Or subreadOnce.Count > 0 Then
			x = Report(subloc, sublocOnce)
		End If
 
Next
 
End Function
 
WScript.Echo ("Done" & chr(10) & "Logfile: " & path & chr(92) & "8.3-Log.txt")
WScript.Quit

:neuerNamespace:guenter .beispiel

Heading 1 Heading 2 Heading3
Heading 3 Row 1 Col 2 Row 1 Col 3 test
Heading 4 no colspan this time test
Heading 5 Row 2 Col 2 Row 2 Col 3 test

… ich probier's auch mal mit dem bild hochladen…
statistik1.jpg

playground/playground.1286202615.txt.gz · Zuletzt geändert: (Externe Bearbeitung)