一个验证用户名的正则表达式

求一个验证用户名的正则表达式
各位大哥大姐，晚辈求一个验证用户名的正则表达式，苦苦思索了一个星期还是没有弄出来，本人愚钝，还望大家指教！
vbscript编程要求用户名的字符控制在3至20个之间，由中文、大小写字母、数字、下划线、小数点、减号组成，  必须以中英文或数字开头结尾且下划线、小数点、减号这三个字符中的其中一个的组合不能是连续的 a__a或a--a或a..a 这样的，但可以 a_a.a_a.a_a-a-a-a_a-a.a.a.a这样的。
如果超出这个范围则用户名不通过。
就是一直弄不明白下划线、小数点、减号这三个字符中的其中一个的组合的问题，头都大了
此为不符合的正则：
^.{0,2}$|.{21,}|^[^a-za-z0-9\u4e00-\u9fa5]|[^\w\u4e00-\u9fa5.-]|([_.-])\1

<input id="strs" value="a_a.a_a.a_a-a-a_a-a" size="40"><input type="button" onclick="regtest(strs.value)" value="检查">
[ctrl+a 全选 注:如需引入外部js需刷新才能执行]

(?!pattern) 
负向预查，在任何不匹配negative lookahead matches the search string at any point where a string not matching pattern 的字符串开始处匹配查找字符串。这是一个非获取匹配，也就是说，该匹配不需要获取供以后使用。例如'windows (?!95|98|nt|2000)' 能匹配 "windows 3.1" 中的 "windows"，但不能匹配 "windows 2000" 中的 "windows"。预查不消耗字符，也就是说，在一个匹配发生后，在最后一次匹配之后立即开始下一次匹配的搜索，而不是从包含预查的字符之后开始