ICode9

精准搜索请尝试: 精确搜索
  • 搬家第一天-25.使用Wincc V7.3 VBS做一个秒表的功能2021-01-29 17:02:57

    西门子技术论坛上,有人发帖子询问如何在Wincc上面做一个秒表功能,按下开始按钮秒表计时,按下停止功能停止计时,按下复位功能,计数回零。自己测试了一下,这个还是比较容易实现的,现在把实现的过程分享一下。 一 准备工作 1. 建立变量   打开wincc,新建一个工程,建立以下内部变量:  MyHour

  • 搬家第一天-2.WinccV7.3 使用VBS判断数据库Mydatabase是否存在2021-01-29 08:35:20

    从某浪开始搬家,第二篇 使用wincc时,如果需要判断附带的sql server是否有某个数据库,可以使用下面的代码,实际上这个应该属于IT行业的内容。 Sub OnClick(ByVal Item)          Dim ors,conn,con,ssql,ocomDim PCNamePCName=HMIRuntime.Tags("@LocalMachineName").Readcon="

  • 搬家第一天-5.WinccV7.3 使用VBS创建数据表mytable5.WinccV7.3 使用VBS创建数据表mytable2021-01-29 08:33:54

    Sub OnClick(ByVal Item)            Dim ors,conn,con,ssql,ocomDim ors1,conn1,con1,ssql1,ocom1Dim ssql2,ocom2Dim ocatalog,otableDim i,TableExistDim PCNamePCName=HMIRuntime.Tags("@LocalMachineName").Readcon="Provider = SQLOLEDB.1;password = sa

  • 搬家第一天-1.WinccV7.3 使用VBS判断数据库Mydatabase下是否存在数据表Mytable2021-01-29 08:01:02

    从今天开始搬运某浪上以前写的内容 Sub OnClick(Byval Item)                          Dim ors,conn,con,ssql,ocomDim ors1,conn1,con1,ssql1,ocom1Dim ocatalog,otableDim i,TableExistDim PCNamePCName=HMIRuntime.Tags("@LocalMachineName").Readc

  • 群辉搭建kms服务器激活office+visio和Windows2021-01-18 18:00:45

    注意: 以下操作仅供测试学习使用,切勿使用在商用用途,如有需要,请购买正版软件! 以下操作仅供测试学习使用,切勿使用在商用用途,如有需要,请购买正版软件! 以下操作仅供测试学习使用,切勿使用在商用用途,如有需要,请购买正版软件! 一、背景介绍 在我们接触的Windows和Office 或是一些软件时都

  • Visio 2019使用PJ2021-01-11 21:58:27

    @echo off title Activate Microsoft Visio 2019&cls&echo ============================================================================&echo #Visio: Activating Microsoft software products for FREE without software&echo ========================

  • VBS下将gbk转utf-82021-01-08 10:35:02

    通过zabbix监控windows,由于zabbix server运行在linux下,采用utf-8内码处理,而windows则以gbk(gb2312)做内码,所以当有中文内容上报到zabbix时,会造成编码错误 通过实践,经以下代码处理后,输出基本上符合需求,需不无完全保证无乱码,但已经完全可以接受 msg="需要转码的内容" instru_msg="

  • 验证windows系统永久激活2020-12-19 10:58:07

    Win+R,输入 slmgr.vbs -xpr 即可查看是否永久激活。

  • Windows10为什么老是显示系统许可证已过期2020-12-06 13:36:04

       最近打开电脑总是碰见提示windows10系统许可证已过期,并要求跳转到设置进行激活 您可以使用以下命令检查您的激活状态: Windows+R后输入以下命令查看一下。 运行:slmgr.vbs -dlv 命令可以查询到Windows的激活信息,包括:激活ID、安装ID、激活截止日期等;    运行:slmgr.vbs -dli

  • C语言 文字转语音2020-12-05 09:57:43

    #define _CRT_SECURE_NO_WARNINGS #include<stdio.h> #include<stdlib.h> #include<string.h> void showStyle() { system("color f3"); system("title 发音小程序"); } char userData[10000] = ""; void inputUserData() { m

  • kms激活服务器2020-12-01 16:02:41

    KMS,全称Key Management Service。很多人可能不知道,KMS其实是微软官方认可的一种系统激活方式。这个激活方式主要用于企业计算机的批量激活。打个比方,你们公司买了3000台一模一样的台式机,然而都是空机没有内置OEM系统。这样怎么办呢?于是,你们就需要一个系统管理员(System Administr

  • Win10 一键启用&禁用以太网bat命令2020-11-26 16:01:04

    转自:https://blog.csdn.net/linfen1520/article/details/88297730     @echo off :: BatchGotAdmin :------------------------------------- REM --> Check for permissions >nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%

  • vbs调用批处理、PowerShell传参,加域等2020-11-20 18:31:30

    电脑启动后,自动运行任务计划,运行vbs脚本修改管理员密码,然后引导用户自行输入个性化内容,再然后调用ps1脚本修改计算机名、加域、添加本地管理员权限 join.vbs脚本内容如下: '''''''''''''''''''''''''''

  • 利用VLMCSD部署本地KMS服务器2020-09-11 18:32:19

    项目名称:VLMCSD 项目简介:KMS Emulator in C (Currently runs on Linux, Mac OS, iOS, Windows with or without Cygwin) 项目主页:https://github.com/Wind4/vlmcsd 软件下载:https://github.com/Wind4/vlmcsd/releases 部署本地KMS服务器: 1.准备一个 Linux 环境 2.下载vlmcsd:wget

  • office 2019 破解方法2020-06-22 21:03:20

    新建一个txt,然后把这段代码放进去,然后保存关闭改后缀为cmd,双击打开,等待破解完毕。   @echo off (cd /d "%~dp0")&&(NET FILE||(powershell start-process -FilePath '%0' -verb runas)&&(exit /B)) >NUL 2>&1 title Office 2019 Activator r/Piracy echo Conve

  • 如何默认以管理员身份运行 bat 文件2020-06-08 20:58:53

    检查权限,无权限退出 rem 检查是否使用管理员权限 echo Administrative permissions required. Detecting permissions... net session >nul 2>&1 if %errorLevel% == 0 ( echo Success: Administrative permissions confirmed. ) else ( echo Failure: Current permissio

  • 李辉爱吴紫微2020-05-28 21:06:36

    首先创建一个文本 把一下代码复制进去 Set WshShell=WScript.CreateObject("WScript.Shell")dim count:count = 0for i = 1 to 22WScript.Sleep 500WshShell.SendKeys"ai"WshShell.SendKeys"{ }"WshShell.SendKeys"pini"WshShell.SendKeys"{ }&qu

  • Windows office2019免费激活,附代码2020-05-07 14:53:15

    office2019地址:链接:https://pan.baidu.com/s/1zPt5U7b0L-bGHl5AOtYs2w提取码:m5ei方法一: 新建一个txt,然后把这段代码放进去,然后保存关闭改后缀为cmd,双击打开,等待破解完毕。     @echo off (cd /d "%~dp0")&&(NET FILE||(powershell start-process -FilePath '%0' -verb runas)&&

  • VBS脚本,发送邮件,基础教程2020-04-15 19:56:04

    教程地址:https://www.runoob.com/vbscript/vbscript-tutorial.html Dim name Function test1() MsgBox "lalal" test1 = 1 End Function name=test1() MsgBox name 以上代码中可以看见  函数返回值是用函数名 = 值  的方式来返回 代码如下 function Send_mail(You_Acc

  • 隐藏BAT运行时黑框的vbs2020-03-30 13:58:08

    start.bat 更换为你的bat就可以 新建vbs粘贴里即可,VBS可用txt更改扩展名即可      start.txt → start.vbs 代码: Set ws = CreateObject("Wscript.Shell") ws.run "cmd /c start.bat",vbhide

  • 使用vbs打开谷歌浏览器登录网页2020-03-15 19:44:45

    Windows下使用vbs脚本完成网页登录 新建file.vbsUrl=“xxx” set wshshell=CreateObject("wscript.shell") wshshell.Run"""C:\Program Files (x86)\Google\Chrome\Application\chrome.exe""" & Url wscript.sleep 2000 wscript.sleep 2000

  • VBS通过WinHttp对象下载网页图片。2020-03-12 11:56:18

    我刚才写了一个vbs脚本,该脚本通过调用com组件winhttp来获取网页中图片的数据,并且以二进制数据的形式返回。再通过adodb.steam对象将二进制数据保存为图片文件。 Sub DownloadPic(url,strPath) Set Winhttp = CreateObject("WinHttp.WinHttpRequest.5.1") Winhttp.Open "GE

  • Windows激活系统( dos命令)2020-03-08 12:55:26

    相较于传统的windows激活,dos命令下利用命令行激活windows更加便捷迅速(生效快) 打开cmd dos命令(快捷键Win+R)打开CMD(以用管理员打开) slmgr.vbs -xpr (查询激活) slmgr.vbs -dli (显示:操作系统版本、部分产品秘钥、许可证状态) slmgr.vbs -dlv (显示:最为详尽的激活信息,包括:激活ID、安装

  • 解决win10提示“你的Windows许可证即将过期”的方法2020-03-06 09:03:12

    今天开机提示“你的Windows许可证即将过期”,就百度了一下,竟然一下成功了。 我的是win10,专业版 解决方法: 1、打开cmd命令行界面 2、 依次输入: slmgr.vbs /upk    //卸载当前电脑的密钥slmgr /ipk W269N-WFGWX-YVC9B-4J6C9-T83GX    //密钥slmgr /skms kms.03k.org    /

  • vbs2020-03-02 09:05:00

    vbs是windows 上一个非常简单的脚本语言,所以有一些想入手的人,可以使用这个(vbs通用性很小,可以当作一个小小的练习,来测试你有没有编程的学习动力) vbs很多特殊“语句”,下面我们就来学习。 入门: vbs根本不用下载,只用windows中的txt文件就可以了(如果你不知道txt文件,那你最好自己搜一搜)

专注分享技术,共同学习,共同进步。侵权联系[81616952@qq.com]

Copyright (C)ICode9.com, All Rights Reserved.

ICode9版权所有