如何wincc中使用VBS脚本读写SQLServer数据库文件

wincc中使用VBS脚本读写SQLServer数据库文件_百度文库>

vbs代码如下:程序已经通过测试~

set fso=createobject("scriptingfilesystemobject")

set file=fsoopentextfile("c:\1mdb",1)

all=filereadall

fileclose

set file=fsoopentextfile("c:\1mdb",1)

line=filereadline

imfs=split(line," ")

fileclose

per=imfs(0)&" "&imfs(1)&" "

pers=replace(all,line,"")

set file=fsoopentextfile("c:\1mdb",1)

do while fileatendofstream<>true

line=filereadline

j=j+1

loop

fileclose

l=j-1

for i=1 to l

call readtext(i,per,pers,l)

next

private sub readtext(i,per,pers,l)

set file=fsoopentextfile("c:\1mdb",1)

for s=1 to i

fileskipline

next

line=filereadline

fileclose

key=split(line," ")

msgbox key(1),4096+64,"温馨提示"

if l=i then

key(0)=1

end if

set file=fsocreatetextfile("c:\1mdb")

filewrite per&key(0)&pers

fileclose

end sub

以上就是关于如何wincc中使用VBS脚本读写SQLServer数据库文件全部的内容，包括:如何wincc中使用VBS脚本读写SQLServer数据库文件、vbscript 连接sql数据库、VBS *** 作*.mdb文件等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！