关于播放avi

Question

//Argument:
//string arg_message
//return Long
Long ll_rtn
string ls_error,ls_string
ls_error=space(128)
ls_string=space(128)
ll_rtn=mciSendStringA(arg_message,ls_string,127,0)
if ll_rtn<>0 then
mciGetErrorStringA(ll_rtn,ls_error,Len(ls_error)-1)
messagebox("Media error","Error message:rn"+ls_error)
return ll_rtn
End if
return -1
//在数据窗口dw_1中播放avi
String ls_handle,ls_named,is_file_name
Long ll_rtn_code
ll_rtn_code=GetFileOpenName("Select File",is_file_name,ls_named,"DOC","AVI Files(*.AVI),*.AVI")
If ll_rtn_code=-1 or Upper(Right(Trim(is_file_name),3))<>"AVI"Then
MessageBox("Selection error","you must select an AVI File!")
is_file_name=""
return
End if
ll_rtn_code=wf_SendStringA("Open"+is_file_name)
If ll_rtn_code<>1 then Return
ls_handle=String(handle(dw_1))
wf_SendStringA("Window"+is_file_name+"Handle"+ls_handle)
wf_SendStringA("Put"+is_file_name+"destination")
wf_SendStringA("Set"+is_file_name+"time format frames")
//play
if wf_SendStringA("Play"+is_file_name)<>1 Then
messagebox("play Failed","Could not play"+is_file_name)
end if
//编译通过但运行时
message:“指定文件需要一个别名，文件，驱动程序，或设备名，请根据请求提供一个名称”
why??????????