Can anyone tell me how you convert a long file name to a short one?
I'm having problems in a VB.4 app under Win '95 talking to a 16 bit
version of Word.. Word can't find the passed document name because of
the path.

Thanks in Advance.
Paul Murray

If you are using a VB4-32 bit app under Win95, you can use the
GetShortFileName API to convert the long name to a short one.....

  Dim r&, txt$
  Dim shortPath As String * 256

  file2change$ = "c:\Some Long Path\Some Long FIlename.doc"

  r& = GetShortPathName(fPath$ & file2change$, shortPath$, Len(shortPath$))

  If r& Then
        DOSName = LCase$(Left$(shortPath$, r&))
  Else: DOSName = "<DOS filename can not be determined>"
  End If

If you're using VB4-16, this API is not available; you'll have to
parse the string yourself.

Private Declare Function GetShortPathNameA Lib "kernel32" (ByVal
LongName As String, ByVal ShortName As String, ByVal bufsize As
Integer) As Long

--
VB Info: http://www.sn.no/~balchen/vb/visual.htm
FAQ: http://www.sn.no/~balchen/vb/faq.htm
Knowledge Base: http://www.sn.no/~balchen/vb/kb.htm

I cannot get the article from VBPJ, but the jist of the solution is to setup
a call to the 32 bit API entrypoint to resolve the name. Perhaps you can
find this on the windx.com site.

Tom