日记首页V1.0

****************************************
2023/12/11	《script放在外面单独的文件》
在Web开发中，JavaScript文件的后缀通常是.js。JavaScript文件包含了用于网页交互和动态功能的JavaScript代码。在HTML文件中使用<script>标签可以引入外部的JavaScript文件，而这些文件通常以.js为后缀。例如，如果有一个名为script.js的JavaScript文件，可以在HTML文件中通过以下方式引入该文件： <script src="script.js"></script> 这样，浏览器会加载并执行script.js中的JavaScript代码，从而为网页添加所需的交互和功能。这里注意：在"script.js"文件中，要去掉开头的<script>，和结尾的</script>

****************************************
2023/12/11	《智能窗帘》
主卧室里的智能窗帘，用的是《涂鸦智能APP》，注册手机18966759126，配网视频在天翼云说明书里。

****************************************
2023/12/7	《UTF-8和ANSI的编码》
避免乱码，UTF-8和ANSI的编码在asp中加入： UTF-8 <meta charset="utf-8"> ANSI <%@Language="vbscript" Codepage="936"%>

****************************************
2023/11/11	《打印机在服务器上远程打印设置》
打印机在服务器上远程打印：参考天翼云盘中的《服务器远程打印设置详细步骤》和《无法使用远程桌面的本地打印机资源》

****************************************
2023/11/8	《DocHub文库，打不开》
服务器迁移，DocHub文库，全部设置完成后，DocHub.exe却打不开，一闪就关闭。天翼云盘中有图。错误内容： [ORM]2023/11/08 20:46:03 register db Ping 'default', Error 1045: Rocess denied f or user 'dochub' e'localhost' (using password: YES > 翻译： [ORM]2023/11/08 20:46:03 register（登记;注册） db Ping'default'，错误1045:Roches拒绝用户'dochub''localhost' （使用密码：YES> 原因： MySQL中，数据库名称或用户名，设置出错解决方法：软件小皮PHP中，MySQ，检查，数据库名称或用户名（包括大小写）数据库名称：dochub 用户名：dochub 密码：123456 DocHub在服务器内网可以打开，浏览器访问 http://localhost:8090，外网却打不开。原因：服务器的8090端口未开放。解决方法：登陆华为云，在控制台→→default安全组→→添加入方向规则→→加入8090端口

****************************************
2023/11/6	《华为云2023年服务器详情》
2023-11-6 华为云账号：18192048090 密码：A4269259hjt@ 独立公网IP：60.204.237.48 私有IP：192.168.0.15（网卡）服务器详情： hecs-169861 dc323192-547c-4f90-9379-cbb6bed2ba1a 华东-上海一 \| 可用区1 系统盘：40G 1核 \| 2GiB 带宽：1 Mbit/s

****************************************
2023/9/22	《switch游戏网站和PS4中文游戏网站》
520switch全球游戏白嫖网 https://www.520switch.com/ switch游戏网站和PS4中文游戏网站，免费，破解游戏资源账号：lk2lklk 密码：4269259hjt Switch520游戏网站入口： Switch520 (gamer520.com) switch游戏下载 (gamer520.com) 不用登陆防止迷路：https://laoquzhang.com/

****************************************
2023/9/19	《在线文字转语音》
在线文字转语音，ai电脑语音在线免费文字转语音 - TTSMaker官网 \| 马克配音

****************************************
2023/8/16	《vba，跳转工作表》
vba，跳转工作表的代码 ' 跳转显示sheet3 Worksheets("Sheet3").Activate

****************************************

2023/8/12

《vba代码记录-窗体》

vba代码记录-打开窗体/关闭窗体

如下的内容，是在Excel的VBA环境下，用来修改窗体的代码的总结，希望对你有帮助。

一、用户窗体类

显示用户窗体（打开窗体）

UserForm1.Show

加载一个用户窗体,但该窗体处于隐藏状态

Load UserForm1

隐藏用户窗体

UserForm1.Hide

卸载用户窗体（关闭窗体）

Unload UserForm1
　　　或
Unload Me

在用户窗体中显示图形

Picture1.Picture = LoadPicture("D:\DZWEBS.JPG")

将窗体设置为无模式状态

UserForm1.Show 0
或
UserForm1.Show vbModeless

窗体高度为当前活动窗口高度的0.99

Me.Height = Int(0.99 * ActiveWindow.Height)

窗体宽度为当前活动窗口高度的0.66

Me.Width = Int(0.66 * ActiveWindow.Width)

二、消息框、对话框类

消息框中显示消息dzwebs

MsgBox "dzwebs"

在消息框中点击"是"按钮，则Ans值为vbYes；点击"否"按钮，则Ans值为vbNo

Ans = MsgBox("Continue?", vbYesNo)

返回值不为"是"，则退出

If MsgBox("Continue?", vbYesNo) <> vbYes Then Exit Sub

使用常量的组合，赋值组Config变量，并设置第二个按钮为缺省按钮

Config = vbYesNo + vbQuestion + vbDefaultButton2

在消息框中强制换行，可用vbCrLf代替vbNewLine

MsgBox "This is the first line." & vbNewLine & "Second line."

应用工作表函数返回所选区域的平均值并按指定格式显示

MsgBox "the average is :" & Format(Application.WorksheetFunction.Average(Selection), "#,##0.00"), vbInformation, "selection count average" & Chr(13)