PB中如何取得上传文件的文件扩展名.(急)

[limingzhao]

PB中如何取得上传文件的文件扩展名.即系例如:路径为:D:\myPBEx\12451.txt
如何取得它的扩展名为txt呢!?

[dongquestion]

循环取得最后一个点的位置，然后
mid(path,pos(path,'.')+1)

[ribut9225]

//楼上的思路不错，不过做法有些问题
//因为有些人的文件名可能是
//2007.08.01.txt
//
//所以应该从最右查

string path = "2007.08.01.txt"
long ll_n1
long ll_pos = 1

for ll_n1 = len(path) to 1 step -1
if mid(path,ll_n1,1)="." then
exit
end if
ll_pos++
next

messagebox("文件扩展名",right(path,ll_pos -1))

[WOFEIYANG]

D:\myPBEx\12451.txt
,如果操作系统设置为隐藏扩展名,则以上判断都将不起作用

[WOFEIYANG]

在使用FINDWINDOW()外部函数时:
D:\myPBEx\12451.txt
,如果操作系统设置为隐藏扩展名,则以上判断都将不起作用

[wu_rl519]

取最后的点不是可以用lastpos(xx, '.')来取吗

[Du_SDong]

lastpos？ PB6.5反正没有这个函数