Hi, can you do it with this code?
dim reg as registry
dim browser as string
browser= reg.readkey("HKEY_CLASSES_ROOThtmlfileshellopencommand")
browser=browser-chr$(34)
browser=left$(browser,instr(browser,".")+4)
showmessage browser
shell(browser)
best regards
Search found 246 matches
- Sat Oct 13, 2012 4:17 pm
- Forum: General category
- Topic: find the default browser
- Replies: 9
- Views: 13134
- Fri Oct 12, 2012 3:57 pm
- Forum: General category
- Topic: find the default browser
- Replies: 9
- Views: 13134
find the default browser
can you do it whit this?
`open default browser
if fileexists("blank.html")=false then
dim f as filestream
f.open("blank.html")
f.close
end if
best regards
open("blank.html")
`open default browser
if fileexists("blank.html")=false then
dim f as filestream
f.open("blank.html")
f.close
end if
best regards
open("blank.html")
- Wed Oct 03, 2012 3:32 pm
- Forum: examples
- Topic: File Version Information
- Replies: 2
- Views: 5512
File Version Information
Hi if it is possible i will add it, so it is on the todolist.
best regards
best regards
- Wed Oct 03, 2012 3:30 pm
- Forum: General category
- Topic: Copy a file from one directory to another leaving
- Replies: 5
- Views: 8942
Copy a file from one directory to another leaving
Sorry mistake of me you must use copyfrom like this:
dim target as filestream
dim source as filestream
source.open("readme.txt")
target.open("copyfromreadme.txt")
target.copyfrom(source)
target.close
source.close
showmessage "done"
this must work smoothly. Best regards
dim target as filestream
dim source as filestream
source.open("readme.txt")
target.open("copyfromreadme.txt")
target.copyfrom(source)
target.close
source.close
showmessage "done"
this must work smoothly. Best regards
- Wed Sep 19, 2012 8:53 pm
- Forum: General category
- Topic: WinApi get Get Program Files directory
- Replies: 4
- Views: 8138
WinApi get Get Program Files directory
You can get the path from the registry:
dim reg as registry
dim key as string
key="HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionProgramFilesDir"
showmessage reg.readkey(key)
best regards
dim reg as registry
dim key as string
key="HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindowsCurrentVersionProgramFilesDir"
showmessage reg.readkey(key)
best regards
- Mon Sep 17, 2012 3:23 pm
- Forum: General category
- Topic: Close the form
- Replies: 2
- Views: 5719
Close the form
two solutions in one examplebest regardsobject myform as form object m as mainmenu object exapp as menuitem caption="Exit" onclick=closeapp end object end object borderstyle=bssingle`nosize...
- Fri Sep 14, 2012 8:23 pm
- Forum: General category
- Topic: MP3 Player
- Replies: 17
- Views: 25046
MP3 Player
hi, figured it out, see the example belowbest regards``get duration of a mp3 fileDeclare mciSendString as "mciSendStringA" of "winmm.dll" lpstrCommand As String lpstrReturnString As String byaddress uReturnLength As integer hwndCallback As integer re...
- Wed Aug 29, 2012 3:34 pm
- Forum: General category
- Topic: setFocus
- Replies: 2
- Views: 5340
setFocus
hi i`ve looked everwhere but can not find a good solution for it.The only thing i can up with is the following codeI hope you can do something with it, best regards`set focus to third party applicationdeclare getforeground as "GetForegroundWindow" of user32? result as integerend declaredec...
- Wed Aug 29, 2012 3:17 pm
- Forum: examples
- Topic: System Info
- Replies: 2
- Views: 5179
System Info
hi, i think the api calls will be more acurate then registry.
It is not very simple to build it in because the info is scattered al over the windows(place)| registry different api calls etc.
But i will giv it a try in the next update.
best regards
It is not very simple to build it in because the info is scattered al over the windows(place)| registry different api calls etc.
But i will giv it a try in the next update.
best regards
- Mon Aug 27, 2012 3:44 pm
- Forum: discbugs
- Topic: DateTime type
- Replies: 2
- Views: 7895
DateTime type
hi also added it (to the todo list).
best regards
best regards