Matt @ MPCS

It appears this is just a strange Windows bug. I am not quite sure what the coincidence is that it happens yet but when I the executable is configured to be generated in a different directory (such as c:\) it seems to work without a hitch. I'll do some more testing to verify my findings but for now this appears to be resolved. Matt @ MPCS (Paxus LLC)

The command line I identified above is generated by the AutoIt code generator ExeWrap that I posted a few years ago in which I verify existence of the icon file. I know it should work but for some reason it doesn't.

Still no avail... It may be because I am not running it through the Autoit3Wrapper but in either case the Aut2Exe command line should still work. Any more suggestions???

Thanks Zedna! I could do that and it would simplify my compilation process. Thanks again, Matt @ MPCS (Paxus LLC)

OS Version: MS Windows Vista Premium AutoIt Version: v3.2.8.1 There appears to be a bug when specifying the /icon switch in Aut2Exe. It doesn't blow up or anything; it just doesn't appear to use the specified ICO file. An example command line used that exemplifies this is as follows: After executing the above command line the executable is created successfully but it still uses the AutoIt icon. Am I doing something wrong or is this a bug??? Thanks, Matt @ MPCS (Paxus LLC)

Thanks for the reply CyberSlug. You're right in the assumption that I am not really familiar with Windows drive mapping, and I believe the problem here falls under the 'Gotcha' #2. What doesn't make sense though is that I can map each drive manually through the 'Map Network Drive...' GUI provided by Windows Explorer, so I don't quite understand why I am seeing this issue with the DriveMapAdd function and not the native Windows functionality. The true purpose of this script is to get by the bug in Windows that after restarting the PC all samba network drive mappings do not remain signed on. Here is the scenario: 1) UserABC is logged into WinXP and maps a samba share (\\samba_server\ShareABC) to drive X:. (Note: Reconnect after logon is checked) 2) UserABC restarts WinXP 3) UserABC opens Windows explorer (Note: Drive X: is still listed in the list of drives) 4) UserABC double-clicks on the X: drive and is prompted for password This scenario has been reproduced on multiple boxes throughout the company (All running WinXP Home SP1/SP2) but Windows network shares do not appear to have this same problem. Perhaps someone can suggest an alternative method of solving this problem or suggest a way to make this script work as expected. Thanks again, Matt

Hey everyone, I am working on a network drive mapping script that maps drives based on a configuration in an INI file. For some reason the first map works properly but then all subsequent calls to DriveMapAdd have authentication problems which cause the login dialog to popup. I have been searching the forums (and RTFM) for about an hour without finding the answer so I figured someone out there might have some clues. Following are a few clips that may help explain the point to the script: Func ProcessMapFile($MapFile) Local $Drive, $UNC, $retVal, $i = 0 While 1 If IniRead($MapFile, "Map" & $i, "UNC", "") <> "" Then $Drive = IniRead($MapFile, "Map" & $i, "Drive", "") $UNC = IniRead($MapFile, "Map" & $i, "UNC", "") $User = IniRead($MapFile, "Map" & $i, "Username", "") $Pass = IniRead($MapFile, "Map" & $i, "Password", "") TrayTip("Mapping Drive: " & $Drive, "Currently mapping network share: " & $UNC, 30, 1) If MapDrive($Drive, $UNC, $User, $Pass) = 0 Then TrayTip("Drive Mapped Successfully", "Drive " & $Drive & " has been successfully mapped.", 30, 1) Else MsgBox(16 + 4096, "Mapping Failure", "An error has occurred mapping to a network share (" & $UNC & "), please contact the network administrator for more information.") EndIf Else MsgBox (0,"","Cannot find map file: " & $MapFile & ".") ExitLoop EndIf $i = $i + 1 Sleep(5) Wend EndFunc Func MapDrive($Drive, $UNC, $User, $Pass) Local $retVal $retVal = DriveMapAdd($Drive, $UNC, 8, $User, $Pass) If $retVal = 1 Then Return 0 Else Return -1 EndIf Sleep(10000) EndFunc Any help provided would be well appriciated, and thanks in advance. Regards, Matt @ MPCS

Did he close the source all together??? I know before he just hid it and gave people access that requested it. Is this no longer the case? Matt

