2012-02-18 76 views
0

我必須擁有這種腳本才能自動註冊計算機運行我的程序所需的以下dll文件。手動將所需的dll複製到system32中並不實際註冊該dll,因爲我會看到這就是爲什麼我會嘗試使用從autorun運行以註冊此dll的腳本。我聽說過使用「windows腳本主機」,但我發現很難學習,尤其是當涉及到註冊dll文件到system32。任何建議傢伙?將所需的dll文件包含到我的安裝程序中的腳本

+0

你有所有DLL的列表?或者你只知道需要移動system32文件夾註冊的dll文件夾的位置? – Amol 2012-02-18 11:39:36

+0

是的。我有那種dll。我從我自己的系統32中得到它。我知道這個DLL會導致每當我嘗試運行我的程序到其他沒有安裝.net框架的計算機時,它會提示所需的dll。當我嘗試將其粘貼到system32中時,它根本不會做任何更改 - 仍然存在錯誤。有人教我使用腳本自動註冊該DLL到system32。你知道4M01先生的s?? – Bhabes 2012-02-18 12:17:27

+0

但是你想通過腳本將這個dll從一臺計算機複製到另一臺計算機或什麼? &當你說你在system32中有這些dll時,你是選擇特定的dll還是複製整個文件夾? – Amol 2012-02-18 12:56:08

回答

0

讓我們打破你的問題:

1)假設你有一個文件夾中複製所需的DLL(FOLDERPATH =路徑到此文件夾)&你必須在下面的「TEMP.TXT」文件的dll文件列表格式 -

xolehlp.dll 

xpob2res.dll 

xpsp1res.dll 

2)從一個文件夾複製DLL來system32目錄

3)中註冊此DLLS

ħ ere是必需的代碼:

Option Explicit 
Dim oFSO, WshShell, oTxtFile, sLine ,filePath, folderPath 
Const ForReading=1 


filePath ="C:\Documents and Settings\Amol\Desktop\Temp\FileList.txt" 
'' Filepath is your local path to txt file 

folderPath = "C:\Documents and Settings\Amol\Desktop\Temp\" 
'' folderPath is your path to folder from where you want to copy the dlls 

Set oFSO = CreateObject("Scripting.FileSystemObject") 
Set WshShell = CreateObject("WScript.Shell") 

Set oTxtFile = oFSO.OpenTextFile(filePath, 1) 


Do Until oTxtFile.AtEndOfStream 

    sLine = oTxtFile.ReadLine 
    oFSO.CopyFile folderPath & sLine,"C:\WINDOWS\system32\" 
    sLine = "regsvr32 C:\WINDOWS\system32\"&sLine 
    WshShell.Run sLine 

Loop 
oTxtFile.Close 
+0

它是一個vbscript類型的文件Mr 4M01? – Bhabes 2012-02-20 16:14:10

+0

是否有可能先生4M01腳本將自動將dll複製到「system32」的工作?我的意思是,腳本將從自動運行中運行,並且該腳本會自動將該dll複製到system32。是否可以通過一個VBScript? – Bhabes 2012-02-20 16:16:54

+0

現在用vbscript更新代碼,將dll從提到文件夾複製到system32文件夾 – Amol 2012-02-20 17:24:45

相關問題