userformda internet yoksa uyarı versin

Katılım
17 Kasım 2009
Mesajlar
295
Excel Vers. ve Dili
2010
Altın Üyelik Bitiş Tarihi
24-12-2023
merhaba arkadaşlar google drivere veri aktarırken internet kapalı ise sunucu adı veya adresi çözümlenemedi hatası veriyor bunun yerine internet bağlantısı yok vermesini naısl yapa
googleSheetURL = URL_firstPart & URL_secPart
Set xmlHTTP = New ServerXMLHTTP60
xmlHTTP.Open "Post", googleSheetURL, False
xmlHTTP.setRequestHeader xmlHTTPHeader, xmlID
xmlHTTP.send
If xmlHTTP.statusText = "OK" Then
MsgBox "BAŞARIYLA TAMAMLANDI.", vbInformation
Else

MsgBox "İNTERNET YOK ", vbCritical
 

Ekli dosyalar

Katılım
17 Kasım 2009
Mesajlar
295
Excel Vers. ve Dili
2010
Altın Üyelik Bitiş Tarihi
24-12-2023
biraz araştırarak örnek kodlar bularak sorunu çözdüm
 
Üst