作者：胡舜良
本 人 在 维 护 公 司 内 部 网 站 时 碰 到 一 个 实 际 问 题 — —MIS 主 管 要 求 将 一 些 技 术 文 件 放 在 网 页 上， 且 只 能 让MIS 的 员 工 浏 览。 这 就 涉 及 到 如 何 对 网 页 保 密 的 问 题。
最 初 我 借 助Frontpage 和Vbscript 设 计 了 一 种 方 案， 链 接MIS 技 术 页（ 此 处 预 设 为actpwdrst.htm） 之 前， 先 链 接actpwd.htm 输 入 名 称 和 密 码（ 此 处 名 称 和 密 码 都 预 设 为“mis”）, 只 有 正 确 输 入 后， 才 能 链 接 到actpwdrst.htm。 以 下 是 它 们 的 代 码。
Actpwd.htm 代 码 如 下：
< html
< head
< title 密 码< /title
< /head
< body
< form name=“form1”
< input type=“hidden”
name=“VTI-GROUP”_ value=“0”
< div align=“center” < center < p
名 称< input type =“text”
name=“T1” size=_“20”
密 码< input type =“password”
name=“T2”_ size=“20”
< input type=“button” value=“
确 认”_ name=“B1”
< /p < /center < /div
< /form
< p
< script language=“vbscript”
< !-
sub b1_onclick()
if form1.t1.value=“mis” and_ form1.t2.value=“mis” then
document.location=_“actpwdrst.htm”
else
m1=msgbox(“ 密 码 错 误_
”,0+48, “Warring”)
end if
end sub
// --
< /script
< /p
< /body
< /html
Actpwdrst.htm 代 码 如 下：
< html
< head
< title 密 码< /title
< /head
< body
< p align=“center”
< font face=“ 标 楷 体” size=“7” color=“0000ff”
< strong
你 已 成 功 登 录 ！
< /strong
< /font
< /p
< /body
< /html
细 心 的 朋 友 可 能 已 发 现 这 种 方 案 的 不 可 靠 性 — — 输 入 和 判 断 都 在actpwd.htm 中 完 成， 不 管 输 入 的 名 称 和 密 码 是 不 是 正 确 的， 只 要 记 住 了actpwdrst.htm 所 在 的URL, 根 本 就 不 需 要 通 过actpwd.htm 就 可 直 接 链 接actpwdrst.htm。 所 以 这 种 方 案 的 保 密 系 数 就 不 是 很 好。
下 面 看 看 采 用 ASP 设 计 的 方 案。 链 接MIS 技 术 页（ 此 处 预 设 为 asppwdrst.asp） 之 前， 先 链 接asppwd.asp 输 入 名 称 和 密 码（ 此 处 名 称 和 密 码 都 预 设 为“mis”）, 只 有 正 确 输 入 后， 才 能 链 接 到asppwdrst.asp。 以 下 是 它 们 的 代 码。
Asppwd.asp 代 码 如 下：
< html
< body
< form name=“form1” action=
“asppwdrst.asp” method_
=“POST”
< input type=“hidden” name=
“VTI-GROUP” value=_“0”
< div align=“center” < center < p
名 称< input type=“text”
name=“T1” size=“20”
密 码< input type =
“password” name=“T2” size=_“20”
< input type=“submit” value=
“ 确 认” name=_“B1”
< /p < /center < /div
< /form
< /body
< /html
Asppwdrst.asp 代 码 如 下：
< html
< % if rtrim(request.form(“t1”))=
“mis” and_ rtrim(request.form(“t2”))=
“mis” then %
< body
< p align=“center” < font face=
“ 标 楷 体” size=“7”_ color=“#0000ff”
< strong 你 已 成 功 登 录 ！
< /strong < /font < /p
< /body
< % else %
< body
< p align=“center” < font face=
“ 标 楷 体” size=“7”_ color=“#0000ff”
< strong 请 输 入 正 确 的 用 户 名 和 密 码
<
