Jump to content

VBSCRIPT --- CRIAR FICHEIRO para guardar ensaio de temperatura


robertofonte
 Share

Recommended Posts

Viva pessoal.

Estou a tentar fazer um pequeno script para criar um ficheiro e guardar valores la dentro mas n estou a ter mto sucesso ....

O que pretendo fazer é criar um ficheiro sempre que o controlador fica a on  e depois guardar enquanto ele estiver a on e quando uma flag auxiliar estiver a on ...

EU não sou mto entendido em vbscript ...

Se alguem me puder ajudar agradecia

Dim PROCESS_F, ProcessFile, ProcessFileName, TS

' Script executado sempre que a variavel muda de estado

' só sera executado se ela estiver a on

If (SmartTags("CTRL_TEMP_1\FC101_DB.CTRL_OFF_ON")=True) Then

  ProcessFileName="CTRL_1_Day"&(Now)&"_"& Month(Now)&"_"& Year(Now)&"_"& Hour(Now)&"_"& Minute(Now)&".CSV"

Set ProcessFile = CreateObject("Scripting.FileSystemObject")

' Directorio

Set PROCESS_F = ProcessFile.CreateTextFile("C:\"&ProcessFileName, True)

' Cabeçalho do Ficheiro

PROCESS_F.WriteLine("AQUISIÇÃO DADOS")

  PROCESS_F.Close

Do Until (SmartTags("CTRL_TEMP_1\FC101_DB.CTRL_OFF_ON")=True)

 

  If (FLAG=True) Then

    Set ProcessFile=CreateObject("Scripting.FileSystemObject") 

Set PROCESS_F = ProcessFile.GetFile("C:\"&ProcessFileName)

    Set TS=PROCESS_F.OpenAsTextStream(8,-2)

TS.Write Day(Now)&"-"&Month(Now)&"-"&Year(Now)&" "&Hour(Now)&":"&Minute(Now)&":"&Second(Now)&";"

    TS.Write SmartTags("CTRL_TEMP_1\FC101_DB.CTRL_OFF_ON")&";"&vbCr

TS.Close

End If

Loop

End If

Link to comment
Share on other sites

como já descobri qual era o problema vou colocar a solução pra futuros que queiram usar este script

O problem é aki

If (SmartTags("CTRL_TEMP_1\FC101_DB.CTRL_OFF_ON")=True) Then

    ProcessFileName="CTRL_1_"&Day"&(Now)&"_"& Month(Now)&"_"& Year(Now)&"_"& Hour(Now)&"_"& Minute(Now)&".CSV"

solução

If (SmartTags("CTRL_TEMP_1\FC101_DB.CTRL_OFF_ON")=True) Then

    ProcessFileName="CTRL_1_"&Day(Now)&"_"& Month(Now)&"_"& Year(Now)&"_"& Hour(Now)&"_"& Minute(Now)&".CSV"

Era o day estava dentro das  "  "

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.