Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
Ralf_Krieg
in reply to: mhoE3YPJ

Hello

 

I can't see any line where you create the directory. *???*

You can test if directory exist and create otherwise. If creation fails, you can exit your sub

 

Dim sPath As String = "C:\Gulvsug\" & aOrdreNr & "\"
Dim oDirInfo As System.IO.DirectoryInfo

If Not System.IO.Directory.Exists(sPath) Then
	oDirInfo = System.IO.Directory.CreateDirectory(sPath)
	If oDirInfo Is Nothing Then
		MsgBox("Error creating Directory " & sPath, , "iLogic DXF-Export")
		Exit Sub
	End If
End If

R. Krieg
RKW Solutions
www.rkw-solutions.com