这样试试?我没有局域网使用经验。
ClearGrid(GridName) And Import(GridName,"\\Dm12\日报录入\[%月%]"+ "\" + [%月%] + "rb.egd","日报录入","")