經(jīng)常使用xshell的用戶都知道，當(dāng)我們想把數(shù)據(jù)復(fù)制到剪貼板上時候，第一個反應(yīng)就是工具 -> 選項 -> 鍵盤和鼠標 -> 將選定的文本自動復(fù)制到剪貼板中進行設(shè)置，那當(dāng)我們逐行發(fā)送剪貼板數(shù)據(jù)的時候該怎么辦了？有什么簡單的方法了，本集小編就來給大家叨叨。

問題描述：

這篇文章解釋了如何逐行發(fā)送剪貼板數(shù)據(jù)使用一個簡單的腳本文件和Xshell腳本功能。

xShell腳本與Windows/Dos下的批處理相似，也就是用各類命令預(yù)先放入到一個文件中，方便一次性執(zhí)行的一個程序文件，主要是方便管理員進行設(shè)置或者管理用的。

解決方法：

將剪貼板數(shù)據(jù)發(fā)送。它可以是有用的命令,如果你有多個行就要檢查每個命令的結(jié)果
Sub Main

xsh.Screen.Synchronous = true

Dim clpData, objIE, rlines

Set objIE = CreateObject("InternetExplorer.Application")

objIE.Navigate("about:blank")

clpData = objIE.document.parentwindow.clipboardData.GetData("text")

rlines = Split(clpData, VbCrLf, -1)

Dim i

For i = 0 to ubound(rlines) Step 1

xsh.Screen.Send rlines(i)

xsh.Session.sleep(100)

xsh.Screen.WaitForString VbCr

Next

xsh.Screen.Synchronous = false

End Sub

影響軟件：

Xshell 4

以上就是用一個腳本逐行發(fā)送剪貼板數(shù)據(jù)的整理，如果想要更多的了解xshell腳本問題敬請關(guān)注：xshell腳本如何運行和結(jié)束

文章內(nèi)容為原創(chuàng)，轉(zhuǎn)載請注明出處： http://www.pw51.cn/wenti/fs-jst.html