السلام عليكم
الرجاء يا اخوان المساعدة
DateSYSTEM = FormatDateTime(date,2)
RepDateSYSTEM = Replace(DateSYSTEM, "/", "")
response.Write RepDateSYSTEM & " = RepDateSYSTEM<br><br>"
DateUSER = "1433/06/28"
RepDateUSER = Replace(DateUSER, "/", "")
response.Write RepDateUSER & " = RepDateUSER<br><br>"
Response.Write (TypeName(RepDateSYSTEM)) & "<br>"
Response.Write (TypeName(RepDateUSER)) & "<br>"
إلى هنا تمام وأعطى نتيجة بأن نوع المتغيرين RepDateSYSTEM و RepDateUSER من النوع النصي String
المشكلة هنا أنه يتعامل مع قيمة المتغير RepDateSYSTEM على أنه من النوع النصي
strVar1 = RepDateSYSTEM
If isNumeric(strVar1) Then
Response.Write "ok1"
End If
المشكلة هنا أنه يتعامل مع قيمة المتغير RepDateUSER على أنه من النوع الرقمي
strVar2 = RepDateUSER
If isNumeric(strVar2) Then
Response.Write "ok2"
End If
والمطلوب كيف أجعل المتغيرين من النوع الرقمي سوياً أو أجعلهم من النوع النصي سوياً لكي أتمكن من تحقيق الشرط التالي بنجاح :
if RepDateSYSTEM = RepDateUSER then
response.Write "yes <br>"
else
response.Write "no <br>"
end if
وشكراً لكم جميعاً