excel启用宏,通过vba实现从数字数组里随机获取N个不重复的数字

我们以WPS打开excel为例:
1,要先给WPS安装VBA插件,在百度里搜索“VBA7.0.1590_For WPS(中文).exe”,然后下载安装
2,打开excel文档,在顶部菜单“开发工具”里点击“VB编辑器”
3,在打开的Microsoft Visual Basic编辑器里,在左侧菜单“Project(工作簿1)”上点击右键,选择插入“模块”




阅读剩余部分

js从数字数组里随机获取N个不重复的数字

<script>
    var arr = [713,1032,1051,710,711,943,985,1003,1011,1029,1031,1033,1034,1052,1056,4192,6965,6993,6994,6995,6997,6998,6999,7000,7362,7364,7365,7367,7368,7371,7372,7373,7374,7375,7376,7377,7378,7379,7380,7381,7382,7383,7384,7386,7388];
    var out = [];
    var num = 12;
    while(out.length < num){
        var temp = (Math.random()*arr.length) >> 0;
        out.push(arr.splice(temp,1));
    }
    document.write(out);
</script>

arr是指定的数字数组,num是指定的12位,注意指定的获取位数不要低于数组中的个数,不然要出问题。

帝国CMS全站改造HTTPS思路步骤

本人是帝国CMS7.2,其他版本也可以参考此步骤。
1,操作之前,做一个全站的快照备份,并备注好说明。

2,在帝国CMS后台,把当前模板组导出来,类似文件e1562662986.temp,然后用编辑器打开,将涉及到本站域名的http批量修改为https,然后再导入覆盖

3,找到当前模板下的css,js文件,用编辑器打开,将涉及到本站域名的http批量修改为https

4,在友情链接表phome_enewslink中,将涉及到本站域名的http批量修改为https

5,内容关键字表phome_enewskey中,将涉及到本站域名的http批量修改为https

6,phome_ecms_news表中,检查titlepic字段值,将涉及到本站域名的http批量修改为https

7,phome_ecms_news_data_1~N表中,将涉及到本站域名的http批量修改为https(文章量较多时,一般都有很多文章中写死的内链接)


阅读剩余部分

帝国CMS屏蔽在/d/file/附件文件夹下创建栏目目录的方法

如果网站的栏目较多,图片上传保存的文件夹是不太适合存在栏目目录下的,我喜欢存在/d/file/Y-m/,放在统一的文件夹下,而且按年月目录存放,设置如下:
帝国CMS屏蔽在/d/file/附件文件夹下创建栏目目录的方法

但是有一个问题就是,每次在后台执行 “数据更新 → 恢复栏目目录” 时,程序就会自动在/d/file/附件文件夹下创建网站的所有栏目目录,尤其是当网站栏目很多时,就会造成大量的空目录。

当然你可以不管他,但我有洁癖,看不得那些毫无意义的空目录,屏蔽生成的方法如下:

一,找到文件/e/class/functions.php

二,搜索:function CreateClassPath($classpath)

三,讲执行操作的代码屏蔽掉,如下图:
帝国CMS屏蔽在附件文件夹下创建栏目目录的方法.png

帝国CMS自动加图片水印最全面的方案

在帝国CMS上传图片时,让程序自动加水印,原理就是让上传图片的地方的加水印复选框进行默认勾选!

一,在正文中插入我们自己做的图片时,一般来说100%要求加水印。因此我在编辑器上面自动勾选了加水印,这样不用每次都去人工勾选。
帝国CMS自动加图片水印最全面的方案1.png

修改方法:
1,找到文件e/admin/ecmseditor/infoeditor/epage/TranImg.php
2,查找到<input name="getmark" type="checkbox" id="getmark" value="1">
3,修改为<input name="getmark" type="checkbox" id="getmark" value="1" checked>





阅读剩余部分