-
'ชื่อฟังก์ชั่น: Joinchar
'ฟังก์ชั่น: เพิ่มในที่อยู่? หรือ&
'พารามิเตอร์: เว็บไซต์ strurl -----
'ค่าคืน: เพิ่ม? หรือ & url
-
functionjoinchar (strurl)
IfStrurl = "" แล้ว
Joinchar = ""
exitfunction
endif
ifinstr (strurl, "?") <len (strurl) แล้ว
ifinstr (strurl, "?")> 1 จากนั้น
ifinstr (strurl, "&") <len (strurl) แล้ว
Joinchar = strurl & "&"
อื่น
Joinchar = strurl
endif
อื่น
Joinchar = strurl & "?"
endif
อื่น
Joinchar = strurl
endif
endfunction