IniWrite/IniRead Help plz...

[Xav]

Hi dodes,

How can it "COPY" or "paste" :

$Write = IniWrite ( $SettingsFile, 'Friends', 'Sms', '"^v"' )

somethin like that send("^v")...

$Read = IniRead ( $SettingsFile, 'Friends', 'Sms', "ERROR" )

can "iniread" read only a part of sentence .

ex .: CanThatWorkPlease. "That will read only 'WORK'"

Thanks for any helps.

i did'nt write autoit's ben a while =O!

Edited August 11, 2009 by Xav

[Bert]

In trying to decipher your gibberish, I think you wish to use use iniwrite(filepath,section, key, Clipget())

[Malkey]

Hi dodes,

How can it "COPY" or "paste" :

$Write = IniWrite ( $SettingsFile, 'Friends', 'Sms', '"^v"' )

somethin like that send("^v")...

$Read = IniRead ( $SettingsFile, 'Friends', 'Sms', "ERROR" )

can "iniread" read only a part of sentence .

ex .: CanThatWorkPlease. "That will read only 'WORK'"

Thanks for any helps.

i did'nt write autoit's ben a while =O!

This link is one method of copying highlighted text, which can be used in conjunction with this script.

#714806

;

Local $sRead, $Copied = "CanThatWorkPlease"

ClipPut($Copied)

IniWrite(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', ClipGet())

$sRead = IniRead(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', "ERROR")

; Use any of the String...() functions to manipulate the contents of the variable, $sRead. 
If StringInStr($sRead, "work", 2) <> 0 Then $sRead = "WORK"

MsgBox(0, "Result", $sRead)
;

[Xav]

Thanks guys.!

just a litle last thing ...

Right after it read "work" do it can just endfunc

;
Func sms()
Local $sRead, $Copied = "CanThatWorkPlease"

ClipPut($Copied)

IniWrite(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', ClipGet())

$sRead = IniRead(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', "ERROR")

; Use any of the String...() functions to manipulate the contents of the variable, $sRead. 
If StringInStr($sRead, "work", 2) <> 0 Then $sRead = "WORK"
--
Right there , if "WORK" is wrote , it will end funcs... Elseif Does'nt work?
--
MsgBox(0, "Result", $sRead)
endfunc
;

[Malkey]

Thanks guys.!

just a litle last thing ...

Right after it read "work" do it can just endfunc

;
Func sms()
Local $sRead, $Copied = "CanThatWorkPlease"

ClipPut($Copied)

IniWrite(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', ClipGet())

$sRead = IniRead(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', "ERROR")

; Use any of the String...() functions to manipulate the contents of the variable, $sRead. 
If StringInStr($sRead, "work", 2) <> 0 Then $sRead = "WORK"
--
Right there , if "WORK" is wrote , it will end funcs... Elseif Does'nt work?
--
MsgBox(0, "Result", $sRead)
endfunc
;

May I suggest you play with, experiment with the examples in the help file under:-

If...ElseIf...Else...EndIf ; and,

Func...Return...EndFunc.

Try to work out what is happening in the examples and why.

The help file is a better friend than I am, Gunga Din - mon ami.

[Xav]

Something like this , does not work

Func Work()
Local $sRead, $Copied = "CanThatWorkPlease"

ClipPut($Copied)

IniWrite(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', ClipGet())

$sRead = IniRead(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', "ERROR")

; Use any of the String...() functions to manipulate the contents of the variable, $sRead. 
If StringInStr($sRead, "work", 2) <> 0 Then
endfunc
ElseIf StringInStr($sRead, "work", 2) <> 0 Then
Thanks ()
endfunc

Func Thanks()
Send("{ENTER}")
endfunc

Edited August 12, 2009 by Xav

[Xav]

Help some1 =)

Edited August 13, 2009 by Xav

[Malkey]

Try this.

;
MsgBox(0, "Result", Work()) ; Calls Work() function and displays the function's return value in message box.

Func Work()
    Local $sRead, $Copied = "CanThatWorkPlease" ; "CanThatPlease" ;

    ClipPut($Copied) ; Puts contents of variable $Copied onto clipboard.

    IniWrite(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', ClipGet()); Gets contents of clipboard and writes to myfile.ini file.

    $sRead = IniRead(@ScriptDir & "\myfile.ini", 'Friends', 'Sms', "ERROR"); Reads Friends section of myfile.ini file & returns value of Sms.

    ; Use any of the String...() functions to manipulate the contents of the variable, $sRead.
    If StringInStr($sRead, "work", 2) <> 0 Then 
        Return "WORK" ; This statement or just "Return" will end this function if the sub-string "work" is in the string contained in the variable $sRead.

    ;ElseIf StringInStr($sRead, "WhatThe", 2) <> 0 Then ; If the condition of the above "If" is True, then this line is NOT execute.
        ;   Return "Missed it completely"

    ;Else
        ;   Return "Not Work" ; If the conditions of the above "If" and "ElseIf" are false, then this line is executed.
        
    EndIf ; This is required to complete the "If...ElseIf...Else...EndIf" statement.

    Return Thanks()
EndFunc   ;==>Work

Func Thanks()
    Return "{ENTER}"
EndFunc   ;==>Thanks
;

[Xav]

Thanks !!!!