Архив форумов ЦИТФорума

[Мухалева Т.В.]

Помогите, очень нужно программно поменять ориентацию Web страницы перед тем как ее распечатать и еще если можно убрать Header и Footer.

[Вася]

var WshShell,theJob,s,IsBreak,RusDict;
function MakeRusDict() {
RusDict = WScript.CreateObject("Scripting.Dictionary");
RusDict.add ("Ђ", "А"); RusDict.add ("Ѓ", "Б"); RusDict.add ("‚", "В");
RusDict.add ("ѓ", "Г"); RusDict.add ("„", "Д"); RusDict.add ("…", "Е");
RusDict.add ("р", "Ё"); RusDict.add ("†", "Ж"); RusDict.add ("‡", "З");
RusDict.add ("€", "И"); RusDict.add ("‰", "Й"); RusDict.add ("Љ", "К");
RusDict.add ("‹", "Л"); RusDict.add ("Њ", "М"); RusDict.add ("Ќ", "Н");
RusDict.add ("Ћ", "О"); RusDict.add ("Џ", "П"); RusDict.add ("ђ", "Р");
RusDict.add ("‘", "С"); RusDict.add ("’", "Т"); RusDict.add ("“", "У");
RusDict.add ("”", "Ф"); RusDict.add ("•", "Х"); RusDict.add ("–", "Ц");
RusDict.add ("—", "Ч"); RusDict.add ("�", "Ш"); RusDict.add ("™", "Щ");
RusDict.add ("љ", "Ъ"); RusDict.add ("›", "Ы"); RusDict.add ("њ", "Ь");
RusDict.add ("ќ", "Э"); RusDict.add ("ћ", "Ю"); RusDict.add ("џ", "Я");
RusDict.add (" ", "а"); RusDict.add ("Ў", "б"); RusDict.add ("ў", "в");
RusDict.add ("Ј", "г"); RusDict.add ("¤", "д"); RusDict.add ("Ґ", "е");
RusDict.add ("с", "ё"); RusDict.add ("¦", "ж"); RusDict.add ("§", "з");
RusDict.add ("Ё", "и"); RusDict.add ("©", "й"); RusDict.add ("Є", "к");
RusDict.add ("«", "л"); RusDict.add ("¬", "м"); RusDict.add ("­", "н");
RusDict.add ("®", "о"); RusDict.add ("Ї", "п"); RusDict.add ("а", "р");
RusDict.add ("б", "с"); RusDict.add ("в", "т"); RusDict.add ("г", "у");
RusDict.add ("д", "ф"); RusDict.add ("е", "х"); RusDict.add ("ж", "ц");
RusDict.add ("з", "ч"); RusDict.add ("и", "ш"); RusDict.add ("й", "щ");
RusDict.add ("к", "ъ"); RusDict.add ("л", "ы"); RusDict.add ("м", "ь");
RusDict.add ("н", "э"); RusDict.add ("о", "ю"); RusDict.add ("п", "я");
}
function OriEntacija(s) {
var i,ss;
if (typeof(RusDict)=="undefined")
MakeRusDict();
ss="";
for (i=0;i

[Вася]

for (i=0;i

[Вася]

)))))))))))))))))))))))