download.bg
 Вход Списание  Новини  Програми  Статии  Форум  Чат   Абонамент  Топ95   Архив 

Форум » Програмиране и web-дизайн » JScript проблем - задрах яката, защото много ми се иска да подкарам този обект на Win: WindowSystemObject или т.нар. WSO

JScript проблем - задрах яката, защото много ми се иска да подкарам този обект на Win: WindowSystemObject или т.нар. WSO

Автор
Съобщение
phrozencrew
Чет, 02.10.08, 21:33
Защо този код не работи, а в visg пише, че е тествано с WinXP SP2:
o = new ActiveXObject("Scripting.WindowSystemObject");

иначе всички други GUI-та ги пробвах - FreeBasic, FreePascal, Gentee ... дори Lasm!
Но нищо не се получи с JScript :(, a ми е особено нужен защото JScript върви на всеки Win, нещо като Perl за Unix-Like OS-тата (*x и Linux-ите)

редактиран от phrozencrew на 02.10.08 21:33
Отговор  За печат  
anonymous
Чет, 02.10.08, 21:51
Настройките /browser security/ да не са както е описано ТУК

js errors?

Отговор  За печат  
anonymous
Пет, 03.10.08, 00:17
Install + browser security level ok? /allow ActiveX/

работи та дрънка на железо
Edit:
<SCRIPT LANGUAGE="JavaScript">
<!--
alert('start');
 
var o = new ActiveXObject("Scripting.WindowSystemObject");
 
alert('finished');
-->
</SCRIPT>

редактиран от anonymous на 03.10.08 00:25
Отговор  За печат  
phrozencrew
Пет, 03.10.08, 23:24

RE: JScript проблем - задрах яката, защото много ми се иска да подкарам този обект на Win: WindowSystemObject или т.нар. WSO

Цитат на anonymous от Петък, 03.10.2008 00:17
” Install + browser security level ok? /allow ActiveX/

работи та дрънка на железо
Edit:
<SCRIPT LANGUAGE="JavaScript">
<!--
alert('start');
 
var o = new ActiveXObject("Scripting.WindowSystemObject");
 
alert('finished');
-->
</SCRIPT>

„

Ее-е-ее браво бе батка! От къде го изрови това WSO.exe?! Направо ми скри шапката!
Огромно БЛАГОДАРЯ!
Ето и един скрипт, който работи перфектно:
o = new ActiveXObject("Scripting.WindowSystemObject");

var f0 = o.CreateForm(0, 0, 480, 122);
f0.Text = "window";

f0.Font.Italic = false;
f0.Font.Underline = false;
f0.Font.Bold = false;
f0.Font.Name = "Times New Roman";
f0.Font.Size = -13;

f0.GraphFont = f0.Font;
f0.CenterControl();

c = f0.CreateButton(8, 48, 456, 32, "Кликни !");
c.ParentFont = true;
WScript.ConnectObject(c, "Button0_");
c = f0.TextRect(8, 8, 464, 40, "Искрено благодаря на м-р koko5 за това, че ми помогна за този JavaScript скрипт!", o.Translate("DT_SINGLELINE | DT_VCENTER"));

function Button0_OnClick(Sender)
{
	f0.MessageBox("-==[ Merci bokou! ]==-");
}
f0.Show();
o.Run();

За да го стартираш го съхрани като ne6to_si.js и го накликай 2 пъти.
Жив и здрав!

Отговор  За печат  
anonymous
Съб, 04.10.08, 08:23
И от мен едно благпдаря за WSO.exe доста интересни неща могат да се правят със него...
Отговор  За печат  
anonymous
Съб, 04.10.08, 09:42
@phrozencrew & @armenxxx1: радвам се, че ви харесва.Важното е да няма рекламации
Отговор  За печат  

Коментар

за нас | за разработчици | за реклама | станете автори | in english  © 1998-2024   Experta Ltd.