主题：[求助]指定文件夹存储问题

If img IsNot Nothing Then
    Dim path As String = projectPath & e.Form.Controls("TextBox6").text & format(e.Form.Controls("DateTimePicker1").value, "yyyyMMddHHmmss") & Tables("wztz").current("tzdbh") & ".jpg"
    img.Save(path)
    Tables("wztz").current("wzzp")=path
End If

如何将以上代码改为根据"IP.txt”指定的IP地址下的文件夹内。

请大侠帮忙解决一下下，谢谢