By=HMIRuntime.Tags("BYEAR").Read
Bm=HMIRuntime.Tags("BMONTH").Read
Bd=HMIRuntime.Tags("BDAY").Read
Ny=HMIRuntime.Tags("ETEAR").Read
Nm=HMIRuntime.Tags("EMONTH").Read
Nd=HMIRuntime.Tags("EDAY").Read
BeginDate = By&"/"&Bm&"/"&Bd&" "&"00:00:00"
EndDate = Ny&"/"&Nm&"/"&Nd&" "&"23:59:59"
strSQL1= "SELECT convert(char(19),MyTime,20),Data01,Data02 FROM dayreport01 WHERE MyTime BETWEEN '" & BeginDate & "' and '" & EndDate & "' ORDER BY MyTime "
这个字符串转换为日期时间报错,求助