Salve como arquivo HTA, apenas
O código é o seguinte:
<html>
<head>
<title> Ferramenta de consulta de codificação de fontes wubi </ititle>
<metahttp-equiv = "content-type" content = "text/html; charset = gb2312"/>
<HTA: Aplicação
MaximizeButton = "não"
Icon = "http://www.w3cg.net/wubi/wb.ico"
Id = "wubiapp"
SingleInstance = "Sim"
Contextmenu = "sim"
Sysmenu = "sim"
Windowstate = "Normal"
Border = "Thin"
Minimizebutton = "sim"
ApplicationName = ""
Versão = "1.0"
INNERBORDER = "NÃO"
Legenda = "Sim"
ShowIssaskbar = "Não"
/>
<styleType = "text/css">
<!-
corpo {background:#d4d0c8;}
*{Font-Family: Arial, Sans-Serif; font-size: 9pt; cor:#333;}
#Main {Width: 100%; Altura: 100%;}
Textarea {altura da linha: 130%;}
A: Link, a: visitado {decoração de texto: nenhum;}
->
</style>
<scriptLanguage = "javascript">
<!-
varurl = "http://www.w3cg.net/wubi/";
varbtv1 = "Você pode selecionar a função desejada alterando a caixa de listagem suspensa";
varbtv2 = "Obrigado por compartilhar, você pode clicar aqui para enviar essas informações de codificação de caracteres chinesas";
varbtv3 = "Se você tem certeza de que escreveu uma mensagem, clique aqui para enviá -la ao autor";
varbtv4 = "enviando dados para o servidor, aguarde ....";
varxmlhttp;
tentar{
xmlHttp = newActivexObject ("Microsoft.xmlHttp");
}
Catch (e) {
alerta ("Desculpe, você não pode criar objetos do sistema, verifique as configurações do sistema.");
xmlhttp = false;
}
functionTrim (str) {
str = str.place (/^/s*/, "");
str = str.Replace (// s*$/, "");
returnstr;
}
functionwindow.onload () {
VarAwidth, ahight;
Varswidth, Sheight;
Awidth = 600;
Ahight = 300;
swidth = screen.width;
show = screen.Height;
Window.Resizeto (dewidth, Aheight);