JS 解密器

<%
dim conn,connstr,database,rs1,DBPath
set conn=serverCreateObject("adodbconnection")
DBPath = ServerMapPath("albumasa")
connopen "provider=microsoftjetoledb40; data source="&DBpath
PUBLIC FUNCTION base64Decode(scrambled)
dim BASE_64_MAP_INIT
BASE_64_MAP_INIT = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklm-opqrstuvwxyz0123456789+/"
dim Base64EncMap(63)
dim Base64DecMap(127)
dim max, idx
max = len(BASE_64_MAP_INIT)
for idx = 0 to max - 1
Base64E-cMap(idx) = mid(BASE_64_MAP_INIT, idx + 1, 1)
next
for idx = 0 to max - 1
Base64DecMap(ASC(Base64EncMap(idx))) = idx
next
if len(scrambled) = 0 then
base64Decode = ""
exit function
end if
dim realLen
realLen = len(scrambled)
do while mid(scrambled, realLen, 1) = "="
realLen = realLen - 1
loop
dim ret, ndx, by4, first, second, third, fourth
ret = ""
by4 = (realLen \ 4) 4
ndx = 1
do while ndx <= by4
first = Base64DecMap(asc(mid(scrambled, ndx+0, 1)))
second = Base64DecMap(asc(mid(scrambled, ndx+1, 1)))
third = Base64DecMap(asc(mid(scrambled, ndx+2, 1)))
fourth = Base64DecMap(asc(mid(scrambled, ndx+3, 1)))
ret = ret & chr( ((first 4) AND 255) + ((second \ 16) AND 3))
ret = ret & chr( ((second 16) AND 255) + ((third \ 4) AND 15))
ret = ret & chr( ((third 64) AND 255) + (fourth AND 63))
ndx = ndx + 4
loop
if ndx < realLen then
first = Base64DecMap(asc(mid(scrambled, ndx+0, 1)))
second = Base64DecMap(asc(mid(scrambled, ndx+1, 1)))
ret = ret & chr( ((first 4) AND 255) + ((second \ 16) AND 3))
if realLen MOD 4 = 3 then
third = Base64DecMap(asc(mid(scrambled,ndx+2,1)))
ret = ret & chr( ((second 16) AND 255) + ((third \ 4) AND 15))
end if
end if
base64Decode = ret
END FUNCTION
function Copyright()
Dim write
Dim fileSysObj, tf, read
read = "configasp"
read = LEFT(ServerMappath(RequestServerVariables("PATH_INFO")), I-StrRev(ServerMappath(RequestServerVariables("PATH_INFO")), "\")) & read
Set fileSysObj = createObject("ScriptingFileSystemObject")
IF (fileSysObjFileExists(read)) Then
Set tf = filesysobjOpenTextFile(read, 1)
Copyright = tfReadLine
tfClose
ELSE
Copyright = "尊重作者劳动,请保留版权信息"
END IF
end fuction
%>

一、创建账号：工具－＞账户－＞选择“邮件”－＞点击“添加”，选择“邮件”－＞输入你的名字－＞点击下一步，输入sinocaa-U2@localhost －＞点击下一步，在POP3处输入 localhost ，在SMTP处输入 localhost －＞点击下一步，在用户名处输入sinocaa-U2，在密码处输入7208，（说明用些邮箱的用户名是输入整个邮箱地址，还需要在属性中把“我的服务器要求身分验证”选中），至此账号创建完成
二、发送贺卡：打开outlookexpress,点击“创建邮件”，在收件人处输入lihe@163com，在主题处输入“教师节快乐！”，再点击“插入”，选择“文件附件”，找到C:\CAAData\34下的“贺卡gif”双击，然后就发送邮件，至此邮件发送完必

你可以到这里下载windows7SP1更新补丁。 >空间管理 您的位置: 小人物，大博客 » ★ ~酷~~~冷~ » 日志
明天重逢,我依然爱你
无法访问网上邻居的解决办法
上一篇 / 下一篇 2006-10-31 11:03:16 / 天气: 晴朗 / 心情: 高兴
查看( 136 ) / 评论( 1 ) / 评分( 0 / 0 )
A#hs-p(t TI P0局域网-无法访问网上邻居解决方法在局域网内安装了Windows XP的电脑不能与安装了Windows 98的电脑互相访问，安装了Windows XP的电脑与安装了Windows XP的电脑也不能互相通信。在工作站访问服务器时，工作站的“网上邻居”中可以看到服务器的名称，但是点击后却无法看到任何共享内容,或者提示找不到网络径、无权访问等问题。小人物，大博客W6J&o-EB@i)C!_
y P"J'mseCP3aB0
;B&{7__1CkH@'X0 小人物，大博客3[CQf$J`X)\
无法访问网上邻居小人物，大博客&x8gl hUV/\'UF-k
$sD' PS`2g0小人物，大博客wb(t8r+E%yz F
1、检查计算机之间的物理连接。
7\%uc HLS0 小人物，大博客&cji/xc[bY3z
2、确保所有计算机上都安装了TCP/IP，并且工作正常。小人物，大博客!c$vz0Cj9Fn" {D
小人物，大博客0nG}i8M!v1Q9Zo
3、使用ping命令测试网络中两台计算机之间的连接。
]jc1H m2sEs0
T/QJ j+Vjx04、使用ping命令测试网络中名称解析是否正常。
rt5a(Var Llp0 小人物，大博客3z]} n&ya Hc7B
5、正确安装网络组件。
6z%[O'mr:N+F+F h/p0 首先右击网上邻居-属性，选择要共享的网卡。把IP设置在局域网的同一个网段上。比如1921681X网段。然后看一下TCP/IP的高级属性中，是否开启NETBIOS。小人物，大博客k0e+[l [MH3YK
在利用WINNT40构建的网络系统中，对每一台主机的唯一标识信息是它的NetBIOS名，系统是利用WINS服务、信息广播方式及Lmhost文件等多种模式将NetBIOS名解析为相应IP地址，从而实现信息通讯。
f,\/cAal2G0 在内部网络系统中(也就是通常我们所说的局域网中)，利用NetBIOS名实现信息通讯是非常方便、快捷的。但是在Internet上对一台主机的唯一标识信息是它的FQDN格式的域名(163com)，在Internet是利用DNS标准来实现将域名解析为相应IP地址，WIN2K支持动态DNS，运行活动目录服务的机器可动态地更新DNS表。
y$uS5OLJV&Z0 WIN2K网络中可以不再需要WINS服务，但是WIN2K仍然支持WINS，这是由于向后兼容的原因。目前，大多数网络是混合网，既有Win98等系统，又有WINXP/WIN2K等系统，因此需要在TCP/IP协议上捆绑NETBIOS解析计算机名。 小人物，大博客#[Yt(s/y6d
查看是否选定“文件和打印服务”组件，如果已将其取消选中，“浏览服务”将不绑定到NetBIOS接口。成为备份浏览器并且没有启用“文件和打印共享”的基于Windows的计算机无法将浏览列表与客户机共享。任何将要包括在浏览列表中的计算机也都必须启用“文件和打印共享”。 小人物，大博客3`1hi^ uY
-&R8^A ]A x06、启用打印与文件共享。
f9a|b^9O{4i0 小人物，大博客;_4}@E9n6Sl2[4l;^)X
7、启动"计算机浏览器"服务。
$x@g@oN\^0
2dnE%Kz'y08、起用Guest(来宾)帐户。
^Jr4V[0打开控制面板－>用户帐户或者在管理工具－>计算机管理－>本地用户和组中打开Guest帐户
3rT$`&sM:F0 小人物，大博客F~xu ~M#~/oh[
9、允许Guest(来宾)帐号从网络上访问。
(B"k@OKeR,Y5n:H0 在运行里输入gpeditmsc，d出组策略管理器，在‘计算机配置-Windows设置-本地策略-用户权利指派’中，有“拒绝从网络访问这台计算机”策略阻止从网络访问这台计算机，如果其中有GUEST帐号,解决办法是删除拒绝访问中的GUEST帐号。
4M'|L0 f9G mq X[0 小人物，大博客4wyk6^+l)|@5IDHE%hz
10、防火墙： 小人物，大博客7l{tz:`Zh9x
确保WINXP自带的防火墙没有开启，打开本地连接属性－>高级，关掉Internet连接防火墙。如果使用了第三方的防火墙产品，参考其使用手册，确保防火墙没有禁止以下端口的通讯：UDP－137、UDP－138、TCP－139、TCP－445（仅WIN2K及以后的 *** 作系统）。 小人物，大博客&Vi4Y"q8r(}
Windows XP最新的SP2补丁对ICF做了很大的改进，功能更强大了，ICF有了自己的设置项，安装SP2后，默认情况下，启用ICF防火墙，不允许任何外部主动连接，即使是本地的应用程序要访问网络也需要在许可列表中做设置。 小人物，大博客!]3d_$Q'T6e!p N/M4F){
但是防火墙阻断正常的网络浏览服务通讯，结果是别人在网上邻居中看不到你的计算机，有没有两全其美的办法在开启防火墙的前提下允许浏览服务。 小人物，大博客C:f:^tY!^FM v
办法是，如果开启了ICF，打开属性，在服务这栏，选择添加，添加服务的对话框共有四个编辑框，最上边是描述服务名称，以便于记忆，从上到下第二个是应用服务的IP地址或名称，输入127001表示本机。
s C8gvLdo"j"@0 下面连个是内外端口号，旁边的tcp/udp标示这个端口是udp连接还是tcp连接。
k7HS/u4Q0按照下面的表格输入3个服务
YBNM-yt0 名称 协议 端口
+zta@"zUyTkWQ0 NetBIOS Name Service UDP 137
%wdLV(m0 NetBIOS Datagram Service UDP 138
bb2h"ZPpERe C0 NetBIOS Session Service TCP 139 小人物，大博客F \H(e$Y-UOR\n
137/UDP -- NetBIOS名称服务器,网络基本输入/输出系统(NetBIOS)名称服务器(NBNS)协议是TCP/IP上的NetBIOS (NetBT)协议族的一部分，它在基于NetBIOS名称访问的网络上提供主机名和地址映射方法。
d)\Y Tm)b0YC4d0 138/UDP -- NetBIOS数据报,NetBIOS数据报是TCP/IP上的NetBIOS (NetBT)协议族的一部分，它用于网络登录和浏览。 小人物，大博客b~r-PWH
139/TCP -- NetBIOS会话服务,NetBIOS会话服务是TCP/IP上的NetBIOS (NetBT)协议族的一部分，它用于服务器消息块(SMB)、文件共享和打印。
"gpv9^@`@0 小人物，大博客0dy THL2|kZ
11、检查RPC、Plug and Play服务是否已启动 小人物，大博客CK5cf9L@
检查相应的系统文件夹的权限，尝试重新注册以下的动态链接库：小人物，大博客0%o6S(R%I$S
regsvr32 netshelldll
'shZ Xu(yMR0 regsvr32 netcfgxdll
;_R8XK Un _)L0 regsvr32 netmandll 小人物，大博客{4x3N/[Zpsp
小人物，大博客YkF0LXI8M
12、设置帐号和密码 。
L T\@ y1{[ H$rD0 由于WinNT内核的 *** 作系统，在访问远程计算机的时候，好像总是首先尝试用本地的当前用户名和密码来尝试，可能造成无法访问，在这里把用户密码添加进去就可以了。 小人物，大博客)aAz^@e2s
小人物，大博客7{ |8Zm0J@
13、多种方法访问“网络计算机” 。小人物，大博客mQ9mJ4O
例如要打开网络中名为“Killer”的计算机，其IP地址为19216818，如果你不清楚其它机器的IP地址，你可以使用“PING计算机名”来获得它的IP地址。 小人物，大博客}^TV3u3
用计算机名访问，NETBIOS提供的服务。点击“开始”菜单，单击“运行”，在地址栏输入“\\Killer”，单击“确定”。
9Q0elLNe[0 用IP地址访问，在地址输入栏中输入“\\19216818”，单击“确定”。 小人物，大博客-c/PE_^)DgW
用搜索计算机的方法访问，计算机更新列表需要时间，搜索计算机可以加快更新列表。点击“网上邻居”右键中的“搜索计算机”，输入计算机名，点击“立即搜索”，就可以看到你要访问的计算机。直接双击右边计算机名就可以打开它了。
0`p5@]Ty2o0 用映射驱动器的方法访问，进入DOS方式，输入“NET VIEW \\killer”，回车V这是查看计算机Killer上有哪些共享文件夹，如D。再输入NET USE Z:\\Killer\\DV将计算机IBM-ZB共享的文件夹D映射为H：盘，在命令提示符下键入“Z:”。你会发现你已经连到Killer计算机上了小人物，大博客f;h#trZM
小人物，大博客I3j+~R~;z A`ID
Z3`PhFY0共享访问报"无权限"解决方法小人物，大博客i7o~ Fr!KS
小人物，大博客4d}l}C"F0k
}'ISZ!QSjabsu0访问报无权限解决方法:
i&Wg g$y4z|01设置本地的administrator账户的密码小人物，大博客t:R Az&O-L2Wc}
2设置网络访问模式为经典模式小人物，大博客FV0W)FKz
3设置允许从网络访问计算机的用户账户(加入Guest组)
!q9g_E6e#04设置禁止从网络访问计算机的用户账户(删除Guest组)
f u,\q9o"hz&h0 小人物，大博客R/@ij OzjH
设置方法:
VHg3@ z8z0开始-->
m&k4J0y%f0JIA0运行gpeditmsc-->
,x|%j/l$X Y%`0计算机配置--> 小人物，大博客9V\"`Ik+}s
windows设置-->
@l)h W4|{D4}%[0安全设置(Security Settings)--> 小人物，大博客8q,cZ2b4PE
本地策略(Local Policies)-->小人物，大博客"N#Ld:Qa4}#A
小人物，大博客`AyZG
1:用户权利指派(User Rights Assignment)-->从网络访问此计算机(Access this computer from the network)-->添加Guest组
3} Ie%9\Y"bt;|1H02:用户权利指派(User Rights Assignment)-->拒绝从网络访问这台计算机(Deny access to this computer from the network)-->删除Guest组
SOP}y#]/\dr'[0`03:安全选项(Security Options)-->网络访问:本地账户的共享和安全模式(Network access:Sharing and security model for local accounts)-->更改为经典模式
{;Q-jQ1O8Bo C i0
:^Mz$N T#@8q_:Hr0小人物，大博客@\8gc5U
如果你完全依了上面的方法都不行，请运行REGEDIT，到：
Rj9|Q"B0HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa 上将此子健中的值 restrictanonymous设为0就行了。小人物，大博客+ST%gx4}a
把：restrictanonymoussam的值也改成0吧。小人物，大博客tA-j4E8{9Y
以下是说明：
nx/m"l(KY7Z01、 RestrictAnonymous 中登记了控制任何用户获取本机信息的级别的设置，如果 RestrictAnonymous 被设置为0（默认值）的话，任何用户都可以通过网络获取本机的信息，包含用户名，详细的帐号策略和共享名。这些信息可以被攻击者在攻击计算机的时候所利用。通过这些信息，攻击者就有可能了解到当前计算机的系统管理员帐号，网络共享的路径以及不健壮的密码。修改此安全级别的方法如下：运行 Regeditexe 编辑注册表，定位到子健 HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa 上将此子健中的值 restrictanonymous 由不安全的 0值 修改为安全级别高一些值 1 或 2。注意：此安全级别如果提高的话有可能造成本计算机在局域网内无法被访问到。小人物，大博客_ ` E ZI4eL
2、当禁用了TIP/IP高级选项中的Wins中的NetBios设置，局域网无法被访问到。小人物，大博客4^j,L'c}p#a KL
3、如果中了震荡波病毒将不能访问到局域网。小人物，大博客 o#sZ9_Ax+(@
4、如果没有将IP设置成固定IP，局域网功能将受限。 小人物，大博客1ZW]#lJ6x6S9_Q`5e
Qo R}:O0小人物，大博客NcM/oot_
网上邻居常见问题及答案
(sr1R:^)rV x"Q0
fn)pgQ5kd0小人物，大博客r1@3Xu J%p~o+bk
我有时在网上邻居可以看到，有时却一台机都看不到？ 小人物，大博客(bTMz`$\
答：Microsoft网络客户必须登录才能看到网上邻居，如果开机时你没有登录而是选取消，那么在网上邻居就一台机都看不到。你可以点开始->注销，重新登录，然后一切就正常了。 小人物，大博客tO~Q5oC n
小人物，大博客e'j }D(j[
我在网上邻居里只能看到我自己一台机？ 小人物，大博客 fJS] kbL7h3S
答：一般而言，你的网卡未设置好，或者网线有问题。
v-m-F$K@$E8E(zC0 小人物，大博客3x+g5cZs e#X-z
我的网上邻居只能看到一部分机器,而且不能访问OA或上网？
'vb"S`U8h7k0答：你的机器网卡可能被禁止了。如果你自己乱设了IP地址的话，那就是你应得的报应。你只能写封道歉信给网管了。
Y l"F6W qj`5F!g0
;Y^Ud0r3R#Y D:H0我已经按要求安装了网络组件，但访问网上邻居还是不行？ 小人物，大博客6rEeqwI9L[y
答：可以考虑一下NetBui协议，有时NetBui会出现假安装的现象。删除NetBui协议，确定退出，然后再重新安装NetBUI协议一次。
1q9z%}1[zrp|u(Y0 小人物，大博客&Ic`RN0P]
我可以访问别人的机器，但我在网上邻居看不到自己？
cN2PDOfx0答：你可能没有安装Microsoft文件及打印机共享。Microsoft网络客户使你可以访问别人，Microsoft文件及打印机共享使别人可以访问你。
H CA _l"zL|Q:P7X0 小人物，大博客/z| eJLtw[,u
网上邻居还是不行？ 小人物，大博客5P9{!C8I^5RU
答：协议是相互的，就象一种语言。如果还是不行，考虑一下对方，只有双方的协议都设置正确的话，才会一切正常的。
S G+qeG%_0 小人物，大博客1b&g+U4r/O!nB7K
F：为什么在网上邻居访问对方提示没有权限
{:e3TV x!aq6N0Q：两台机器都要打开Guest帐户（WIN2K/XP）。
_P$I+6I\ u0
9OP P$v;o]F0F：为什么点击对方机器显示无法连接？
l7cr4I#BS+[2}0Q：确保ping对方IP和机器名都能够正常返回信息。 小人物，大博客9}[+rE8g#Ox3c
y7R:y}Zc0F：为什么在网上邻居看不到对方的机器或者能看到却访问不了？ 小人物，大博客)W~!N@1fR|'U
Q：按照 微软的解释，这种现象有时是正常的，这需要了解网上邻居及其使用的协议NetBIOS的工作原理，参见后面的原理部分。
-H^;|P;i0 小人物，大博客6_OMb1S;o!ty
F：有的机器开机或关机，别的机器就用不了网上邻居了？
g:z2I(f,|0Q：同上。 小人物，大博客4c#AJ&v!k,_go
小人物，大博客i`NE|p N/c
F：如果不使用网上邻居，还有其它办法方便的访问其它机器？ 小人物，大博客o@,NR^
Q：可以不打开网上邻居，直接在搜索中搜索对方的IP或者机器名，也可以在运行中输入\\\\\\\\xxxx（对方 IP） or XXXX（对方机器名）。（同样会用到NetBIOS协议）
:f x'G0|y7sZ0 小人物，大博客+Z1fOm;q;N
F：两台机器不在一个工作组中是否可以使用网上邻居？
;GC$y8T l7]:C$i6e0Q：可以。
TmJgT9e0 小人物，大博客Mf``qn
F：两台机器经过路由器连接，是否可以在网上邻居看到，又是否可以访问呢？
khxM!jef0Q：不能看到，因为路由器不会转发广播（经过设置UDP透传可以），可以使用FAQ26的方法互相访问，但仅限于WIN2K/XP。
7q"s4x7WtD0x0 小人物，大博客n#iH0rddn|
F：为什么Win9X/Me访问不了或者看不到Win2K/XP，而反过来却没有问题呢？ 小人物，大博客iaZ4lSy QQ
Q：确认WIN2K/XP打开了Guest帐户，启用了“浏览服务”；Win9X/Me安装了“打印机和文件共享”，NetBIOS解析没有问题，并且双方没有防火墙的阻挡。
EC4G&JkW6C0 小人物，大博客s W(x}Su,km,] S
F：为什么访问需要密码？ 小人物，大博客;Z,ZDrxy4Hf
Q：确认对方打开了Guest帐户，或者对方没有登陆到域模式。Win9x/Me如果需要登陆到域，不要按Esc取消进入系统。
"sY%Z/UVs6pXJx0

---