Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/O Code)
 Not displaying background image for mobile browser

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!
Before posting, make sure you have read this topic!

Screensize:
UserName:
Password:
Format Mode:
Format: BoldItalicizedUnderlineStrikethrough Align LeftCenteredAlign Right Horizontal Rule Insert HyperlinkInsert EmailInsert Image Insert CodeInsert QuoteInsert List
   
Message:

* HTML is OFF
* Forum Code is ON
Smilies
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Clown [:o)]
Black Eye [B)] Eight Ball [8] Frown [:(] Shy [8)]
Shocked [:0] Angry [:(!] Dead [xx(] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
   

T O P I C    R E V I E W
Webbo Posted - 14 July 2014 : 16:12:47
Is it possible to edit this code for calling up the background image of the forum so that it does not display it if a user is viewing the forum with a mobile browser?

The code:


if strPageBGImageURL = "" then
   strTmpPageBGImageURL = ""
elseif Instr(strPageBGImageURL,"/") > 0 or Instr(strPageBGImageURL,"\") > 0 then
      strTmpPageBGImageURL = " background=""" & strPageBGImageURL & """" & " bgproperties=""fixed"""
else
      strTmpPageBGImageURL = " background=""" & strImageUrl & strPageBGImageURL & """" & " bgproperties=""fixed"""

end if


Thanks
3   L A T E S T    R E P L I E S    (Newest First)
Carefree Posted - 15 July 2014 : 17:20:46
You're welcome. If they experience issues, we'll need to get a look at their user agent string.
Webbo Posted - 15 July 2014 : 16:51:50
Works well on Blackberry. I'll see if any users report any problems

Many thanks
Carefree Posted - 14 July 2014 : 20:29:49
Try this:


if strPageBGImageURL = "" then
	strTmpPageBGImageURL = ""
elseif Instr(strPageBGImageURL,"/") > 0 or Instr(strPageBGImageURL,"\") > 0 then
	strTmpPageBGImageURL = " background=""" & strPageBGImageURL & """" & " bgproperties=""fixed"""
else
	strTmpPageBGImageURL = " background=""" & strImageUrl & strPageBGImageURL & """" & " bgproperties=""fixed"""
end if
Dim Match
Set Regex = New RegExp
With Regex
	.Pattern = "(Android|Avantgo|Bada|BlackBerry|Blazer|Compal|Dolfin|Dolphin|Elaine|en-ph|Fennec|Hiptop|(hpw|web)OS|iP(hone|od|ad)|Iris|Kindle|LGE|Maemo|midp|Minimo|mmp|Mobile|NetFront|Opera M(obi|ini)|Palm|pda|Plucker|Pocket|PSP|Samsung|Silk-Accelerated|Skyfire|smartphone|symbian|Treo|up.browser|up.link|Vodafone|wap|windows ce|XDA|Xiino|Zune)"
	.IgnoreCase = True
	.Global = True
End With
If Regex.Test(Request.ServerVariables("HTTP_USER_AGENT")) Then
	strTmpPageBGImageURL = ""
End If

Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.02 seconds. Powered By: Snitz Forums 2000 Version 3.4.07