[玩转系统] 更多闪烁乐趣
作者:精品下载站 日期:2024-12-14 07:43:15 浏览:13 分类:玩电脑
更多闪烁乐趣
#requires -version 3.0
Function Read-Host2 {
<#
.Synopsis
An alternative to Read-Host
.Description
This is an alternative to Read-Host which works almost the same as the original cmdlet. You can use this to prompt the user for input. They can either enter text or have the text converted to a secure string. The only difference is that the prompt will display in a flashing colors until you start typing.
This command will NOT work properly in the PowerShell ISE.
.Parameter Prompt
The text to be displayed. A colon will be appended.
.Parameter AsSecureString
The entered text will be treated as a secure string. This parameter has an alias of 'ss'.
.Parameter UseForeground
Flash the text color instead of the background. This parameter has aliases of 'fg' and 'foreground'.
.Example
PS C:\> $user = Read-Host2 "Enter a username" -color DarkGreen
Prompt for user name using a dark green background
.Example
PS C:\> $pass = Read-Host2 "Enter a password" -color darkred -foreground -asSecureString
Prompt for a password using DarkRed as the foreground color.
.Example
PS C:\> $s={ $l = get-eventlog -list ; Read-host2 "Press enter to continue" ; $l}
PS C:\> &$s
Press enter to continue :
Max(K) Retain OverflowAction Entries Log
------ ------ -------------- ------- ---
20,480 0 OverwriteAsNeeded 30,829 Application
20,480 0 OverwriteAsNeeded 0 HardwareEvents
512 7 OverwriteOlder 0 Internet Explorer
20,480 0 OverwriteAsNeeded 0 Key Management Service
20,480 0 OverwriteAsNeeded 12 Lenovo-Customer Feedback
128 0 OverwriteAsNeeded 455 OAlerts
512 7 OverwriteOlder 0 PreEmptive
20,480 0 OverwriteAsNeeded 32,013 Security
20,480 0 OverwriteAsNeeded 26,475 System
15,360 0 OverwriteAsNeeded 17,715 Windows PowerShell
This is an example of how you might use the command in a script. The prompt will keep flashing until you press Enter.
.Notes
Last Updated: August 18, 2014
Version : 0.9
Learn more:
PowerShell in Depth: An Administrator's Guide (http://www.manning.com/jones2/)
PowerShell Deep Dives (http://manning.com/hicks/)
Learn PowerShell in a Month of Lunches (http://manning.com/jones3/)
Learn PowerShell Toolmaking in a Month of Lunches (http://manning.com/jones4/)
****************************************************************
* DO NOT USE IN A PRODUCTION ENVIRONMENT UNTIL YOU HAVE TESTED *
* THOROUGHLY IN A LAB ENVIRONMENT. USE AT YOUR OWN RISK. IF *
* YOU DO NOT UNDERSTAND WHAT THIS SCRIPT DOES OR HOW IT WORKS, *
* DO NOT USE IT OUTSIDE OF A SECURE, TEST SETTING. *
****************************************************************
.Link
https://jdhitsolutions.com/blog/2014/08/more-flashing-fun
.Link
Read-Host
ConvertTo-SecureString
#>
[cmdletbinding()]
Param(
[Parameter(Position=0,Mandatory,HelpMessage="Enter a prompt message without a colon (:)")]
[string]$Prompt,
[Alias('ss')]
[switch]$AsSecureString,
[System.ConsoleColor]$Color = "Red",
[Alias("fg","Foreground")]
[switch]$UseForeground
)
#this will be the array of entered characters
$text = @()
#save current background and foreground colors
$bg = $host.ui.RawUI.BackgroundColor
$fg = $host.ui.RawUI.ForegroundColor
#set a variable to be used in a While loop
$Running = $True
#set a variable to determine if the user is typing something
$Typing = $False
#get current cursor position
$Coordinate = $host.ui.RawUI.CursorPosition
$msg = "`r$Prompt : "
While ($Running) {
if (-Not $Typing) {
#don't toggle or pause if the user is typing
if ($UseForeground) {
if ($host.ui.RawUI.ForegroundColor -eq $fg) {
$host.ui.RawUI.ForegroundColor = $color
}
else {
$host.ui.RawUI.ForegroundColor = $fg
}
}
else {
if ($host.ui.RawUI.BackgroundColor -eq $bg) {
$host.ui.RawUI.BackgroundColor = $color
}
else {
$host.ui.RawUI.BackgroundColor = $bg
}
}
Start-Sleep -Milliseconds 350
} #if not typing
#set the cursor position
$host.ui.rawui.CursorPosition=$Coordinate
#write the message on a new line
Write-Host $msg
#see if a key has been pushed
if ($host.ui.RawUi.KeyAvailable) {
#user is typing
$Typing = $True
#filter out shift key
$key = $host.ui.RawUI.ReadKey("NoEcho,IncludeKeyDown")
Switch ($key.virtualKeyCode) {
13 { $Running = $False ; Break}
16 { #Shift key so don't do anything
Break
}
Default{
#add the key to the array
$text+=$key
#display the entered text
if ($AsSecureString) {
#mask the character if asking for a secure string
$out = "*"
}
else {
$out = $key.character
}
#append the character to the prompt
$msg+= $out
}
} #switch
} #if key available
} #while
#reset the original background color
$host.ui.RawUI.BackgroundColor = $bg
$host.ui.RawUI.ForegroundColor = $fg
#write the input to the pipeline
#removing any leading or trailing spaces
$data = (-join $text.Character).Trim()
#convert to SecureString if specified
if ($AsSecureString) {
ConvertTo-SecureString -String $data -AsPlainText -Force
}
else {
#write the read data to the pipeline
$data
}
} #end function
我所做的主要调整是收集所有键入的键,直到按下 Enter 键。我有一个 Switch 结构来消除 Shift 键。假设您正在编写文本,因此这应该是您将使用的唯一非字母数字键。消息提示将持续闪烁,直到您开始输入。我还模拟了在屏幕上回显文本,包括密码屏蔽(如果您使用 AsSecureString)。最后一个更改是一个新参数,允许您闪烁前景色而不是背景色。基于注释的帮助中有几个示例。
这是一些屏幕截图。
我希望你能让我知道你的想法。
- 上一篇:[玩转系统] 看着我!
- 下一篇:[玩转系统] 星期五有趣 文本转 HTML
猜你还喜欢
- 03-30 [玩转系统] 如何用批处理实现关机,注销,重启和锁定计算机
- 02-14 [系统故障] Win10下报错:该文件没有与之关联的应用来执行该操作
- 01-07 [系统问题] Win10--解决锁屏后会断网的问题
- 01-02 [系统技巧] Windows系统如何关闭防火墙保姆式教程,超详细
- 12-15 [玩转系统] 如何在 Windows 10 和 11 上允许多个 RDP 会话
- 12-15 [玩转系统] 查找 Exchange/Microsoft 365 中不活动(未使用)的通讯组列表
- 12-15 [玩转系统] 如何在 Windows 上安装远程服务器管理工具 (RSAT)
- 12-15 [玩转系统] 如何在 Windows 上重置组策略设置
- 12-15 [玩转系统] 如何获取计算机上的本地管理员列表?
- 12-15 [玩转系统] 在 Visual Studio Code 中连接到 MS SQL Server 数据库
- 12-15 [玩转系统] 如何降级 Windows Server 版本或许可证
- 12-15 [玩转系统] 如何允许非管理员用户在 Windows 中启动/停止服务
取消回复欢迎 你 发表评论:
- 精品推荐!
-
- 最新文章
- 热门文章
- 热评文章
[影视] 黑道中人 Alto Knights(2025)剧情 犯罪 历史 电影
[古装剧] [七侠五义][全75集][WEB-MP4/76G][国语无字][1080P][焦恩俊经典]
[实用软件] 虚拟手机号 电话 验证码 注册
[电视剧] 安眠书店/你 第五季 You Season 5 (2025) 【全10集】
[电视剧] 棋士(2025) 4K 1080P【全22集】悬疑 犯罪 王宝强 陈明昊
[软件合集] 25年6月5日 精选软件22个
[软件合集] 25年6月4日 精选软件36个
[短剧] 2025年06月04日 精选+付费短剧推荐33部
[短剧] 2025年06月03日 精选+付费短剧推荐25部
[软件合集] 25年6月3日 精选软件44个
[剧集] [央视][笑傲江湖][2001][DVD-RMVB][高清][40集全]李亚鹏、许晴、苗乙乙
[电视剧] 欢乐颂.5部全 (2016-2024)
[电视剧] [突围] [45集全] [WEB-MP4/每集1.5GB] [国语/内嵌中文字幕] [4K-2160P] [无水印]
[影视] 【稀有资源】香港老片 艺坛照妖镜之96应召名册 (1996)
[剧集] 神经风云(2023)(完结).4K
[剧集] [BT] [TVB] [黑夜彩虹(2003)] [全21集] [粤语中字] [TV-RMVB]
[实用软件] 虚拟手机号 电话 验证码 注册
[资源] B站充电视频合集,包含多位重量级up主,全是大佬真金白银买来的~【99GB】
[影视] 内地绝版高清录像带 [mpg]
[书籍] 古今奇书禁书三教九流资料大合集 猎奇必备珍藏资源PDF版 1.14G
[电视剧] [突围] [45集全] [WEB-MP4/每集1.5GB] [国语/内嵌中文字幕] [4K-2160P] [无水印]
[剧集] [央视][笑傲江湖][2001][DVD-RMVB][高清][40集全]李亚鹏、许晴、苗乙乙
[电影] 美国队长4 4K原盘REMUX 杜比视界 内封简繁英双语字幕 49G
[电影] 死神来了(1-6)大合集!
[软件合集] 25年05月13日 精选软件16个
[精品软件] 25年05月15日 精选软件18个
[绝版资源] 南与北 第1-2季 合集 North and South (1985) /美国/豆瓣: 8.8[1080P][中文字幕]
[软件] 25年05月14日 精选软件57个
[短剧] 2025年05月14日 精选+付费短剧推荐39部
[短剧] 2025年05月15日 精选+付费短剧推荐36部
- 最新评论
-
- 热门tag