3초기억력

제목 : [ASP] 아이디(이메일) 찾기 등에서 활용할 이메일 자리수 + '*' 치환 함수 소스 : Function email_asterisk(email) If InStr(email, "@") > 0 ThenStrEmail = Split(email, "@")id = StrEmail(0)id_length = Len(id)id_asterisk = Left(id, 1) & Mid("*************************", 2, id_length-1)address = StrEmail(1)address_length = Len(address) If InStr(address, ".") > 0 Then StrAddress = Split(address, ".") address_domain = StrAddress..