高手帮忙看一下代码中绝对地址的写法可以改为相对地址吗？

如下代码中刷红绝对地址的写法，能不能改成相对地址比如&&后的写法。


*根据运动员号码查询比赛成绩
ydybm=ALLTRIM(thisform.text1.Value)                           &&待查询运动员号码
*判断运动员号码是否存在
SELECT COUNT(*) FROM e:\学习\运动会管理系统\data\运动员 WHERE 运动员号码==ydybm INTO ARRAY shu
IF shu=0                                                      &&不存在该编号
   MESSAGEBOX(ydybm+"号码不存在！",0+48,"提示")
   RETURN                                                     &&结束查询
ELSE
   *查询姓名、性别、单位名称
   SELECT 姓名,性别,单位名称;
   FROM e:\学习\运动会管理系统\data\运动员,;                  &&data\运动员
   e:\学习\运动会管理系统\data\参赛单位;                      &&data\参赛单位
   WHERE 运动员.单位编码=参赛单位.单位编码 AND 运动员号码==ydybm INTO ARRAY xm
   *在文本框中显示姓名、性别、单位名称
   thisform.txtXM.Value=xm(1)
   thisform.txtXB.Value=xm(2)
   thisform.txtDW.Value=xm(3)
   *查询该运动员的参赛项目、名次、得分
   SELECT 项目名称,名次,得分;
   FROM e:\学习\运动会管理系统\data\运动项目,;               &&绝对地址e:\学习\运动会管理系统\data\运动项目
   e:\学习\运动会管理系统\data\个人得分;                    &&绝对地址e:\学习\运动会管理系统\data\个人得分
   WHERE 运动项目.项目编码=个人得分.项目编码 AND 运动员号码==ydybm INTO CURSOR grxx
   *设置表格数据源显示该运动员的参赛项目、名次、得分
   thisform.grid1.RecordSource="grxx"
ENDIF