>' Concept, code and documentation by Randy Birch, VBNet, 11/26/99 > >' Flags to control the operation of SHAutoComplete. The first four are >' used to override the Internet Explorer registry settings. The user can >' change these settings manually by launching the Internet Options property >' sheet from the Tools menu and clicking the Advanced tab. The last five >' can be used to specify which files or URLs will be available for auto >' append or autosuggest operations. > >' Ignore registry default and force feature on >Private Const SHACF_AUTOSUGGEST_FORCE_ON As Long = &H10000000 > >' Ignore registry default and force feature off. >Private Const SHACF_AUTOSUGGEST_FORCE_OFF As Long = &H20000000 > >' Ignore registry default and force feature on. (Also know as AutoComplete) >Private Const SHACF_AUTOAPPEND_FORCE_ON As Long = &H40000000 > >' Ignore registry default and force feature off. (Also know as AutoComplete) >Private Const SHACF_AUTOAPPEND_FORCE_OFF As Long = &H80000000 > >' Currently (SHACF_FILESYSTEM | SHACF_URLALL) >Private Const SHACF_DEFAULT As Long = &H0 > >' Includes the File System as well as the rest of the shell >' (Desktop\My Computer\Control Panel\) >Private Const SHACF_FILESYSTEM As Long = &H1 > >' URLs in the User's History >Private Const SHACF_URLHISTORY As Long = &H2 > >' URLs in the User's Recently Used list >Private Const SHACF_URLMRU As Long = &H4 > >Private Const SHACF_URLALL As Long = (SHACF_URLHISTORY Or SHACF_URLMRU) > >Private Declare Function SHAutoComplete _ > Lib "Shlwapi.dll" _ > (ByVal hwndEdit As Long, _ > ByVal dwFlags As Long) As Long > >Private Sub Command1_Click() > > 'Turn on auto-complete > Call SHAutoComplete(Text1.hWnd, SHACF_DEFAULT) > > 'update the captions and set focus to the textbox > Command1.Caption = "SHAutoComplete is On" > Command1.Enabled = False > Text1.SetFocus > Text1.SelStart = Len(Text1.Text) > >End Sub >Malcom,