2010-05-31 13:25 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
+ contrib/hbwin/tests/oletst2.vbs
+ contrib/hbwin/tests/oletst2.js
+ Added vbscript and jscript test code.
* contrib/hbwin/tests/oletst3.bas
! Fixed SVN props.
This commit is contained in:
@@ -17,6 +17,14 @@
|
||||
past entries belonging to author(s): Viktor Szakats.
|
||||
*/
|
||||
|
||||
2010-05-31 13:25 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
|
||||
+ contrib/hbwin/tests/oletst2.vbs
|
||||
+ contrib/hbwin/tests/oletst2.js
|
||||
+ Added vbscript and jscript test code.
|
||||
|
||||
* contrib/hbwin/tests/oletst3.bas
|
||||
! Fixed SVN props.
|
||||
|
||||
2010-05-31 12:58 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
|
||||
* contrib/hbqt/hbqt.h
|
||||
* contrib/hbqt/hbqt_hbqtableview.h
|
||||
|
||||
16
harbour/contrib/hbwin/tests/oletst2.js
Normal file
16
harbour/contrib/hbwin/tests/oletst2.js
Normal file
@@ -0,0 +1,16 @@
|
||||
/*
|
||||
* $Id$
|
||||
*/
|
||||
|
||||
/*
|
||||
* Copyright 2010 Viktor Szakats (harbour.01 syenar.hu)
|
||||
* www - http://www.harbour-project.org
|
||||
*
|
||||
* See COPYING for licensing terms.
|
||||
*/
|
||||
|
||||
{
|
||||
var tst2 = new ActiveXObject( "MyOleTimeServer" );
|
||||
|
||||
WScript.CreateObject("Wscript.Shell").Popup( ">" + tst2.TIME() + "<" );
|
||||
}
|
||||
12
harbour/contrib/hbwin/tests/oletst2.vbs
Normal file
12
harbour/contrib/hbwin/tests/oletst2.vbs
Normal file
@@ -0,0 +1,12 @@
|
||||
'
|
||||
' $Id$
|
||||
'
|
||||
|
||||
' Copyright 2010 Viktor Szakats (harbour.01 syenar.hu)
|
||||
' www - http://www.harbour-project.org
|
||||
'
|
||||
' See COPYING for licensing terms.
|
||||
|
||||
Dim tst2 : Set tst2 = WScript.CreateObject("MyOleTimeServer")
|
||||
|
||||
WScript.CreateObject("Wscript.Shell").Popup tst2.Time()
|
||||
Reference in New Issue
Block a user