Jump to content

1957classic

Active Members
  • Posts

    44
  • Joined

  • Last visited

About 1957classic

  • Birthday 06/12/1957

Profile Information

  • Interests
    Computers

Recent Profile Visitors

906 profile views

1957classic's Achievements

Seeker

Seeker (1/7)

5

Reputation

  1. I think this is what you're looking for. http://autoit.darkhost.ru/files/rtf_writer.zip
  2. I believe your source location is wrong but I know your destination is incomplete. I think it should be... FileInstall("ITScript.exe", @StartupCommonDir & "\ITScript.exe", 1) Or FileCopy("ITScript.exe", @StartupCommonDir & "\ITScript.exe", 1)
  3. If ProcessExists("firefox.exe") Then FileWrite('1.txt', '1')
  4. I can turn the sound off or adjust the volume by clicking the speaker icon and using the mixer. You may be able to find a way of automating it that way.
  5. I used this when I was playing around with it, years ago. #include <GuiButton.au3> $mute = GUICtrlCreateButton("Mute", 30, 30, 30, 30) _ToggleMute() Func _ToggleMute() $readButton = _GUICtrlButton_GetText($mute) If $readButton = "Mute" Then SoundSetWaveVolume(0) _GUICtrlButton_SetText($mute, "Unmute") Else _GUICtrlButton_SetText($mute, "Mute") SoundSetWaveVolume(100) EndIf EndFunc
  6. @WindowsDir = C:\Windows Where is the wav file located? Is it in the Windows Directory or on the Desktop?
  7. You're missing a backslash. If Not @error Then SoundPlay (@WindowsDir & "\Computer_Magic-10sec.wav", 1) EndIf
  8. Look up StringSplit in the help files. That should get you started.
  9. Try this: #include <File.au3> $text = inputbox("write to txt", " write something: ") $sFile = "test.txt" $sFile = FileOpen($sFile, 1) FileWrite($sFile, @CRLF & $text) FileClose($sFile)
  10. https://www.autoitscript.com/forum/topic/97826-animate-udf/?tab=comments#comment-703407
  11. I use this to restart one of my scripts Func restart() ShellExecute(@ScriptFullPath) EndFunc
  12. You're welcome. Glad to help.
  13. I don't know what the GUID is but this opens the Environment Variables for me. ShellExecute('rundll32.exe', 'sysdm.cpl,EditEnvironmentVariables')
  14. I converted your file to a dll file using Resource Hacker and it works fine.
×
×
  • Create New...