Ik heb al een jaar of twee-drie geleden hetzelfde gevraagd denk ik, maar misschien wordt Powershell intussen al serieuzer genomen. Kunnen we AUB een lexer krijgen voor Powershell op T.net? Ooit wou ik er zelf een maken, maar ik ken niet genoeg van lexers om daar zelf aan te beginnen. Intussen zijn er zoveel sites die dat hebben dat dit toch eenvoudiger moet zijn als tevoren. Of niet?
Waar is die 'Ik henk em' knop als je hem nodig hebt!?
Ik ben ook voor!
Ik ben ook voor!
PowerShell:
1
| blaat |
Geen idee of de highlighting klopt, maar zover ik kan zien herkent de highlighter die we al een tijdje gebruiken PowerShell wel
edit: maar niet zonder bugs: code-tags, parse probleempje(?)
[ Voor 21% gewijzigd door crisp op 11-08-2015 16:17 ]
Intentionally left blank
Copy/Paste uit waar ik mee bezig ben - meteen een echte test 
Ja, werkt zeer goed
En daar is nooit ruchtbaarheid aan gegeven?
PowerShell:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
| #To be replaced by something that doesn't use the ActiveDirectory module, because it uses ADWS and is very, very slow Import-Module ActiveDirectory $ADCmdlet = "Set-ADUser" $ADIdentity ="-Identity $($SelectedRow.Cells["UserName"].Value)" $ADServer = "-Server $($SelectedRow.Cells["Domain"].Value)" $ADWhatIf = "-WhatIf" $ADCommandString = $ADCmdlet + " " + $ADIdentity + " " + $ADServer + " " + "-Credential (New-Object System.Management.Automation.PSCredential 'MICROSOFT\Administrator',(ConvertTo-SecureString $("hunter2") -AsPlainText -Force))" If ($cbxGivenName.Checked -And ($($SelectedRow.Cells["GivenName"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-GivenName '$($SelectedRow.Cells["GivenName"].Value)'"} If ($cbxSurName.Checked -And ($($SelectedRow.Cells["Surname"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-Surname `"$($SelectedRow.Cells["Surname"].Value)`""} If ($cbxDisplayName.Checked -And ($($SelectedRow.Cells["DisplayName"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-DisplayName '$($SelectedRow.Cells["DisplayName"].Value)'"} If ($cbxMail.Checked -And ($($SelectedRow.Cells["Mail"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-Emailaddress '$($SelectedRow.Cells["Mail"].Value)'"} If ($cbxDescription.Checked -And ($($SelectedRow.Cells["Description"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-Description '$($SelectedRow.Cells["Description"].Value)'"} If ($cbxTitle.Checked -And ($($SelectedRow.Cells["Title"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-Title '$($SelectedRow.Cells["Title"].Value)'"} If ($cbxStreetAddress.Checked -And ($($SelectedRow.Cells["StreetAddress"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-StreetAddress '$($SelectedRow.Cells["StreetAddress"].Value)'"} If ($cbxPostalCode.Checked -And ($($SelectedRow.Cells["PostalCode"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-PostalCode '$($SelectedRow.Cells["PostalCode"].Value)'"} If ($cbxCity.Checked -And ($($SelectedRow.Cells["City"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-City '$($SelectedRow.Cells["City"].Value)'"} If ($cbxCountry.Checked -And ($($SelectedRow.Cells["Country"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-Country '$($SelectedRow.Cells["Country"].Value)'"} If ($cbxCompany.Checked -And ($($SelectedRow.Cells["Company"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-Company '$($SelectedRow.Cells["Company"].Value)'"} If ($cbxHomePage.Checked -And ($($SelectedRow.Cells["HomePage"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-Homepage '$($SelectedRow.Cells["Homepage"].Value)'"} If ($cbxOfficePhone.Checked -And ($($SelectedRow.Cells["OfficePhone"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-OfficePhone '$($SelectedRow.Cells["OfficePhone"].Value)'"} If ($cbxHomePhone.Checked -And ($($SelectedRow.Cells["HomePhone"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-HomePhone '$($SelectedRow.Cells["HomePhone"].Value)'"} If ($cbxMobilePhone.Checked -And ($($SelectedRow.Cells["MobilePhone"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-MobilePhone '$($SelectedRow.Cells["MobilePhone"].Value)'"} If ($cbxFax.Checked -And ($($SelectedRow.Cells["Fax"].Value) -NE "")) {$ADCommandString = $ADCommandString + " " + "-Fax '$($SelectedRow.Cells["Fax"].Value)'" } Try { Invoke-Expression $ADCommandString -ErrorAction 'Stop' } Catch { $txtLog.Text = $txtLog.Text + "$($Error[0])`r`n (This is a string)" } |
Ja, werkt zeer goed
[ Voor 198% gewijzigd door YellowOnline op 11-08-2015 16:22 ]
Het zal vast wel in een .plan vermeld zijnYellowOnline schreef op dinsdag 11 augustus 2015 @ 16:21:
[...]
Ja, werkt zeer goedEn daar is nooit ruchtbaarheid aan gegeven?
Intentionally left blank
Nee, ik zie dat het zelfs niet in een .plan genoemt is voor zover ik kan zien.YellowOnline schreef op dinsdag 11 augustus 2015 @ 16:21:
Copy/Paste uit waar ik mee bezig ben - meteen een echte test
Ja, werkt zeer goedEn daar is nooit ruchtbaarheid aan gegeven?
Anyway, we gebruiken nu een hooglichter voor deze talen: http://pygments.org/languages/
"Een serveradmin, voluit een serveradministrator, is dan weer een slavenbeheerder oftewel een slavendrijver" - Rataplan
Ik ben blijKees schreef op dinsdag 11 augustus 2015 @ 16:59:
[...]
Nee, ik zie dat het zelfs niet in een .plan genoemt is voor zover ik kan zien.
Anyway, we gebruiken nu een hooglichter voor deze talen: http://pygments.org/languages/
Het comment op lijn 33 is zo lang dat er op het einde getruncate wordt en vanaf daar de comment-highlighting meteen voor de rest van de code geldt. Dat probleem is vermoedelijk in een maximumlengte van een lijn in het codeblok en niet zozeer bij de lexer.
Code mag ook niet meer dan 76 chars lang zijn in een propere styleguide
"Een serveradmin, voluit een serveradministrator, is dan weer een slavenbeheerder oftewel een slavendrijver" - Rataplan
UBB code-tag: PowerShellYellowOnline schreef op dinsdag 11 augustus 2015 @ 16:04:
Ik heb al een jaar of twee-drie geleden hetzelfde gevraagd denk ik

After the first glass you see things as you wish they were. After the second you see things as they are not. Finally you see things as they really are, and that is the most horrible thing in the world...
Oscar Wilde
Pagina: 1