Hi, you can try the script below - it should let you pick the ini files and import all at once…
Option Explicit
Call Main()
Sub Main()
Dim arrFiles : arrFiles = Rhino.OpenFileNames("DisplayMode Files to import?", "DisplayMode Files (*.ini)|*.ini|All Files (*.*)|*.*||")
If isnull(arrFiles) Then Exit Sub
Dim i
For i=0 To Ubound(arrFiles)
Call Rhino.ImportViewDisplayMode(arrFiles(i), True)
Next
End Sub