AE中获得datalayer(featurelayer,tin.raster)所对应的data的文件路径和文件名

代码如下,只要是datalayer就行,featurelayer、tin、raster等都可以获得     获得datalayer所对应的文件路径    图层  文件路径  文件名     Public Sub GetDataLayerPath(ByVal pDataLayer As IDataLayer, ByRef pFilePat