Вывод значения переменной в сообщение [Версия для КПК]

Показать полную графическую версию : Вывод значения переменной в сообщение

la_vanille_ciel

09-04-2008, 08:59

Как вывести значение РР1 в этом коде:

On Error Resume Next
Dim WSh, FSO, P1

Set WSh = WScript.CreateObject("WScript.Shell")
Set FSO = WScript.CreateObject("Scripting.FileSystemObject")

P1 = WSh.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Autodesk\AutoCAD\R16.1\ACAD-301:419")
PP1 = P1 & "\Graph\Support"
If FSO.FolderExists(PP1) Then FSO.CopyFolder "\\Uzdp-files\share_shell\New_Stamps_CAD\NewShortName", PP1, True

amel27

09-04-2008, 11:08

если правильно понял:WScript.Echo PP1

la_vanille_ciel

09-04-2008, 11:52

ДААААААААААААААААААААААааааа :yahoo: :yahoo: :yahoo: :yahoo: :yahoo: :yahoo: :yahoo: :yahoo: у меня приняли скрипт!!!!!!!!!!!!!!!!!!!!!!! :clapping: ВСЕМ СПАСИБО :kiss:

amel27

09-04-2008, 11:55

поздравляю, приходите еще :)