Google chrome - 不从顶部和左侧 0 像素启动
Google chrome - not launching from top and left 0 pixels
Google Chrome Stable 我在 Windows 8.1 和 Windows 8.1 Pro 中使用的启动路径如下:
timeout 5 > nul
ping 127.0.0.1 -n 11 > nul
@start /b cmd /c "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe" --kiosk http://www.whosebug.com
10% 的启动次数与全屏模式完全一样。
但是,启动时有 90% 次它不起作用,它启动 Chrome 但它不会从顶部启动,左 0 像素
如果我手动 运行 该批处理文件然后 100% 时间它成功工作,但是当它自动化时它开始混乱
有人可以帮忙吗? (我已经遇到这个问题大约 3 个月了,而且越来越严重,因为还没有找到任何解决方案来永久解决这个问题)
我正在研究 windows 7 32 位 ,所以我创建了这个 vbscript 以便在启动文件夹中创建快捷方式并启动批处理文件处于隐藏模式。
Shortcut4Batch.vbs
Option Explicit
Dim PathApplication,ShortcutName,VbsPath
VbsPath = Wscript.ScriptFullName
PathApplication = "C:\Users\Hackoo\Desktop\Hackoo\BAT\Whosebug\KioskChrome.bat"
ShortcutName = "KioskChrome"
Call Shortcut(VbsPath,ShortcutName)
Call Hidden_Run(Dblquote(PathApplication))
'*********************************************************************************
Sub Shortcut(PathApplication,ShortcutName)
Dim objShell,StartFolder,objShortCut,MyTab
Set objShell = CreateObject("WScript.Shell")
MyTab = Split(PathApplication,"\")
If ShortcutName = "" Then
ShortcutName = MyTab(UBound(MyTab))
End if
StartFolder = objShell.SpecialFolders("Startup")
Set objShortCut = objShell.CreateShortcut(StartFolder & "\" & ShortcutName & ".lnk")
objShortCut.TargetPath = Dblquote(PathApplication)
ObjShortCut.IconLocation = "%SystemRoot%\system32\SHELL32.dll,-25"
objShortCut.Save
End Sub
'*********************************************************************************
Function DblQuote(Str)
DblQuote = Chr(34) & Str & Chr(34)
End Function
'*********************************************************************************
Function Hidden_Run(MyProgram)
Dim ws,Result
Set ws = CreateObject("wscript.Shell")
Result = ws.run(MyProgram,0,True) '0 to hide the program
Hidden_Run = Result
End Function
'*********************************************************************************
KioskChrome.bat
@echo off
@start /b cmd /c "%programfiles%\Google\Chrome\Application\chrome.exe" --kiosk http://www.whosebug.com
Google Chrome Stable 我在 Windows 8.1 和 Windows 8.1 Pro 中使用的启动路径如下:
timeout 5 > nul
ping 127.0.0.1 -n 11 > nul
@start /b cmd /c "C:\Program Files (x86)\Google\Chrome\Application\chrome.exe" --kiosk http://www.whosebug.com
10% 的启动次数与全屏模式完全一样。
但是,启动时有 90% 次它不起作用,它启动 Chrome 但它不会从顶部启动,左 0 像素
如果我手动 运行 该批处理文件然后 100% 时间它成功工作,但是当它自动化时它开始混乱
有人可以帮忙吗? (我已经遇到这个问题大约 3 个月了,而且越来越严重,因为还没有找到任何解决方案来永久解决这个问题)
我正在研究 windows 7 32 位 ,所以我创建了这个 vbscript 以便在启动文件夹中创建快捷方式并启动批处理文件处于隐藏模式。
Shortcut4Batch.vbs
Option Explicit
Dim PathApplication,ShortcutName,VbsPath
VbsPath = Wscript.ScriptFullName
PathApplication = "C:\Users\Hackoo\Desktop\Hackoo\BAT\Whosebug\KioskChrome.bat"
ShortcutName = "KioskChrome"
Call Shortcut(VbsPath,ShortcutName)
Call Hidden_Run(Dblquote(PathApplication))
'*********************************************************************************
Sub Shortcut(PathApplication,ShortcutName)
Dim objShell,StartFolder,objShortCut,MyTab
Set objShell = CreateObject("WScript.Shell")
MyTab = Split(PathApplication,"\")
If ShortcutName = "" Then
ShortcutName = MyTab(UBound(MyTab))
End if
StartFolder = objShell.SpecialFolders("Startup")
Set objShortCut = objShell.CreateShortcut(StartFolder & "\" & ShortcutName & ".lnk")
objShortCut.TargetPath = Dblquote(PathApplication)
ObjShortCut.IconLocation = "%SystemRoot%\system32\SHELL32.dll,-25"
objShortCut.Save
End Sub
'*********************************************************************************
Function DblQuote(Str)
DblQuote = Chr(34) & Str & Chr(34)
End Function
'*********************************************************************************
Function Hidden_Run(MyProgram)
Dim ws,Result
Set ws = CreateObject("wscript.Shell")
Result = ws.run(MyProgram,0,True) '0 to hide the program
Hidden_Run = Result
End Function
'*********************************************************************************
KioskChrome.bat
@echo off
@start /b cmd /c "%programfiles%\Google\Chrome\Application\chrome.exe" --kiosk http://www.whosebug.com