Using Variables in paths...

[BeeL]

Hello Folks,

I was wondering if there is a simple way of using a variable as part of a path. For example I would need to use it in either the function "IniRead" or "drivemapadd" to just map a drive.

What I'm trying to do is get Autoit to take the contents of a file, (computer machine names) verify whether or not it is accessible, read a certain key from an ini file remotely (this is where I seem to be running into problems) and take that read key and append it to a 3rd file.

Please keep in mind I am VERY new at AutoIT and programming/scripting in general. I do apologize in advance if this topic has already been covered. (I tried doing a few searches and didn't come up with anything obvious) Any suggestions are greatly appreciated.

Thanks!

BeeL

[big_daddy]

Give us an example of what you have tried so we can help you better.

Here is an example of a variable with IniRead()

$Path = '"\\computername\pathtofile\file.ini"'
IniRead ( $Path, "section", "key", "default" )

Edited January 9, 2006 by big_daddy

[BeeL]

Give us an example of what you have tried so we can help you better.

I've tried either one of these and I seem to have no luck. I don't receive an immediate error, however the results aren't what they are supposed to be.

DriveMapAdd("k:", "\\"& $line &"\c$")

or

$CID = IniRead("\\"& $line &"\FP\MACHINE\dat32com.ini", "MyConnection", "Client Identifier", "NotFound")

In the line, rather than returning the value of the "Client Identifier" key, it returns the value NotFound. I just assumed that its because its not finding the path correctly because I'm not using the variable correctly.

I should also mention, $line = machine1 (for example)

Thanks again

BeeL

Edited January 9, 2006 by BeeL

[big_daddy]

Well the only thing that I can see is that:

$line = machine1

Should be:

$line = "machine1"

[BeeL]

Sorry, I guess I should have posted more of the code.

This is the main part of my program.

;Main*************************

While 1

$line = FileReadLine($file)

If @error = -1 Then ExitLoop

;MsgBox(0, "Line read:", $line)

Call ("check")

Wend

FileClose($file)

It then calls the check function which basically just pings the machine name to see if it is on.

;Check ***********************

Func check()

$var = Ping($line,250)

If $var Then

Call ("datalog")

Else

Call ("generic")

EndIf

EndFunc

From there it calls either datalog (if ping is successful) or generic (if ping times out)

;Datalog**********************

Func datalog()

DriveMapAdd("k:", "\\"&$line"\c$")

;Find information from INI file

$CID = IniRead("k:\FP\MACHINE\dat32com.ini", "MyConnection", "Client Identifier", "NotFound")

FileWrite ("c:\FPCID.txt", ""& $line &" = "& $CID &"" & @CR)

DriveMapDel("k:")

EndFunc

I've left out the Generic function because it seems to be the only part that works properly. All variables were declared before the main function.

Big Daddy: Does this mean the IniRead or DriveMapAdd commands look correct?

Thanks again, I do appreciate any help here.

BeeL

[The Kandie Man]

Try this:

While 1

$line = FileReadLine($file)
If @error Then ExitLoop
;MsgBox(0, "Line read:", $line)
Call ("check")

Wend

FileClose($file)



Func check()

$var = Ping($line,250)
If $var Then
Call ("datalog")
Else
Call ("generic")
EndIf
EndFunc


Func datalog()

DriveMapAdd("k:", "\\" & $line & "\c$")

;Find information from INI file
$CID = IniRead("k:\FP\MACHINE\dat32com.ini", "MyConnection", "Client Identifier", "NotFound")

FileWrite ("c:\FPCID.txt", $line & " = " & $CID & @CR)

DriveMapDel("k:")

EndFunc

Is that what you wanted?

Edited January 9, 2006 by The Kandie Man

[BeeL]

Try this:

Is that what you wanted?

Hi Kandie Man,

Looks like you've streamlined my code. I have just verified that it does properly map the drive however I guess what I am getting hung up on is the IniRead Function. I've manually looked through that ini file and I can see the information I'm trying to extract. The path, section and key are correct, however the value it's returning is the default (NotFound).

I guess that solves one problem. Do you guys have any idea why I'm not getting the correct data back from the IniRead function?

Thanks again,

BeeL

[The Kandie Man]

Try this. I added one line of code to check to see if it is even detecting the ini file. If you don't get the error message, then it is detecting the file and something is wrong with the ini file or the iniread itself. Please post your ini file here so that i can help you further.

expandcollapse popup

While 1

$line = FileReadLine($file)
If @error Then ExitLoop
;MsgBox(0, "Line read:", $line)
Call ("check")

Wend

FileClose($file)



Func check()

$var = Ping($line,250)
If $var Then
Call ("datalog")
Else
Call ("generic")
EndIf
EndFunc


Func datalog()

DriveMapAdd("k:", "\\" & $line & "\c$")

;Find information from INI file
If Not FileExists("k:\FP\MACHINE\dat32com.ini") Then msgbox(0,"Error!","k:\FP\MACHINE\dat32com.ini doesn't exist.")
$CID = IniRead("k:\FP\MACHINE\dat32com.ini", "MyConnection", "Client Identifier", "NotFound")

FileWrite ("c:\FPCID.txt", $line & " = " & $CID & @CR)

DriveMapDel("k:")

EndFunc

-The Kandie Man