Замена ключевому слову null в AutoIt

[dwerf]

Как следующий vb-скрипт переписать на AutoIt?

set SchemaCache = CreateObject("Msxml2.XMLSchemaCache")
SchemaCache.Add "", null

Пробовал вместо null писать 0, '', '0', 'null'.

Выдаётся ошибка: "The requested action with this object has failed."

$SchemaCache = ObjCreate("Msxml2.XMLSchemaCache")
$SchemaCache.Add("", "")

 

[Yashied]

null, это всегда 0 (не строка).

 

[dwerf]

null, это всегда 0 (не строка).

Майкрософт с Вами не согласен:
И AutoIt и Vbs выдают ошибку если в методе add написать 0.

MsgBox("Null1: " & 0 & vbCrLf & "Null2: " & null)

---------------------------
---------------------------
Null1: 0
Null2: 
---------------------------
OK   
---------------------------

 

[Kalisnik]

False? :blink:

 

[dwerf]

False? :blink:

И True тоже нет.

 

[Kalisnik]

Наверно это с моей стороны совсем глупо, но мало ли... может пробельный символ попробовать? Хотя это уже получается True. :wacko:

P.S Или 0.0 - методом тыка ;D

 

[madmasles]

dwerf
Может быть, Chr(0)?

 

[dwerf]

Нет, всё не то.
Неинициализированая переменная тоже не подходит.
Может какой нибудь другой объект поискать, у которого в аттрибутах по умолчанию null стоит?

 

[Yuri]

$SchemaCache = ObjCreate("Msxml2.XMLSchemaCache")
MsgBox(0, "Msxml2", $SchemaCache&" error "&@error);ничего вообще не выдает


$oRemoteMedia = ObjCreate("MediaPlayer.MediaPlayer.1","name-of-remote-computer")
MsgBox(0, "MediaPlayer", $oRemoteMedia&" error "&@error)

 

[dwerf]

Ошибки нет, вот и не выдаёт.

$SchemaCache = ObjCreate("Msxml2.XMLSchemaCache")
MsgBox(0, "Msxml2", $SchemaCache&" error "&@error)


$oRemoteMedia = ObjCreate("MediaPlayer.MediaPlayer.1")
MsgBox(0, "MediaPlayer", $oRemoteMedia&" error "&@error)

Dim $a[2] = [1, 2]
MsgBox(0, '', $a & ' text')

Любопытный эффект кстати, что даже 'error' пропадает.
Но толку мне с этого немного.

 

[CreatoR]

Можно попробовать так:

Global Const $NULL = _VarGetNull()

$SchemaCache = ObjCreate("Msxml2.XMLSchemaCache")
$SchemaCache.Add($NULL, $NULL)

Func _VarGetNull()
    Local $oVBS, $sNothing
    
    $oVBS = ObjCreate("ScriptControl")
    $oVBS.Language = "VBScript"
    $sNothing = $oVBS.Eval("Nothing")
    
    Return $sNothing
EndFunc

 

[kaster]

а может

$SchemaCache.Add("")

?

 

[dwerf]

На английском форуме тоже самое написали.
Default не идёт, $SchemaCache.Add("") не идёт, ScriptControl нет в системе (где бы его взять? Вчера качал что-то у майкрософта - не смог установить).


Добавлено:

Сообщение автоматически объединено: 22 Янв 2011

http://www.microsoft.com/downloads/en/details.aspx?FamilyID=D7E31492-2595-49E6-8C02-1426FEC693AC&displayLang=en

Вроде оно, семёрка не поддерживается...

 

[CreatoR]

Тема решена, т.к в последней бете добавили Null.