Recent content by yp_prashanth

  1. Y

    encrypt password

    This will encrypt or decrypt 'text', it's not super secure, but it's not much overhead. public function cryption (byval text as string) dim strtempchar as string dim i as integer for i = 1 to len(text) if asc(mid$(text,i,1)) < 128 then strtempchar = ctype(asc(mid$(text,i,1)) +128, string)...
Top Bottom