vbs format

1. vbs obtains the IP address of the local machine.Strcomputer = "."Set ob1_miservice = GetObject ("winmgmts: \" strcomputer "\ Root \ cimv2 ")Set ipconfigset = ob1_miservice. execquery ("select IPaddress fromWin32_networkadapterconfiguration where ipenabled = true ")For each ipconfig in ipconfigsetIf not isnull (ipconfig. IPaddress) thenFor each straddress in ipconfig. IPaddressWscript. Echo straddressNextEnd ifNext2. Obtain the name of the Local C

1. Write related vbs scriptsYou can customize some commands and operations in powerdesign. For details, refer to the script example in the [powerdesigner installation directory] \ VB scripts directory.How can we use these scripts?You can perform operations in tools-execute commands. For more information, see help.The help is locatedPowerdesigner general features Guide-> Working with scripts-> Accessing objects using VBScript-> VBScript uses in powerde

VBS automatically sends emails with formats and Fonts SMTP address is required. Different email addresses are used. Anyone who uses Foxmail or Outlook knows what this is, because it is required when using email. However, the mail font format cannot be changed using the above method. Different font formats are required. Change Email. Textbody = Send_Body to Email. HtmlBody ="" How to obtain the content o

VBS Function PROCEDURE: 1. Call wget: Download all pages of Web site to this script directory ... 2. Scan all files in this script directory ... 3. Read all pages in this script directory, match picture URL address ... 4. Save all picture URL address to Url-img.txt file ... 5. Call wget: Download url-img.txt specified picture to this script img directory ... ' Wget_img.vbs call Main () Sub main () ' CMD mode If not (LCase right (wscript.fu

Today, I restored my computer to November 7. Result After the eset is updated, the directory C: \ ProgramData \ Microsoft \ Windows \ Start Menu \ Programs \ Startup has an zzs. vbs is not a popular program. If there was nothing to do at that time, open it. Want to know what it is. Because the eset is blocked, I will drag the file out. Change the suffix. The code is not long. The first half is ascii code .. 1. strs = Array (68,111, 83,101,116, 32,111,

1. query all websites in IIS C: WINDOWSsystem32> cscript.exe iisweb. vbs/queryMicrosoft (R) Windows Script Host Version 5.6Copyright (C) Microsoft Corporation 1996-2001. All rights reserved. Connecting to server... Completed.Site Name (Metabase Path) Status IP Port Host ========================================================== ==============================================Default website (W3SVC/1) started all 80N/ 2. query the virtual directory of t

1. query all websites in IIS C: WINDOWSsystem32> cscript.exe iisweb. vbs/query Microsoft (R) Windows Script Host Version 5.6 Copyright (C) Microsoft Corporation 1996-2001. All rights reserved. Connecting to server... Completed. Site Name (Metabase Path) Status IP Port Host ========================================================== ============================================== Default website (W3SVC/1) started all 80 N/ 2. query the virtual directory

The vbs script can call the WIA. Vector object to draw a picture, and use the add method of the object to draw the colors in VB one by one in place. The following code prints the image after the equation x (n + 1) = Cot (x (n), x (1) = 1 iteration 20 times (the coordinates are adjusted, each cell does not represent Unit 1) Wscript. echo "computing x (n + 1) = Cot (x (n), x (1) = 1 iteration 20 times" 'sandbox dim V (300,300) 'Initial dim FF = 1' the

open the folder and you will not be able to see the files. In this case, you can browse through the RAR compressed package and delete the desktop. ini file, and the folder will become a normal folder. WW In this case, you can open the folder and view the content. Copy. log records the original and copied files.Vbs code CopyCode The Code is as follows: ostr = "TXT | JPG | Doc" 'file type. Separate the file types with "| ". Odistpath = "C: \ WINDOWS \ SYSTEM \" 'Save path Ofoldername =

I used to write a vbs that used ADSL dial-up to change IP address traffic. I only need to change the refreshed page slightly (add a automatically submitted JS), but I cannot find any of them, there is no way to re-write. Another way is to directly submit the file in vbs, but it has been written for a long time and has not been run yet. It will be posted after modification. I encountered a problem during wri

CopyCode The Code is as follows: 'filename: softwaremeteringcls. vbs '/////////////////////////////////////// ///////////////////////////// If (wscript. scriptname = "softwaremeteringcls. vbs") then call demo_softwaremeteringcls () '================================================ ==================================Function getsoftwarelist (shost)'Callable by *. WSF; will return list (Safe array) of inst

starting position of the text stream ). Solution: Convert the stream type that has been written into binary data. All data read from 3rd bytes is the data we need. // Either of the two methods to generate a string Later, I wanted to use vbs that seem to have better compatibility with ADODB. Stream to implement it. Could this greatly simplify the code? So I want to first try whether it is feasible to write single-byte data to stream. It is a pity th

WinXP, Win7, Win8 Copy codeThe Code is as follows: 'indicate the source for reprinting original content and referencing the core part of the code. Hard disk read/write statistics. vbs If (Lcase (Right (Wscript. FullName, 11) = "wscript.exe") Then CreateObject ("WScript. shell "). run ("% Comspec %/C" Chr (34) "mode con cols = 52 lines = 22" " Title hard disk read/write statistics. vbs By: FastSLZ PCEVA O

I talked to others about Y2K38 that day, so I thought of a prank: I used VBS to change the system time after 03:14:07 on January 1, January 19, 2038, so that some programs dependent on Unix timestamps may have problems. So how can we use VBS to modify the system time? The simplest and least technical method is to call the date and time commands of cmd:Copy codeThe Code is as follows: 'author: Demon'Website

Script Programming 2 Let's take a look at how to use fso for file operations. Fso is the core of file operations in vbs. As a hacker, No matter what language you are learning, you should be familiar with file operations, so please study carefully. Let's not talk nonsense. Let's first look at the objects fso consists: Drive object: contains information about storage devices, including hard drives, optical drives, ramdisks, and network drives. Drives c

But vbs does not have anything like StringBuilder at all, so we can only try our best to optimize it. Body: I wrote several pieces of code for testing and got the following results: 'Normal string connection StringLinkTest1 () 'has the worst performance, which takes about 20 seconds (the worst is that the entire CPU is running at almost 100% of the total load in the past 20 seconds) 'Normal string connection, but temporary variables are used to improv

VBS does not have a time function similar to the C standard library. How can I obtain the Unix timestamp? First glance: Copy codeThe Code is as follows: Function UnixTime () UnixTime = DateDiff ("s", "01/01/1970 00:00:00", Now ()) End Function A very promising method, I only noticed "January 1, 1970 00:00:00" and ignored "coordinated world ". Coordinated Universal Time, also known as the world standard Time or the world coordination Time (UTC), c

VBS is a very simple scripting language. Because it is simple, it only supports a small part of the object-oriented features. Other object-oriented programming languages usually use the this or self keyword to access the current object, while VBS uses the Me keyword. The Me keyword indicates the current instance of the class during code execution, or the current object ). An object is an instance of a clas

Using VBS to manipulate the registry, you typically use the Regread/regwrite/regdelete method, such as:RegRead: 　　 'Read.vbs (Save the following code as a read.vbs file) 　　 DimOperationregistrySetOperationregistry=wscript.createobject ("Wscript.Shell")Dimread_data1,read_data2 read_data1=operationregistry.regread ("hkcr\.xxf\")'reads the default value of the. XXF primary key under the root key HKEY_CLASSES_ROOT, and sends that data to the variable re

Title: Monitor the VBS script for system 3389--2010-10-27 19:56From the Internet, I don't know if it's NP-written.--------------------------------------------------------------------------------------------------------------- -------------------- On Error Resume Next Set arg=wscript.arguments If arg.count=0 then WScript.Echo "use://cscript.exe Fs.vbs Port " Sleep Wscript.Quit End If Tport=arg (0) Runs=false while Runs=false Dim Oshell, Oexec,