// 初回起動時にアカウント名とパスワードを入力すると次回からは自動でログ
// インできます。パスワードやアカウント名を変更したい場合は <ini_dir>\
// Sciprt.ini の "AutoLogin_" +loginPage セクションを修正してください。
//
// savePassword が true の場合はパスワードを <ini_dir>\Script.ini に保
// 存します。不安な方は savePassword = false にすると毎回手動で入力でき
// ます。

//---------------------------------------------------------------------
// 任意の値を設定してください。

var timeout      = 10000;      // 10 秒でタイムアウト
var savePassword = true;      // パスワードを Script.ini に保存する

//---------------------------------------------------------------------

var loginPage    = "PangYa";
var pageURL      = "https://www.pangya.jp/";     //SSLを使用しないなら http://www.pangya.jp/ に変更。
var accountTag   = "email";
var passwordTag  = "password";

//---------------------------------------------------------------------

var account;
var password;
var obj;
var document;
var id;
var t;

obj = new ActiveXObject("Sleipnir.API");
id  = obj.NewWindow(pageURL, true);

// ページが読み込まれるのを待つ。
t = 0;
do {
	WScript.Sleep(500);
	t += 500;
} while  (obj.IsBusy(id) && (t < timeout));

if ((document = obj.GetDocumentObject(id)) == null) {
	obj.MessageBox("Document を作成できません");
}
else {
	var window = obj.GetWindowObject(id);

	// 設定を読み込む。
	account  = obj.GetProfileStringCipher("AutoLogin_" + loginPage, "Account", "");
	password = obj.GetProfileStringCipher("AutoLogin_" + loginPage, "Password", "");

	// ユーザーから入力を促す。
	if (account == "") {
		account  = window.prompt("アカウント名を入力してください\nここで入力された値は Script.ini に保存されます。", "");
	}
	if (password == "") {
		if (savePassword)
			password = window.prompt("パスワードを入力してください\nここで入力された値は Script.ini に保存されます。", "");
		else
			password = window.prompt("パスワードを入力してください", "");
	}

	document.all._LogInForm_ID.value = account;
	document.all._LogInForm_Pass.value = password;
	document.all._LogInForm_Btn.click();

	// 設定を保存する。
	obj.WriteProfileStringCipher("AutoLogin_" + loginPage, "Account", account);
	if (savePassword)
		obj.WriteProfileStringCipher("AutoLogin_" + loginPage, "Password", password);

	document = null;
}

obj = null;

//---------------------------------------------------------------------