- android - 多次调用 OnPrimaryClipChangedListener
- android - 无法更新 RecyclerView 中的 TextView 字段
- android.database.CursorIndexOutOfBoundsException : Index 0 requested, 光标大小为 0
- android - 使用 AppCompat 时,我们是否需要明确指定其 UI 组件(Spinner、EditText)颜色
我的客户提出了一个有趣的请求,我正在尝试找出处理它的最佳方法 - 最好使用脚本。
他们希望我有 2 个生产站点。第一个是实际的在线网站,第二个是最后一个版本(以防我们需要回滚),将是下一次升级的目标。升级完成后,他们希望“交换”所有 header 信息(主机 header 、IP、SSL 等),以便我们将停机时间降至最低。
我已经使用以下方法允许多个站点使用 443 和 SSL,它工作正常:
C:\Inetpub\AdminScripts>cscript.exe adsutil.vbs set /w3svc/1/SecureBindings ":443:www.test.com"
现在,我想弄清楚如何编写站点交换脚本,其中包括删除然后重新添加 SSL 映射。
欢迎任何和所有想法,因为我个人认为这不是最佳解决方案。 :)
----- 新 ---------------------------------------- ----------
我想我找到了更好的方法。
set PROD1=502916593
set PROD2=1319193536
c:
cd C:\Inetpub\AdminScripts\
cscript.exe adsutil.vbs get W3SVC/%PROD1%/root/path
cscript.exe adsutil.vbs get W3SVC/%PROD2%/root/path
SET CONFIRM=
SET /P CONFIRM=Hit ENTER to make Prod1 active, 2 to make Prod2 active:
IF ?%CONFIRM%? EQU ?? GOTO :P1
:P2
cscript.exe adsutil.vbs set W3SVC/%PROD1%/root/path c:\mywebs\prod2
cscript.exe adsutil.vbs set W3SVC/%PROD2%/root/path c:\mywebs\prod1
GOTO :EOF
:P1
cscript.exe adsutil.vbs set W3SVC/%PROD1%/root/path c:\mywebs\prod1
cscript.exe adsutil.vbs set W3SVC/%PROD2%/root/path c:\mywebs\prod2
:EOF
cscript.exe adsutil.vbs get W3SVC/%PROD1%/root/path
cscript.exe adsutil.vbs get W3SVC/%PROD2%/root/path
有人看到这种方法有什么缺点吗?
最佳答案
在两台服务器前面放一个负载均衡器之类的东西不是更好吗?正确的软件应该具有智能,可以让用户在 session 期间保持旧版本(假设您正在使用 session )。否则,当您进行切换时,用户将不得不重新登录。
关于ssl - IIS6 上的 adsutil.vbs 用法,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/1427320/
我使用 IBM Personal Communications 12.0.3.0 的宏记录器制作了一个凭据输入宏。它只是在调用时输入我的用户名和密码。 sub Credentials() Dim
该批处理更改了 vbs 代码,使其无法供 vbs 使用。我该如何解决这个问题? 批号: echo Const HIGH = 128 >> prio.vbs echo strComputer = "."
我有 2 个 vbs 文件。 A.vbs: Class test public a public b End Class B.vbs: Dim objShell Set objShell =
以下是我用来尝试在 IIS 6 中创建虚拟目录的条目: [Run] Filename: {tmp}\cscript.exe mkvirtdir.vbs; Parameters: "-c LocalHo
核心vbs代码 ? 1
对于vbs中ping的实现可以通过两种方式 : 1、调用系统ping命令; 2、使用wmi查询pingstate类处理。 1、调用系统ping命令
在看vb开发,看到二维数组时突发奇想用二维数组作为游戏关卡; 1. 选择操作: 游戏开始时会提示选择注册, 登录, 退出三种选项, 2.注册: 注册成功会将用户账户与密码存入用户数据txt文档中
复制指定文件到指定目录下 核心代码 ? 1
复制代码 代码如下: On Error Resume Next Dim WshShell, QQPath, QQselect set wshshell=createobject("
运行前请确定你的电脑安装了word。 复制代码 代码如下: i=0 set wshshell=createobject("wscript.shell") Set objWo
参考代码一: 复制代码 代码如下: Function DeleteLog( ) Dim objFSO, objFolder, strPath,
挺实用的一段代码,用来深入学习vbs,确实不错咯。 复制代码 代码如下: On Error Resume Next '忽略所有错误 Dim filename '声明变量 Di
话说还是闲来练手,初步实现了自己认为的“多线程”下载。(至于是不是多线程,可以参考12楼链接) 为避免冗余,省了一些错误检查。我觉得没多大实际用途,有兴趣的兄弟一起学习讨论呗。欢迎大家指正: 复制
复制代码 代码如下: set oDOM = WScript.GetObject("http://ipseeker.cn//") flag=0 for i=1 to 10 &n
复制代码 代码如下: on error resume next url = " http://www.bathome.net/logging.php?action=login"
效果图: 代码都封装成函数了,方便调用: 复制代码 代码如下: Key = "www-enun-net" '不要用数字
打开狗狗影视,搜索自己需要的资源,资源类型选:电驴,如下图: 我找到一个 19.75gb 的: 点开它,出现如下图的界面,可以看到正常下载地址已被屏蔽。我们复制地址栏中的网址,备用。
最近相关的备份比较频繁,为了校验文件的完整性,老是要打开某文件HASH校验工具,比较麻烦,于是乎写了这个东东,文件较大时计算有点慢,文件的MD5值保存在剪贴板!效果如图: 使用方法: 1.先
CMD当前路径 复制代码 代码如下: test = createobject("Scripting.FileSystemObject").GetF
For Next 语句的基本结构为: 复制代码 代码如下: For counter = start To end [Step step] [statements] [Exit For] [st
我是一名优秀的程序员,十分优秀!