无忧启动论坛

 找回密码
 注册
搜索
系统gho:最纯净好用系统下载站投放广告、加入VIP会员,请联系 微信:wuyouceo
查看: 72|回复: 6
打印 上一主题 下一主题

[原创] EdgeWebView2 在线下载安装 NSIS脚本

[复制链接]
跳转到指定楼层
1#
发表于 半小时前 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
EdgeWebView2 在线下载安装 NSIS脚本 自行编译
  1. Name "${PRODUCT_NAME}"

  2.   !define PRODUCT_NAME "EdgeWebView2"

  3. OutFile "${PRODUCT_NAME}在线下载安装.exe"
  4.   !include "MUI2.nsh"
  5.   !include "x64.nsh"
  6.   !define MUI_PAGE_CUSTOMFUNCTION_PRE 'CopyFiles'
  7.   !define MUI_PAGE_CUSTOMFUNCTION_SHOW MyInstFiles
  8.   !insertmacro MUI_PAGE_INSTFILES
  9.   !insertmacro MUI_LANGUAGE "SimpChinese"

  10.   VIProductVersion "1.0.0.0" ;版本号
  11.   VIAddVersionKey /LANG=2052 "ProductName" "顺艺${PRODUCT_NAME}部署程序" ;文件描述
  12.   VIAddVersionKey /LANG=2052 "Comments" "顺艺科技"   ;备注
  13.   VIAddVersionKey /LANG=2052 "CompanyName" "www.jywangluo.cn"
  14.   VIAddVersionKey /LANG=2052 "LegalCopyright" "版权所有 (C)  顺艺科技"  ;版权
  15.   VIAddVersionKey /LANG=2052 "FileDescription" "顺艺${PRODUCT_NAME}部署程序" ;产品名称
  16.   VIAddVersionKey /LANG=2052 "FileVersion" "1.0.0.0"  ;文件版本
  17.   VIAddVersionKey /LANG=2052  "ProductVersion" "1.0.0.0" ;产品版本
  18.   VIAddVersionKey /LANG=2052 "OriginalFilename" "${PRODUCT_NAME}setup.exe" ;源文件名

  19. Icon ${PRODUCT_NAME}.ico
  20. ShowInstDetails nevershow
  21. AutoCloseWindow true
  22. BrandingText "东莞顺艺网络专用"
  23. Caption "东莞顺艺网络"

  24. Section "update" update
  25.         SetDetailsPrint textonly
  26.         DetailPrint "正在下载${PRODUCT_NAME}最新文件请稍后...."
  27.         setDetailsPrint listonly
  28.         ${If} ${RunningX64}
  29.   NScurl::http GET "http://go.microsoft.com/fwlink/?LinkID=2124701" "$PLUGINSDIR\MicrosoftEdgeWebView2Runtime.exe"
  30.   ${Else}
  31.   NScurl::http GET "http://go.microsoft.com/fwlink/?LinkID=2099617" "$PLUGINSDIR\MicrosoftEdgeWebView2Runtime.exe"
  32.   ${EndIf}
  33.         SetDetailsPrint textonly
  34.         DetailPrint "正在安装${PRODUCT_NAME}最新文件请稍后...."
  35.         setDetailsPrint listonly
  36.         Execwait "$PLUGINSDIR\MicrosoftEdgeWebView2Runtime.exe /silent /install"
  37.         SetDetailsPrint textonly
  38.         DetailPrint "正在优化${PRODUCT_NAME}请稍后...."
  39.         setDetailsPrint listonly
  40.   ReadRegStr $R0 HKLM "SOFTWARE\WOW6432Node\Microsoft\EdgeUpdate" "edgeupdate_task_name_c"
  41.   ReadRegStr $R1 HKLM "SOFTWARE\WOW6432Node\Microsoft\EdgeUpdate" "edgeupdate_task_name_ua"
  42.   nsExec::Exec 'schtasks.exe /Delete /TN \$R0 /F'
  43.   nsExec::Exec 'schtasks.exe /Delete /TN \$R1 /F'
  44.   nsExec::Exec 'taskkill /im MicrosoftEdgeUpdate.exe /f '
  45.   nsExec::Exec 'taskkill /im msedge.exe /f '
  46.   nsExec::Exec 'sc.exe delete "edgeupdate"'
  47.   nsExec::Exec 'sc.exe delete "edgeupdatem"'
  48.   nsExec::Exec 'sc.exe delete "MicrosoftEdgeElevationService"'
  49.         RMDir /r "$PROGRAMFILES\Microsoft\EdgeUpdate"
  50. SectionEnd


  51. Function MyInstFiles
  52.    GetDlgItem $0 $HWNDPARENT 1 ;下一步
  53.    ShowWindow $0 ${SW_HIDE}
  54.    GetDlgItem $0 $HWNDPARENT 2 ;取消
  55.    ShowWindow $0 ${SW_HIDE}
  56.    GetDlgItem $1 $HWNDPARENT 3 ;上一步
  57.    ShowWindow $1 ${SW_HIDE}
  58.    GetDlgItem $0 $HWNDPARENT 1037
  59.    SendMessage $0 ${WM_SETTEXT} 0 "STR: "
  60.    GetDlgItem $0 $HWNDPARENT 1038
  61.    SendMessage $0 ${WM_SETTEXT} 0 "STR:东莞顺艺网络更新程序正在下载最新文件,请稍候...."
  62. FunctionEnd

  63. Function 'CopyFiles'
  64. GetDlgItem $R0 $HWNDPARENT 1
  65. System::Call 'user32::GetWindowLong(i $hwndparent,i -16)i.r0'
  66.   intop $1 0x80000 ~
  67.   intop $0 $0 & $1
  68. System::Call 'user32::SetWindowLong(i $hwndparent,i -16,i $0)i'
  69. FunctionEnd
复制代码


2#
发表于 半小时前 | 只看该作者
EdgeWebView2 在线下载安装 NSIS脚本,谢谢分享!
回复

使用道具 举报

3#
发表于 27 分钟前 | 只看该作者
谢谢分享!
回复

使用道具 举报

4#
发表于 26 分钟前 | 只看该作者
另存为啥格式?

点评

nsis脚本 用nsis编译成exe  详情 回复 发表于 13 分钟前
回复

使用道具 举报

5#
发表于 15 分钟前 | 只看该作者
支持原创
回复

使用道具 举报

6#
 楼主| 发表于 13 分钟前 | 只看该作者

nsis脚本 用nsis编译成exe
回复

使用道具 举报

7#
发表于 11 分钟前 | 只看该作者
制作离线安装包吗
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2025-11-22 12:15

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表