Giriş yapmadınız. Lütfen giriş yapın yada kayıt olun.
fox4um » Microsoft Office Otomasyonu » 'Excel' yüklü olup olmadığını nasıl anlayabiliriz
error trap metodu dışında; bir bilgisayarda örneğin 'Excel' yüklü olup olmadığını nasıl anlayabiliriz?
Eğer yüklü ise versionu hakkında bilgi nasıl alabiliriz ?
şimdiden teşekkürler
Ali VFP 6.0 SP4
class tan alıntıdır.
Kaynak : Cetin BASOZ
* kontrol kodu
do case
&&case _IsClassRegistered('Word.Application')
&&messagebox('Word 97 veya sonrasi yuklu')
case this._IsClassRegistered('Excel.Application')
RETURN &&messagebox('Excel yuklu')
otherwise
messagebox('MSExcel Sistemde Yüklü Değil !',16,'Hata ...')
quit
endcase
* class method kodu
lparameters tcClass
#DEFINE HKEY_CLASSES_ROOT -2147483648
#DEFINE ERROR_SUCCESS 0 && OK
DECLARE Integer RegOpenKey IN Win32API ;
Integer nHKey, String @cSubKey, Integer @nResult
DECLARE Integer RegCloseKey IN Win32API ;
Integer nHKey
local lnKey
lnKey = 0
llRetVal = ( RegOpenKey(HKEY_CLASSES_ROOT, tcClass, @lnKey) = ERROR_SUCCESS )
if llRetVal
RegCloseKey(lnKey)
endif
CLEAR DLLS
return llRetVal
oExcel.Version
ile de version alabilirsin.
fox4um » Microsoft Office Otomasyonu » 'Excel' yüklü olup olmadığını nasıl anlayabiliriz