WP Remix
Nop Pinyowanichaka | ก้าวสั้นๆ ในวันเบาๆ ของผม
24
Apr

การเขียน QueryString อัตโนมัติ ด้วย ASP

Posted by นพ

การเขียน QueryString อัตโนมัติ ด้วย ASP

คงมีบางคนอยากสร้าง QueryString แบบอัตโนมัิติบ้าง เพราะไม่เช่นนั้นต้องมาดูตัวแปลตั้งหมดแล้วเขียนเขียนมาเองทั้งหมดผมว่ามันลำบากเกินไป อันนี้เป็น Function ที่สำหรับสร้าง QueryString แบบ อัตโนมัติ โดยส่งเพียงค่า Parameter สำหรับชื่อตัวแปลที่ไม่ต้องการให้ทำการสร้าง QueryString ใน Function (กรณีเช่น การส่งหน้า ซึ่งจะส่งค่าเปลี่ยนไปทุกๆ หน้าไม่ Fix ตายตัว)

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

function makeQueryString(var_dynparam)
if request.ServerVariables("REQUEST_METHOD") = "POST" then
for each variable_name in request.form
variablevalue=request.form(variable_name)
if variable_name <> var_dynparam then
a =  a&"&"&variable_name &"="&variable_value
end if
next
else
for each variable_name in request.querystring
variablevalue=request.querystring(variable_name)
if variable_name <> var_dynparam then
a =  a&"&"&variable_name &"="&variable_value
end if
next
end if
makeQueryString = a
end function

วิธีเรียกใช้

<%
qstring = makeQueryString("pageno")
<a href="index.asp?pageno=1&lt;%=qstring%&gt;">หน้าถัดไป</a>
%&gt;

อ่านแล้วงง Post ถามไ้ว้ได้ครับ

Category : ASP

No comments yet.

Sorry, the comment form is closed at this time.