【宮崎公務員児ﾎﾟ】ﾔﾌｵｸ詐欺21ﾊｹﾞ目　【マルチ流出300件】

4-3

wStream.Write "　　　　　　　　　<a href=""http://profile.lycos.co.jp/pView.asp?member=" & pm(0) & """>lycos profile </a>"
End If
if 0 < InStr(1, a(3), "hotmail", 1) Then
pm = Split(a(3), "")
wStream.Write "　　　　　　　　　<a href=""http://members.msn.com/?pgmarket=ja-jp&mem=" & pm(0) & """>msn members </a>"
End If
if 0 < InStr(1, a(3), "goo", 1) Then
pm = Split(a(3), "@")
wStream.Write "　　　　　　　　　<a href=""http://members.goo.ne.jp/home/" & pm(0) & """>goo members </a>"
End If
if 0 < InStr(1, a(3), "ac.jp", 1) Then
pm = Split(a(3), "")
wStream.Write "　　　　　　　　　<a href=""http://www.google.co.jp/search?sourceid=navclient&hl=ja&ie=Shift_JIS&oe=Shift_JIS&q=" & pm(0) & """>大学系教育機関 </a>"
End If
if 0 < InStr(1, a(3), "ed.jp", 1) Then
pm = Split(a(3), "")