[AccessD] What's wrong with this?

Nope, no commas in  Types - but there shouldn't be any line extensions either - they are all 
separate lines.  Just change it to:

Type OPENFILENAME
  lStructSize As Long
  hwndOwner As Long
...
End Type
 
It will then be identical to the one I use all the time.



On 28 May 2012 at 20:19, Arthur Fuller wrote:

> I'm looking at an InsideAccess article on MSDN that's about FileOpen and
> FileSaveAs. It's got some wonky spacing and punctuation, that I've tried to
> clean up, but so far unsuccessfully.
> 
> Here's what I have so far, and it won't permit it. I'm hoping someone can
> either tell me what's wrong or maybe has this code in a form that is
> considered acceptable. This is in a class module called CommonDialogAPI:
> One thing that strikes me as odd is the lack of commas between items, but
> maybe that's just the TYPE syntax. I don't know.
> 
> <vba>
> Private Type OPENFILENAME _
>     lStructSize As Long _
>     hwndOwner As Long _
>     hInstance As Long _
>     lpstrFilter As String _
>     lpstrCustomFilter As String _
>     nMaxCustFilter As Long _
>     nFilterIndex As Long _
>     lpstrFile As String _
>     nMaxFile As Long _
>     lpstrFileTitle As String _
>     nMaxFileTitle As Long _
>     lpstrInitialDir As String _
>     lpstrTitle As String _
>     Flags As Long _
>     nFileOffset As Integer _
>     nFileExtension As Integer _
>     lpstrDefExt As String _
>     lCustData As Long _
>     lpfnHook As Long _
>     lpTemplateName As String
> End Type
> </vba>
> 
> Can you help? TIA.
> -- 
> Arthur
> Cell: 647.710.1314
> 
> Prediction is difficult, especially of the future.
>   -- Niels Bohr
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 

--
Stuart McLachlan

Ph:    +675 340 4392 
Mob: +675 7100 2028
Web: http://www.lexacorp.com.pg