came.git - Gitblit

			@@ -287,19 +287,19 @@
			If IRid<>0 Then
			'手动报价
			If InStr(Address,"白云机场")>0 Or InStr(Address,"白云国际机场")>0 Then
			IRPrice=489
			IRPrice=298
			IRlimit1=5
			IRDtPrice=6
			ElseIf InStr(Address,"广州南站")>0 Then
			IRPrice=389
			IRPrice=298
			IRlimit1=5
			IRDtPrice=6
			ElseIf InStr(Address,"广州白云站")>0 Then
			IRPrice=389
			IRPrice=298
			IRlimit1=5
			IRDtPrice=6
			ElseIf InStr(Address,"广州东站")>0 Then
			IRPrice=359
			IRPrice=298
			IRlimit1=5
			IRDtPrice=6
			'ElseIf StartArea="白云区" Then
			@@ -307,15 +307,15 @@
			' IRlimit1=5
			' IRDtPrice=6
			elseIf StartArea="越秀区" Or StartArea="荔湾区" Or StartArea="海珠区" Or StartArea="天河区" Or StartArea="黄埔区" Or StartArea="白云区" Then
			IRPrice=169
			IRPrice=99
			IRlimit1=5
			IRDtPrice=6
			elseif StartArea="番禺区" Then
			IRPrice=219
			IRPrice=99
			IRlimit1=5
			IRDtPrice=6
			ElseIf StartArea="花都区" Then
			IRPrice=169
			IRPrice=99
			IRlimit1=5
			IRDtPrice=6
			ElseIf StartArea="增城区" And Isluxury="0" Then
			@@ -338,7 +338,7 @@
			IRDtPrice=6
			IsOrdinary="1"
			ElseIf StartArea="南沙区" And Isluxury="1" Then
			IRPrice=359
			IRPrice=99
			IRlimit1=5
			IRDtPrice=6
			IsOrdinary="1"
			@@ -390,7 +390,7 @@
			OrderPriceFRM = OrderPriceFRM & "+"&WaitingInt&"*"&IRWaitingCost
			OrderPriceTXT = OrderPriceTXT&"等待费用:"&WaitingInt*IRWaitingCost&"元\n"
			End If
			If ServiceOrdApptDate<>"" Then '非工作时间服务费用20250624，周一~周五晚上22点后至早上7点整前为1.3倍
			If ServiceOrdApptDate<>"" Then '非工作时间服务费用20250812，周一~周五晚上21点30分后至早上7点整前为1.3倍
			sql="select SpecialRatio from SpecialDates where SpecialDates='"&formatdatetime(ServiceOrdApptDate,2)&"'"
			rs.open sql,objConn,1,1
			if not rs.Eof Then
			@@ -398,7 +398,7 @@
			OrderPriceFRM = OrderPriceFRM & OrderPrice*(SpecialRatio-1)
			OrderPriceTXT = OrderPriceTXT&"节假日时间服务费用:"&OrderPrice*(SpecialRatio-1)&"元\n"
			OrderPrice=OrderPrice*SpecialRatio
			ElseIf (hour(ServiceOrdApptDate)>=22 Or hour(ServiceOrdApptDate)<7) Then
			ElseIf (hour(ServiceOrdApptDate)>=21 And minute(ServiceOrdApptDate)>=30) Or hour(ServiceOrdApptDate)<7 Then
			OrderPriceFRM = OrderPriceFRM & OrderPrice*0.3
			OrderPriceTXT = OrderPriceTXT&"非工作时间服务费用:"&OrderPrice*0.3&"元\n"
			OrderPrice=OrderPrice*1.3