Hi all! I have found, in Mapinfo-L, a procedure that allows us to choose a folder with a search window, that run but I would like put by default a specific folder (c:\CEAP), What is the way? Include "MapBasic.def" Type BROWSEINFO hwndOwner as Integer pidlRoot As Integer pszDisplayName As String lpszTitle As String ulFlags As Integer lpfn As Integer lParam As Integer iImage As Integer End Type Declare Function SHBrowseForFolder Lib "shell32.dll" (bi As BROWSEINFO) As Integer Declare Function SHGetPathFromIDList Lib "shell32.dll" (ByVal pidl As Integer, szPath As String) As Integer Dim r As Integer, bi As BROWSEINFO, s As String s = Space$(260) bi.hwndOwner = SystemInfo(SYS_INFO_MAPINFOWND) bi.pidlRoot = 0 bi.pszDisplayName = s bi.lpszTitle = "Default Data Folder" bi.ulFlags = 1 bi.lpfn = 0 bi.lParam = 0 bi.iImage = 0 r = SHBrowseForFolder(bi) If r <> 0 Then r = SHGetPathFromIDList(r, s) End If Print s Thanks, __________________________________________________ Sophie Coubes Conseillere en Geomatique GIS Consultant KOREM Inc. (http://www.korem.com) GEOdiffusion de l'information GEObroadcasting your information __________________________________________________ 680, Boul. Charest Est Quebec (Quebec) CANADA G1K 3J4 tel.: 418 647-1555 fax : 418 647-1666 Telephone sans frais : 1 888 440-1MAP __________________________________________________ Meilleur nouveau partenaire Mapinfo 2000 - Amerique du Nord Best Mapinfo New Partner 2000 - North America __________________________________________________ Push'n'See! Developed by KOREM http://www.pushnsee.com The Web-Mapping Software for Entreprise-wide Depoyment _______________________________________________________________________ List hosting provided by Directions Magazine | www.directionsmag.com | To unsubscribe, send e-mail to [EMAIL PROTECTED] and put "unsubscribe MapInfo-L" in the message body.
