解决busuanzi_count突然失效的方法(hexo-theme-next)

2018-09月份的时候,还正常的使用不蒜子统计功能(不蒜子统计功能配置文件已经配置好:themes\next_config.yml)。过完国庆后,看自己的博客突然不蒜子统计失效了,没有统计数量了。

说明

我这里是使用的hexo-theme-next主题,主题版本为:5.1.4

原因分析

由于定位到是不蒜子统计功能突然有问题了,所以前往不蒜子官网进行查看,发现官网有一段很重要的提示:
“因七牛强制过期『dn-lbstatics.qbox.me』域名,与客服沟通无果,只能更换域名到『busuanzi.ibruce.info』!”
所以定位到问题,原来是不蒜子使用的七牛的域名被强制过期。
需要把 dn-lbstatics.qbox.me 域名更换为 busuanzi.ibruce.info

解决方案

hexo-theme-next主题中使用了dn-lbstatics.qbox.me域名的文件位置为:
themes\next\layout\_third-party\analytics\busuanzi-counter.swig

修改busuanzi-counter.swig

找到如下代码:
<script async src="https://dn-lbstatics.qbox.me/busuanzi/2.3/busuanzi.pure.mini.js"></script>
修改为:
<script async src="https://busuanzi.ibruce.info/busuanzi/2.3/busuanzi.pure.mini.js"></script>

重新预览,即可看到不蒜子统计功能已经生效

参考链接:
http://ibruce.info/2015/04/04/busuanzi/

sql语句突然失效

06-09

我写了一段数据库提交程序(第一次写),前几天运行一切正常,上午上班时间另外一个更新语句都可以执行,程序没有做任何修改,突然不行了,再返回运行数据库添加程序也不行,原程序如下(上午WIN2000自动检测到一个补丁,提示我升级,我也没细看,就升级了,好象后来就不行了),请各位帮我检测一下程序有没有漏洞,rnrn程序运行没有任何异常最后显示“好消息,恭喜你注册成功”,就是添加不到数据库里,也没有任何出错提示,我模拟修改数据库名,程序也可以检测数据库找不到,恢复就可以,说明数据库连接没问题,help! rnrn '检查2次密码的一致性rn Label1.Text = ""rn If Trim(TextBox2.Text) <> Trim(TextBox3.Text) Thenrn Label1.Text = "密码不一致"rn Exit Subrn End Ifrn Dim conn As New SqlClient.SqlConnection("Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=ddns;Data Source=(local);Workstation ID=DNS1")rn conn.Open()rn Dim sql As Stringrn '检查用户是否存在rn sql = "select userid from usermain where userid='" + Trim(TextBox1.Text) + "'"rn Dim cmd As New SqlClient.SqlCommand(sql, conn)rn Dim rd As SqlClient.SqlDataReader = cmd.ExecuteReaderrn If rd.Read() Thenrn Label2.Text = "注册错误:该用户已经存在!"rn rd.Close()rn conn.Close()rn Exit Subrn Elsern Label2.Text = "可以注册"rn End Ifrn rd.Close()rn '开始注册用户rn sql = "insert into usermain (userid,userpass,username,usermail) values('" + TextBox1.Text + "','" + TextBox2.Text + "','" + TextBox4.Text + "','" + TextBox5.Text + "')"rn ' Dim dr As sqldatareaderrn cmd.ExecuteNonQuery()rn If Err.Number <> 0 Thenrn Label1.Text = "糟糕,恭喜你注册失败!"rn Elsern Label1.Text = "好消息,恭喜你注册成功!"rn End Ifrn conn.Close()rn 论坛

没有更多推荐了,返回首页