Mikähän tässä mättää?
If Dir(App.Path & "\bin", vbDirectory) = "" Then MkDir App.Path & "\bin" End If
Tekee kyllä kansion, mutta ohjelma ei toimi.
Kun avaan ohjelman tulee herja:
Type Mismatch
Kuittaan ok:lla.
Yritän uudestaan avata ohjelman, tulee herja:
Path/File access error
Jos palautan sinne alkuperäisen kansion joka on tehty käsin niin ohjelma toimii.
Sain ratkaistua. Se yritti samaan aikaan hakea INI-filusta sieltä tietoja joita ei ollut.
F8:llä tämä ratkesi. Katsoin kohta kohdalta mihin kaatu.
Aihe on jo aika vanha, joten et voi enää vastata siihen.