项目即将进入生产环境,部署在内部还需要一些操作。做了不少的踩坑。记录一下
一、首先是数据库
- 安装wps宏插件【我的项目-第二弹】丢失问题踩坑
- SQLserver 安装踩坑
- SQLserver 远程连接踩坑
二、wps宏插件踩坑:
主要是“宏丢失”问题,因为用的宏插件不一致,所以读代码的时候 “left” “mid”....之类的函数不能用,这是因为`引用` 里有丢失的文件,给关闭就可以了。打开vb编辑器 -> 引用 -> 找到【丢失】 的引用包,-> 关闭即可
三、动态IP转静态IP
dns 静态IP:打开
cmd
利用ipconfig- all
获取ipv4 地址,获取 子掩码 :255.255.255.0; 获取首选DNS服务器地址;获取备选DNS服务器地址:8.8.8.8。通过网络适配器更改iP
四、SQLserver 安装踩坑
sql server 安装踩坑其实也比较大,主要在安装的时候不要图省事,还是需要 自定义
安装,可以看教程
我的项目-第二弹,这在后面可以省很多事
五、sql server 远程连接踩坑最大
问题描述:SQL Serve [SQL Server无法连接到服务器]
首先:在自定义安装的时候,一定要打开sqlserver windows身份验证 和SQL server 账户验证,很重要
然后是
电脑需要打开远程访问
;telnet
;入站规则
;sqlserver 允许远程
;tcp/ip 打开,设置
等;其次是设置账户和密码,“如何需要可以设置账户权限”
最后找到电脑的ip地址,需要用ip地址访问。
结论:首先是上代码:
Public Sub 连接数据库()
Dim serverIP As String
Dim serverName As String
Dim dbName As String
Dim userName As String
Dim password As String
'serverName = "DONGDONGA"
serverIP = "192.168.38.167"
dbName = "中台数据库"
userName = "sa"
password = "Zz5024784"
Set cnn = New ADODB.Connection
cnn.Open "Provider=SQLOLEDB;Data Source=" & serverIP & ";Initial Catalog=" & dbName & ";User ID=" & userName & ";Password=" & password & ";"
End Sub
第一步:首先是确认下 SQL Server名称或IP地址拼写是否有误;
第二步:检查网络物理连接:
ping <服务器IP地址>或者 ping <服务器名称>
如果 ping <服务器IP地址> 失败,说明物理连接有问题,这时候要检查硬件设备,如网卡、HUB、路由器等。还有一种可能是由于客户端和服务器之间安装有防火墙软件造成的,比如 ISA Server。防火墙软件可能会屏蔽对 ping、telnet 等的响应,因此在检查连接问题的时候,我们要先把防火墙软件暂时关闭,或者打开所有被封闭的端口。
如果ping <服务器IP地址> 成功而 ping <服务器名称> 失败,则说明名字解析有问题,这时候要检查 DNS 服务是否正常,有时候客户端和服务器不在同一个局域网里面,这时候很可能无法直接使用服务器名称来标识该服务器
这个部分我也没解决,所以没用实例名称,用的ip地址
第三步:检查SQL Server服务器工作状态:
使用 telnet 命令, telnet <服务器IP地址> 1433;
如果命令执行成功,可以看到屏幕一闪之后光标在左上角不停闪动,这说明 SQL Server 服务器工作正常,并且正在监听1433端口的 TCP/IP 连接;如果命令返回”无法打开连接”的错误信息,则说明服务器端没有启动 SQL Server 服务,也可能服务器端没启用 TCP/IP 协议,或者服务器端没有在 SQL Server 默认的端口1433上监听。
- 解决办法: 启用TCP/IP协议: 1、打开SQL配置管理器; 2、启用TCP/IP服务; 3、打开端口(默认1433)4、重启服务
第四步:在【连接】属性里面打开允许远程连接。
第五步:确认权限(这个部分我没用,用的Ip就行,这个部分我也不确定)
1、确认是否有服务器读写权限? 方法:a、客户端访问服务器共享文件夹;b、文件夹里面新建,确认是否有权限
2、修改默认用户名(sa)密码试试;