vbscript

0熱度

2回答

我有一個vbscript，將特定範圍的行轉換爲csv文件。我的問題是它也複製空行而不需要藍色行。如何在複製之前刪除這些完整的空行或將它們從複製中排除？我的代碼： Public Sub xlsToCsv() Const WorkingDir = "C:\Test\" Const xlCSV = 24 Const xlUp = -4162 Dim fso

0熱度

1回答

Qlikview - 在標籤/ qvw文檔中滾動時凍結對象的位置

是否有Qlikview擴展程序允許當前選擇框和搜索條件（在選項卡頂部）在我們向下滾動任何文檔時可見？一些類似於Excel中的「頂行凍結」的東西，不過是用它來代替對象。非常感謝！

0熱度

1回答

如何在沒有給出條目的情況下結束vbs文件

如果未輸入密碼，我將如何結束vbs文件，如果單擊「好」，它將繼續。如果沒有輸入任何內容，我希望它結束。是可能的嗎？ If InputBox("Please enter the passcode.", "Restricted access") = "Passcode" Then MsgBox "Correct passcode. You may continue. Dim speaks,

-2熱度

1回答

如何防止從vbs腳本運行.bat文件時出現cmd.exe和conhost進程

我正在使用下面的vbs腳本來運行我的file.bat批處理腳本以防止命令propmt窗口出現但我注意到vbs腳本每次運行時都會在任務管理器中生成cmd.exe和conhost進程。任何想法如何我可以防止他們出現？ Set WshShell = CreateObject("WScript.Shell") WshShell.Run "file.bat", 0 Set WshShell = Noth

0熱度

1回答

打開循環中的每個文件

我在寫一個子程序，需要從目錄中的文件中提取文本。例程如下。只要目錄中只有一個文件，它就會工作。當有多個時，它會告訴我Set intFSO = intFSO.OpenTextFile(filePath, 1)下面的一行。我認爲有一些事情我需要做的重置下一個文件，但我似乎無法弄清楚它是什麼。有小費嗎？ Sub ExtractEDI(folPath) Dim sName, fil

0熱度

1回答

在表格中添加文本區域並將其保存到SQL Server數據庫

我使用的是傳統ASP向從數據庫顯示行的表中添加註釋函數。插入的行將保存到數據庫保存備註但下面的代碼不起作用。 <% Dim fRemark fRemark = Request.Form("Remarks") Dim rsIntra,MyQryItr2 set cnIntra = Server.CreateObject("ADODB.Connection")

-2熱度

2回答

VBScript無法迭代XML節點

這是我的代碼片段，這部分是讀取XML文件並獲取操作的最後一個子屬性。在這種情況下，我想獲得類型C.事實是，腳本跳過了整個For循環，正如我所說的回聲所證明的那樣。我做了一些搜索，但仍然無法找到我的代碼出了什麼問題。 Set FSO = CreateObject("Scripting.FileSystemObject") Set xmlDoc = CreateObject("Microsoft.X

1熱度

1回答

在沒有prnadmin.dll的情況下使用powershell安裝「打印機窗體」？

由於來自Microsoft的最新安全更新已將Jet OLEDB Provider無法使用，因此我必須重寫幾個較老的VBScript。是否有更好的方法在Windows Server 2008 R2和2012 R2上安裝打印機表單，然後通過regsvr32/COM/VBscript調用過時的prnadmin.dll？ prnadmin.dll最初與Windows Server 2000 Resour

2熱度

1回答

未使用粘貼特殊複製單元格邊框

VB新手腳本。我的問題是2部分：我需要從一個Excel表複製450列標題到另一個Excel數據表。標題具有表格邊框並被格式化。我在網上查找了一些例子，並將這個腳本放在一起進行復制。但是，單元格邊框不被複制。只是文本 - 所以標題格式不會結轉。下面是我的代碼。這是不是粘貼邊界的正確方法？一旦用邊框複製，如果我要將此工作表複製到另一個工作表，那麼單元格邊框和格式化是否也會繼續？ Set

0熱度

1回答

使用VB腳本實現自動登錄

我想實現自動登錄到我的網站usinf VBscript並通過cmd上的批處理命令運行它。自動登錄得到完成，但還我得到以下錯誤： VB腳本運行錯誤對象所需IPF 請幫忙爲什麼我收到這個錯誤？這裏是代碼 Set IE = CreateObject("InternetExplorer.Application") IE.navigate "mysitename" IE.Visible = True