Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 107,382

HOME > ASP > ASP Forum > ในกรณีของ (asp นะครับ) Mobile Agent จะทำให้ redirect ไป full size อย่างไรครับ





 

ในกรณีของ (asp นะครับ) Mobile Agent จะทำให้ redirect ไป full size อย่างไรครับ

 



Topic : 089514



โพสกระทู้ ( 7 )
บทความ ( 0 )



สถานะออฟไลน์




สวัสดีครับ

ผมได้ทำ mobile website ไว้ในอีก directory นึงครับแยกจาก site.com เดิมของผม โดยใส่ code asp ดังกล่าวนี้ไว้ที่ header ของ site.com
Code (ASP)
<%
Option Explicit
Dim user_agent, mobile_browser, Regex, match, mobile_agents, mobile_ua, i, size
 
user_agent = Request.ServerVariables("HTTP_USER_AGENT")
 
mobile_browser = 0
 
Set Regex = New RegExp
With Regex
   .Pattern = "(up.browser|up.link|mmp|symbian|smartphone|midp|wap|phone|windows ce|pda|mobile|mini|palm)"
   .IgnoreCase = True
   .Global = True
End With
 
match = Regex.Test(user_agent)
 
If match Then mobile_browser = mobile_browser+1
 
If InStr(Request.ServerVariables("HTTP_ACCEPT"), "application/vnd.wap.xhtml+xml") Or Not IsEmpty(Request.ServerVariables("HTTP_X_PROFILE")) Or Not IsEmpty(Request.ServerVariables("HTTP_PROFILE")) Then
   mobile_browser = mobile_browser+1
end If
 
mobile_agents = Array("w3c ", "acs-", "alav", "alca", "amoi", "audi", "avan", "benq", "bird", "blac", "blaz", "brew", "cell", "cldc", "cmd-", "dang", "doco", "eric", "hipt", "inno", "ipaq", "java", "jigs", "kddi", "keji", "leno", "lg-c", "lg-d", "lg-g", "lge-", "maui", "maxo", "midp", "mits", "mmef", "mobi", "mot-", "moto", "mwbp", "nec-", "newt", "noki", "oper", "palm", "pana", "pant", "phil", "play", "port", "prox", "qwap", "sage", "sams", "sany", "sch-", "sec-", "send", "seri", "sgh-", "shar", "sie-", "siem", "smal", "smar", "sony", "sph-", "symb", "t-mo", "teli", "tim-", "tosh", "tsm-", "upg1", "upsi", "vk-v", "voda", "wap-", "wapa", "wapi", "wapp", "wapr", "webc", "winw", "winw", "xda", "xda-")
size = Ubound(mobile_agents)
mobile_ua = LCase(Left(user_agent, 4))
 
For i=0 To size
   If mobile_agents(i) = mobile_ua Then
      mobile_browser = mobile_browser+1
      Exit For
   End If
Next
 
 
If mobile_browser>0 Then
   Response.Redirect("http://m.site.com/index.asp")     
Else
   Response.Redirect("http://www.site.com")
End If
 
%>

ซึ่งพอเรียกurl site.com บนมือถือก็ย้ายไป m.site.com เรียบร้อยครับ
ทีนี้ มีปัญหาอยู่ว่าจะให้กดลิงค์แล้วจะให้ดูเวอร์ชั่นเว็บไซต์เต็ม (site.com) ได้ด้วยนั้นทำยังไงครับ มีคำสั่งไหนบ้างที่เกี่ยวข้องรบกวนแนะนำด้วยครับ
แปลงคำถามมาจาก https://www.thaicreate.com/php/forum/088047.html#4



Tag : ASP, iOS, Android, iPhone, Tablets, Mobile







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2013-01-21 15:21:40 By : sangdow29 View : 897 Reply : 5
 

 

No. 1



โพสกระทู้ ( 73,917 )
บทความ ( 837 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

ถ้าให้ง่ายสุดไฟล์นี้ควรจะชื่อ index.asp แล้ว redirect ไปตำแหน่งที่ต้องการ และเว็บปกติอาจจะใช้ home.asp ส่วน mobile อาจจะใช้ sub ชื่อว่า m.xxx.xxx

ตอนนี้ก็ redirect ได้แล้วไม่ยาก


Agent -> index.asp -> No Mobie -> https://www.thaicreate.com/home.asp -> Mobile -> http://m.thaicreate.com -> Full Version -> https://www.thaicreate.com/home.asp







แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-01-21 15:29:17 By : mr.win
 


 

No. 2



โพสกระทู้ ( 7 )
บทความ ( 0 )



สถานะออฟไลน์


ขอบคุณมากครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-01-21 16:02:38 By : sangdow29
 

 

No. 3



โพสกระทู้ ( 7 )
บทความ ( 0 )



สถานะออฟไลน์


ถ้าแบบยากหน่อยจะเป็นแบบไหนเหรอครับ อยากขอคำแนะนำหน่อย เอาไว้ศึกษาครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-01-22 08:30:38 By : sangdow29
 


 

No. 4



โพสกระทู้ ( 73,917 )
บทความ ( 837 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

แบบนี้ง่ายสุดแล้วครับ ถ้าแบบยาก อาจจะต้องใช้พวก Session / Cookies เข้ามาช่วยครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-01-22 10:42:20 By : mr.win
 


 

No. 5



โพสกระทู้ ( 7 )
บทความ ( 0 )



สถานะออฟไลน์


ขอบคุณอีกครั้งครับ แต่พอจะมีคำสั่งเป็นตัวอย่างไหมครับ


ประวัติการแก้ไข
2013-01-22 11:46:23
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-01-22 11:39:07 By : sangdow29
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : ในกรณีของ (asp นะครับ) Mobile Agent จะทำให้ redirect ไป full size อย่างไรครับ
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: Voake, Comcube, รับทำเว็บไซต์ รับเขียนโปรแกรม

Load balance : Server 01
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2019 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 , 08-9968-0655 อัตราราคา คลิกที่นี่