实现文本域的maxlength

最新推荐文章于 2022-12-16 00:10:02 发布

稀饭土豆的番茄

最新推荐文章于 2022-12-16 00:10:02 发布

阅读量736

点赞数

分类专栏： WEB JSCRIPT VB 文章标签： function

本文链接：https://blog.csdn.net/liujs_vb/article/details/7218907

版权

JSCRIPT 同时被 3 个专栏收录

26 篇文章 0 订阅

订阅专栏

WEB

14 篇文章 0 订阅

订阅专栏

1 篇文章 0 订阅

订阅专栏

//onPropertyChange

function chkMaxLen(obj, e) {
            var maxLen = 200;
            if (getRangeById()) {
                return true;
            }
            if (obj.value.length >= maxLen) {
                if (e.keyCode == 46 || e.keyCode == 8 || (e.keyCode >= 33 && e.keyCode <= 40)) {
                    return true;
                } else {
                    if (!e.ctrlKey)
                        e.returnValue = "";
                    return false;
                }
            }
        }
        function getRangeById() {
            var o = document.selection.createRange();
            if (o.text.length > 0) {
                return true;
            } else {
                return false;
            }
        }
        function clearSelect() {
            var o = document.selection.createRange();
            o.text = "";
        }

οnpaste="return false;"                            
οncοpy="return false;" oncut="return false;" οnfοcus="clearSelect();" onKeydown="chkMaxLen(this,event)"
 οnblur="chkMaxLen(this,event)"