Please search the forum before posting questions like this. It has been said in many posts, in many different ways. The stable version of AutoItX will be released when they finally come up with a stable AutoIt v3.0.103. When that will be no one knows (unless Jon has made up his mind inthe last week). With open source projects "deadline" is a dirty word because the developers are working for free so you should just be greatful they come up with anything. Matt

Which release of AU3.0.103 did you use to create this? I am not personally familiar with the GUI commands so if someone could tell me which command replaced GUI_READ, I would be greatful so I can test this script. I am using the most recent version (I believe it is Jan 14th, could be wrong though). Matt

You need to be looking for examples that don't include support for MFC. There may be a few minor changes to be made to get it to work with DEV-CPP, but the general syntax is going to be close. A great resource that I use when I get caught up on something or if I am learning a new concept, I check out http://www.planetsourcecode.com They typically have good learning projects. Hope that helps, Matt

Call me nutty but I assumed Angel was a chick too. Matt

Layer, Perhaps you should learn how to walk before learning how to dance. As I feel nothing but pity for you I will not help you learn, but I will give you a suggestion. DON'T PIGGYBACK THE KNOWLEDGE OF GIANTS. Most developers HATE kids that want to learn without trying to learn themselves. Although I am not familiar with how much you have tried, I still think you need to try learning C on your own or with a book. The internet is a great resource, use it... preferably not to annoy real developers. If you need help tackling a specific concept after trying to learn by yourself first, I will be more than happy to assist you in your understanding, but I will only answer short, direct questions. I am sure there are others on this site that would help you if they knew there was any chance of you applying your newly found trade to the development of AutoIt. Matt

Small bug fixed. This is part of a String/Filename library I am working on for my clients, so as soon as I get it done I plan to post the whole library (Under scripts and scraps where it belongs). Thanks to those of you using my code. Func GetRandString( $Len, $Options, $OtherChars = "" ) Dim $Chars, $CharArray, $GenString If Not StringIsInt( $Len ) Then Return -1 If BitAND( $Options, 1 ) Then; Include UpperCase $Chars = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" EndIf If BitAND( $Options, 2 ) Then; Include LowerCase $Chars = $Chars & "abcdefghijklmnopqrstuvwxyz" EndIf If BitAND( $Options, 4 ) Then; Include Numbers $Chars = $Chars & "0123456789" EndIf If BitAND( $Options, 8 ) Then; Include Special Characters $Chars = $Chars & "~`!@#$%^&*()_+=-|}{[]\:';<>?/.," & Chr(34) EndIf If BitAND( $Options, 16 ) Then; Include User Defined $Chars = $Chars & $OtherChars EndIf If $Chars = "" Then Return -2 $CharArray = StringSplit( $Chars, "", 0 ) For $i = 1 to $Len $GenString = $GenString & $CharArray[Int(Random( 1, $CharArray[0] ))] Next Return $GenString EndFunc Matt

Problem fixed! Below you will find my corrected code for those who are curious. Func GetRandString( $Len, $Options, $OtherChars = "" ) Dim $Chars, $CharArray, $GenString If Not StringIsInt( $Len ) Then Return -1 If BitAND( $Options, 1 ) Then; Include UpperCase $Chars = $Chars & "ABCDEFGHIJKLMNOPQRSTUVWXYZ" EndIf If BitAND( $Options, 2 ) Then; Include LowerCase $Chars = $Chars & "abcdefghijklmnopqrstuvwxyz" EndIf If BitAND( $Options, 4 ) Then; Include Numbers $Chars = $Chars & "0123456789" EndIf If BitAND( $Options, 8 ) Then; Include Special Characters $Chars = $Chars & "~`!@#$%^&*()_+=-|}{[]\:';<>?/.," & Chr(34) EndIf If BitAND( $Options, 4 ) Then; Include User Defined $Chars = $Chars & $OtherChars EndIf If $Chars = "" Then Return -2 $CharArray = StringSplit( $Chars, "", 0 ) For $i = 1 to $Len $GenString = $GenString & $CharArray[Int(Random( 1, $CharArray[0] ))] Next Return $GenString EndFunc Matt