Login
or
Register
Your Cart
|
InstantForum.NET 2012
InstantKB.NET 2011
Active Directory
Live Demos
Download
Purchase
InstantForum.NET Hosting
InstantKB.NET Hosting
New Ticket
Documentation
Knowledgebase
Support Services
Support Plans
Contact Us
Community Forums
Our Blog
On Twitter
About Us
Our Customers
Customer Comments
Contact Us
Paragraph Style
Font Name
Real font size
Apply CSS Class
Custom Links
Zoom
%3cdiv style%3d%22float%3a left%3b line-height%3a 14px%3bfont-family%3a Verdana%3b font-size%3a 10pt%3b%22%3eThis article details the steps necessary to automatically add Google AdSense ads within InstantForum.NET topics. Although you can easily display Google AdSense through the wrapper functionality without any code changes adding your AdSense advertisements in-line within posts will increase your AdSense visibility and hopefully click-throughs. %3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3eYou could easily extend this example to append the Google AdSense code to each post or use the topic keywords to determine the ads displayed. We%27ve kept things simple in this example and are showing ads based on our AdSense ClientID. We do intend to improve support in this area with future versions to provide several methods for serving your ads with no code changes.%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan class%3d%22Header%22%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan%3eAdd Google AdSense Ads Inline%3c/span%3e%3c/span%3e%3cspan%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3eUsing the code in this example will allow you to add AdSense Ads automatically as the second post within any topic within InstantForum.NET. This is shown below...%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cimg src%3d%22/Uploads/Images/GoogleAdSenseInstantForum.gif%22 /%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan class%3d%22Header%22%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3eCode Changes %28Post.vb%29%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3eThis code can be applied to either the End User License or Developer License. You%27ll only need to modify a single code-behind file.%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3c/span%3e%3col%3e%3cli%3e%3cspan%3eOpen up %3cspan style%3d%22font-weight%3a bold%3b%22%3eInstantASP.InstantForum.UI%5cPages%5cPost.vb%3c/span%3e within Visual Studio.NET%3c/span%3e%3c/li%3e%3cli%3e%3cspan%3eLocate the %22%3cspan style%3d%22font-weight%3a bold%3b%22%3eInsertPost%3c/span%3e%22 method around line 660. We%27ll need to add a call to our new methods here.%3c/span%3e%3c/li%3e%3cli%3e%3cspan%3eBelow the InsertPost method add the following code. You can also find this code in the attached file below.%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-weight%3a bold%3b%22%3eInsertAdSensePost %3c/span%3e- This method actually adds the post to the InstantForum.NET database.%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan class%3d%22Code%22%3ePrivate Function InsertAdSensePost%28ByVal intTopicID As Int32%29 As Int32%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 get adsense post%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Dim AdSensePost As InstantASP.InstantForum.Components.Topic %3d GetGoogleAdSensePost%28intTopicID%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 add the post as a reply to our topic%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Dim Topic As InstantASP.InstantForum.Components.Topic %3d _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e InstantASP.InstantForum.Business.Posts.InsertPost%28 _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e CType%28ForumID.Value%2c Int32%29%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e AdSensePost.TopicID%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e AdSensePost.ParentID%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e AdSensePost.UserID%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e ctlPostControl.MessageIcon%2c ctlPostControl.Subject%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %22%22%2c AdSensePost.Message%2c %22%22%2c False%2c CurrentContext%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e If Not Topic Is Nothing Then%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Return Topic.PostID%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Else%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Return 0%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e End If%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3eEnd Function%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-weight%3a bold%3b%22%3eGetGoogleAdSensePost %3c/span%3e- This method simply returns a InstantASP.InstantForum.Components.Topic object representing the Google AdSense post we wish to add/ You should modify the ClientID and AdSense client side code below to suite your requirements.%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan class%3d%22Code%22%3ePrivate Function GetGoogleAdSensePost%28ByVal intTopicID As Int32%29 As InstantASP.InstantForum.Components.Topic%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 IMPORTANT%3a Your AdSense Client ID%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Dim strAdSenseClientID As String %3d %22pub-XXXXXXXXXXXXXX%22%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 ----------%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 The actual Adsense Code that will be added to our post%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 You can modify this to suite your requirements%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 ----------%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Dim sb As New System.Text.StringBuilder%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22%26lt%3bscript type%3d%22%22text/javascript%22%22%3e %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_ad_client %3d %22%22%22 %2b strAdSenseClientID %2b %22%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_alternate_color %3d %22%22D9DAD5%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_ad_width %3d 468%3b google_ad_height %3d 60%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_ad_format %3d %22%22234x60_as%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_ad_type %3d %22%22text%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_ad_channel %3d%22%22%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_color_border %3d %22%22676B56%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_color_bg %3d %22%22D9DAD5%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_color_link %3d %22%22800000%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22google_color_url %3d %22%22800000%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22goggle_color_text %3d %22%22333333%22%22%3b %22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22%26lt%3b/script%3e%22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e sb.Append%28%22%26lt%3bscript type%3d%22%22text/javascript%22%22 src%3d%22%22http%3a//pagead2.googlesyndication.com/pagead/show_ads.js%22%22%3e%26lt%3b/script%3e%26lt%3b/div%3e%22%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 create an instance of our anonymous user%2c you%27ll use this user for the adsense post%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Dim User As New InstantASP.InstantForum.Components.AnonymousUser%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Dim AdSensePost As New InstantASP.InstantForum.Components.Topic%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e AdSensePost.TopicID %3d intTopicID%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e AdSensePost.ParentID %3d intTopicID%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e AdSensePost.UserID %3d User.UserID%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e AdSensePost.Username %3d User.Username%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e AdSensePost.Message %3d sb.ToString%28%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 return our topic object%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Return AdSensePost%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3eEnd Function%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3c/span%3e%3c/li%3e%3cli%3e%3cspan%3e%3cspan%3eOnce you%27ve added the two methods above simply add a call to InsertAdSensePost from our existing InsertPost method...%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan class%3d%22Code%22%3e%3cp%3ePrivate Function InsertPost%28%29 As Int32%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 add post to database%2c we indicate this is not a poll below%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 if successfull a topic object is returned with new post%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e Dim Topic As InstantASP.InstantForum.Components.Topic %3d _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e InstantASP.InstantForum.Business.Posts.InsertPost%28CType%28ForumID.Value%2c Int32%29%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e CType%28TopicID.Value%2c Int32%29%2c CType%28ParentID.Value%2c Int32%29%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e MyBase.CurrentContext.CurrentUser.UserID%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e ctlPostControl.MessageIcon%2c ctlPostControl.Subject%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e ctlPostControl.Description%2c ctlPostControl.Message%2c _%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e ctlPostControl.AttachmentGUID%2c False%2c CurrentContext%29%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 was post insert ok%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e If Not Topic Is Nothing Then%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 do we have a post%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e If Topic.PostID %3e 0 Then%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %27 call our method to add a adsense post%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e %3cspan style%3d%22BACKGROUND-COLOR%3a rgb%28255%2c255%2c0%29%22%3eInsertAdSensePost%28Topic.PostID%29%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e- we%27ve removed the rest of the code for readability.%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3c/span%3e%3c/span%3e%3c/li%3e%3cli%3e%3cspan%3e%3cspan%3eREbuild your solution within Visual Sutdio.NET and visit your forum installation. Add a new test topic and you should see your Google AdSense ad displayed below the first post in your topic.%3c/span%3e%3c/span%3e%3c/li%3e%3c/ol%3e%3cspan%3e%3cspan class%3d%22Header%22%3eThat%27s It%21%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3eMaking these changes to Post.vb will ensure a Google AdSense ad always appears as the second post within any topic within InstantForum.NET. I hope this helps generate a little extra income from your community.%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3eIf you have any questions don%27t hesitate to leave some comments below or %3ca href%3d%22http%3a//www.instantasp.co.uk/Contact/%22%3econtact us%3c/a%3e.%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3e%3cspan style%3d%22font-size%3a 4pt%3b%22%3e%3cp%3e%3c/p%3e%3c/span%3eInstantASP Support%3cbr /%3ehttp%3a//kb.instantasp.co.uk/Knowledgebase/Add-Google-AdSense-to-topics-within-InstantForum.NET%3c/div%3e
Design
HTML
Preview
1999-2012 © InstantASP Ltd. |
Privacy Policy
InstantForum.NET 2012
InstantKB.NET 2011
Active Directory
Live Demos
Download
Purchase
InstantForum.NET Hosting
New Ticket
Documentation
Knowledgebase
Support Services
Support Plans
Contact Us
Community Forums
Our Blog
On Twitter
About Us
Our Customers
Customer Comments