Prozac

Got the same problem here. using 3.3.0 and SQL 2008 Express. Any idea how to fix it?

Hi, I got a bit of a weird problem. I have made a script to extract custom properties values out of files using dsofile.dll. The weird thing, is that when I extract the properties and put them into a excel workbook using ExcelCOM_UDF some of the characters are displayed as another character then the one you see in the custom properties tab of the file. Example could be the following: :: Original CustomProperties.Name = Beskriv CustomProperties.Value = ø45x65 :: In a text file using FileOpen / FileWriteLinie it will look like this in notepad Name = Beskriv Value = ø45x65 :: But in the excel workbook it looks like this Name = Beskriv Value = ø45x65 It seems that all danish characters like ÆØÅ and æøå are "converted" to "rubbish", but the really weird think is that I at the same time writes values from a ini file to create the "layout" of the excel workbook, and the danish characters from the ini file, is NOT being "converted", they look as the should. I use ExcelCOM_UDF to create all entries in the Excel Workbook. See the below code snippet: CODEFor $i = 1 to $aFiles[0] $sCurrentFile = $aFiles[$i] If StringLen($sCurrentFile) > 35 Then _InfoTxt("Adding data from: ..." & StringRight($sCurrentFile, 35)) Else _InfoTxt("Adding data from: " & $sCurrentFile) EndIf $sCurrentRow = $i + 1 _ExcelWriteCell($oExcel, $sCurrentFile, $sCurrentRow, 1) If not FileExists($sCurrentFile) Then MsgBox(4096, "CustomProperties - ERROR", "Error occurred, Could not find " & $sCurrentFile & @CRLF & "The program will abort.") Exit EndIf $oDocument = $oPropertyReader.GetDocumentProperties($sCurrentFile) If Not $odocument.IsReadOnly Then $oCustomProperties = $odocument.CustomProperties For $ia = 1 to $aFileProperties[0][0] $sProperty = $aFileProperties[$ia][1] For $strProperty in $oCustomProperties If $strProperty.Name = $sProperty Then _ExcelNumberFormat($oExcel, "@", $sCurrentRow, $ia + 1, $sCurrentRow, $ia + 1) _ExcelWriteCell($oExcel, $strProperty.Value, $sCurrentRow, $ia + 1) ;<-- This gives ø32x220 for some af the values $testFile = FileOpen(@ScriptDir & "\test.txt", 1+8) FileWriteLine($testFile, $strProperty.Value) ;<--- This give ø32x220 for the same values FileClose($testFile) EndIf Next Next Else MsgBox(4096, "CustomProperties - ERROR", "Error occurred, the file : " & @CRLF & $sCurrentFile & @CRLF & " is readonly and will be skipped.") EndIf Next I hope some one can help me find out why this is happening. Regards Martin

I was looking for text effecs, and now they are gone

Putting it on the control gui. I also have the problem with a normal gui with just a background image, if that is any help.

This is a great script. I wonder if anyone could me find out why its not working together with this: http://www.autoitscript.com/forum/index.ph...st&p=361817 Which is Icon buttons with text. My problem is that it will only show the icon image and not the button, seems to have something to do with $WS_CLIPSIBLINGS in the button function. Any help?

Great improvement MsCreatoR I do have another problem now. It seems like I can't change the background color of the icon in the button. It keeps using the background color of the form instead of GUICtrlSetBkColor Regards Martin

Perfect, excatly what I needed Thanks a lot for the help. Holger: Your link looks very interesting, I can definitly use that for menu's

Hi, I'm having trouble creating GUI buttons with a Icon and Text on at the same time. Everytime I use $BT_ICON it do not show the text. Is it possible to make buttons that show a icon on the left side and text on the right? and if so how do you do it? Regards Martin

Thanks a lot for the help. It really got me helped Regards Martin

Hi, I hope some one can show me how this vba code will look like in au3. CODESet objPropertyReader = CreateObject("DSOleFile.PropertyReader") Set objDocument = objPropertyReader.GetDocumentProperties _ ("C:\Scripts\Test.doc") Set colCustomProperties = objdocument.CustomProperties For Each strProperty in colCustomProperties If strProperty.Name = "TestProperty" Then strProperty.Value = "New value" End If Next Im trying to find out how to use dsofile.dll COM Object inside a AU3 script. But COM is not my strong side.. Actually I have never used it Regards Martin

Hi, Nice app.. and it works great.. I do have question... How did you make the / "spining" and the ' moving while it defrags? Maybe you are willing to provide the source for just that. Regards Martin

Any news? ?????

Ohh I almost can't wait for the new version with the commands.. Feels like Im almost pissing my pants

Any news on this udf ? Really looking forward to use it when it also can handle management commands Regards Martin

Hi Valuater, Just wanted to say that this is brilliant. Great work... love it Idea of improvement: Allow multiple lines in XSkinTrayBox + option for button controls. Example of usage for the above idea could be a information box telling of a new update for ones program and the option to press a download update Regards Martin