[RESOLVED] [2005] "String" issue

[lintz]

I've created a variable (sPath) to store the location of a file in a DB using the below. The issue is it's truncating part of the path.

The path should come out as:
'C:\M5\bin\Database\Financials\ZZZ.d'

but it is coming out as:
'C:\M5\bin\Database\Financials'

I have put a break point in and 'Symbol' and 'g_sDataMode' do have values.

Anyone know why the variable is not saving the full path?

Dim sPath As String

        sPath = Application.StartupPath & "\Database\" & Sector & "\" & Symbol & "." & g_sDataMode

[Deepak Sakpal]

This code in not enough. There is nothing special that can cause the problem. Can you please post the whole code block.

[lintz]

Here is it

Public Function GetHistory(ByVal Symbol As String, _
                                    ByVal Sector As String) As Boolean
 
       
        Dim sPath As String
 
        sPath = Application.StartupPath & "\Database\" & Sector & "\" & Symbol & "." & g_sDataMode
 
        Debug.Print(sPath)
 
        If System.IO.File.Exists(sPath) = False Then
 
            MsgBox("Could not locate data file for " & Symbol, MsgBoxStyle.Exclamation)
 
            Return False
 
            Exit Function
        End If
 
Return True
 
End Function

[Teme64]

Nothing seems to be wrong with the code. Put a breakpoint at the line:
sPath = ...
and check that all string variables do have a value. I bet you're dropping them somewhere...

Teme64 @ windevblog.blogspot.com

[dbasnett]

Debug.WriteLine(Symbol)
Debug.WriteLine(g_sDataMode)

[youthbytes]

Sometimes I have problems with filepaths also so now I convert my file path to shortpath before saving it and then converting back to longpath to be displayed to the user. I suppose it's not the best way, but it works for me.

[lintz]

Don't know why but "Sector" had a large number of spaces added to the end of the value so 'Financials' was actually 'Financials '.

Once I removed the spaces everything is OK.

[dbasnett]

so you ended up with something like this

sPath = Application.StartupPath & "\Database\" & Sector.Trim & "\" & Symbol.Trim & "." & g_sDataMode.Trim

[Jenner]

Some database systems, especially older ones, pad all their string data with spaces. We have an old Pervasive database app that does. It's painful having to add .Trim to the end of EVERYTHING... and it doesn't help it stores EVERYTHING as strings... even numbers and dates.