Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Topics - sekhonas

Pages: [1]
1
Hi Guys,

How do you change the html of the submit button which reads as plain 'submit' to an
image that we have built in photoshop?

My a/r gives me the following code and this gives a plain jane submit button. I used to able to
change that to read a 'download now' image but now I have totally forgotten how to do it.

Thanks for your help.
Capt.

<form method="post" action="http://captsekhon.com/connect/mailer/form.php?form=1" id="frmSS1" onsubmit="return CheckForm1(this);" class="myForm">
   <dl>
      <dt><span class="required">*</span>&nbsp;
Your Email Address:</dt>
<dd><input type="text" name="email" value="" /></dd><dt><span class="required">*</span>&nbsp;
Name:</dt>
<dd><input type="text" name="CustomFields[2]" id="CustomFields_2_1" value="" size='50'></dd><dt><span class="required">*</span>&nbsp;
Phone:</dt>
<dd><input type="text" name="CustomFields[4]" id="CustomFields_4_1" value="" size='50' maxlength='13'></dd><dt><span class="required">*</span>&nbsp;
Preferred Format:</dt>
<dd><select name="format"><option value="h">HTML</option><option value="t">Text</option></select></dd>
      <dt>&nbsp;</dt>
      <dd>
         <input type="submit" value="Subscribe" />
         <br/>

2
Technical Assistance / Getting Recurring Fatal Error messages in WP
« on: October 08, 2013, 12:00:09 AM »
Hi Tech Honchos,

What do you guys suggest I do to overcome these errors:

" Fatal error: Allowed memory size of 33554432 bytes exhausted (tried to allocate 7680 bytes) in /home/captsekh/public_html/wp-admin/includes/class-wp-comments-list-table.php on line 330"  and
" Fatal error: Allowed memory size of 33554432 bytes exhausted (tried to allocate 1966080 bytes) in /home/captsekh/public_html/connect/wp-includes/SimplePie/Item.php on line 2736"

I get these errors when I try to upload a plugin from desktop or by using the search field from the add new place.

I don't remember how many times I've deleted these sites and re-installed but the darn errors still crop up. :''(

Capt.

3
Hey Guys,

I have on my hard drive from a PLR that I had bought, source files to the videos of the course. The source files are camrec files
and couple of files are camproz files.

I know they are the files produced by camtasia and its in camtasia that I can edit/modify them however, I do not have camtasia
and neither am I planing to spend that money on buying it.

Is there any way that I can edit those camrec and camproz files ?

Thanks for your help.
Capt.

4
Technical Assistance / How to mask an affiliate link?
« on: April 25, 2011, 09:32:44 PM »
Hi Guys,

I need to know how to mask an affiliate link in an autoresponder message where if a user clicks on eg. http://yoursite.com/xxxx where xxxx is the code of the affiliate site and the user gets re-directed to the affiliate site?

I have read it some where but can't seem to remember the step.

I also need to put in an aweber sign up form on my blog, I tried the aweber wp plugin, activated it and dragged the widget in the primary widget area but it is not showing when I view the posts. What have I done wrong? Any suggestions to rectify will be helpful to me.

Last question, How do I lock down some meaty part of a post from view unless the viewer optsin to my list to view the full post? I know this is being done but wonder how?

Thanks for your helping hand for these 3 sticky questions.

Capt.Sekhon

5
Special Offers Forum / Spin Articles without any Spinner device.
« on: January 25, 2011, 04:30:04 PM »
Hello gang of RRW,

We all know we need to write quality content filled articles eventhough its a painful chore. We then try to outsource the writing or use a spinning software but always with a lurking fear about waisting money on a crap article and a wariness of the hash mashed output of a spinner.

Almost all of us have MS words installed on our desktops and laptops and from today you can use your MS office to clear out all your plr articles and e-books gathering dust on your hard drives and earn some moolah.  You may consider this as a small gift from my side for a brighter 2011.

My request is only that we use this here amongst ourselves and not give it to people who are not a member of this forum,

Just follow all the 5 steps given below step by step :
** Follow ALL FIVE of the following steps very carefully: **

1. Download and Open the Automatic Article Spinning Word Document from my website. Sorry I cant give my site link here as rules of the forum prevent it. However you can send me PM and I'll send you the direct download link.

OR

Simply Hit "Alt + F8", then Click on "Create", then in the Window that appears, Delete everything you see and paste the following code:


' ///// START OF CODE /////

 

Public Sub SpinArticle()

    Dim objSI As Word.SynonymInfo

    Dim strWord As String

    Dim strData As String

    Dim strResult As String

    Dim arrItems() As String

    Dim blnReplaced As Boolean

    Dim i As Integer

    Dim j As Integer

    Dim intMax As Integer

    Dim blnIsCap As Boolean

    Dim strTemp As String

    Dim strChar As String

    Dim lngNumWords As Long

    Dim strCap As String

    Dim strPunc As String

   

    RemoveTags

   

    strResult = ""

    strCap = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"

    strPunc = ".!?,;"

   

    '* begin looping through every word in the ActiveDocument

    lngNumWords = ActiveDocument.Words.Count

    For j = 1 To lngNumWords

        strWord = Trim(ActiveDocument.Words(j))

        blnReplaced = False

       

        '* only worry about large words

        If Len(strWord) > 3 Then

            Set objSI = Word.SynonymInfo(strWord)

           

            '* check if the word is a NOUN or an ADJECTIVE

            If UBound(objSI.PartOfSpeechList) <> 0 Then

                'If objSI.PartOfSpeechList(1) = wdNoun Then

                If objSI.PartOfSpeechList(1) = wdAdjective Then

                   

                    '* check is synonyms found

                    If objSI.Found = True Then

                           

                        '* check for capitalization

                        strChar = Left(strWord, 1)

                        If InStr(strCap, strChar) > 0 Then

                            blnIsCap = True

                        Else

                            blnIsCap = False

                        End If

                       

                        '* examine the list of synonyms and prepare { tags

                        arrItems = objSI.SynonymList(1)

                        'arrItems = objSI.RelatedWordList

                        If UBound(arrItems) <> 0 Then

                               

                            strData = "{" & Trim(strWord)

                            intMax = UBound(arrItems)

                            If intMax > 3 Then intMax = 3

                            For i = 1 To intMax

                                strTemp = arrItems(i)

                                If blnIsCap Then

                                    strTemp = UCase(Left(strTemp, 1)) _

                                        & Right(strTemp, Len(strTemp) 1)

                                End If

                                strData = strData & "|" & strTemp

                            Next i

                            strData = strData & "}"

               

                            '* confirm this replacement is good

                            If j > 3 And j < lngNumWords 3 Then

                                strTemp = ActiveDocument.Words(j 3) _

                                        & " " & ActiveDocument.Words(j 2) _

                                        & " " & ActiveDocument.Words(j 1) _

                                        & " " & Chr(34) & strWord & Chr(34) _

                                        & " " & ActiveDocument.Words(j + 1) _

                                        & " " & ActiveDocument.Words(j + 2) _

                                        & " " & ActiveDocument.Words(j + 3)

                            Else

                                strTemp = Chr(34) & strWord & Chr(34)

                            End If

                            'strTemp = InputBox("Change " & vbCrLf _

                                '& strTemp & vbCrLf & " to ", , strData)

                            'If StrPtr(strTemp) = 0 Then

                              '  '* user pressed cancel

                            'Else

                                blnReplaced = True

                                strResult = strResult & " " & strData

                            'End If

                        End If

                    End If

                End If

            End If

        End If

   

        '* if the word was not replace, add the original word to the result

        If blnReplaced = False Then

            If InStr(strPunc, strWord) > 0 Then

                strResult = strResult & strWord

            Else

                strResult = strResult & " " & strWord

            End If

        End If

    Next j

       

    ActiveDocument.Select

    Selection.Text = strResult

   

End Sub


Public Sub RemoveTags()

    Dim intStart As Integer

    Dim intEnd As Integer

    Dim strData As String

    Dim arrItems() As String


    '* move to the beginning of the document

    Selection.HomeKey Unit:=wdStory


    '* find the first { tag

    Selection.Start = 0

    With Selection.Find

        .Text = "{"

        .Replacement.Text = ""

        .Forward = True

        .Wrap = wdFindContinue

        .Format = False

        .MatchCase = False

        .MatchWholeWord = False

        .MatchWildcards = False

        .MatchSoundsLike = False

        .MatchAllWordForms = False

    End With

    Selection.Find.Execute

   

    '* begin looping while { tags are found

    While Selection.Start > 0

        intStart = Selection.Start

   

        '* locate the ending } tag

        With Selection.Find

            .Text = "}"

            .Replacement.Text = ""

            .Forward = True

            .Wrap = wdFindContinue

            .Format = False

            .MatchCase = False

            .MatchWholeWord = False

            .MatchWildcards = False

            .MatchSoundsLike = False

            .MatchAllWordForms = False

        End With

        Selection.Find.Execute

       

        intEnd = Selection.End

   

        '* adjust the selection to capture {}

        Selection.Start = intStart

        Selection.End = intEnd

        Selection.Select

           

        RemoveSelectionTags

       

        '* locate the next { tag

        Selection.Start = 0

        With Selection.Find

            .Text = "{"

            .Replacement.Text = ""

            .Forward = True

            .Wrap = wdFindContinue

            .Format = False

            .MatchCase = False

            .MatchWholeWord = False

            .MatchWildcards = False

            .MatchSoundsLike = False

            .MatchAllWordForms = False

        End With

        Selection.Find.Execute

   

    '* continue the looping

    Wend

End Sub


Public Sub RemoveSelectionTags()

     Dim strData As String

     Dim arrItems() As String


     '* remove the { tags

     strData = Selection.Text

     strData = Replace(strData, "{", "")

     strData = Replace(strData, "}", "")

   

     '* split the alternates by the pipe delimiter

     '* use the first alternative

     arrItems = Split(strData, "|")

     strData = arrItems(0)

   

     Selection.Text = strData

End Sub

' ///// END OF CODE /////



2. Save the file, and then start writing your article.

3. Once you're done, Hit "Alt + F8" and Double Click "SpinArticle". Your content will get spun right before your very eyes.

4. Once the article has been spun, read through it and modify the content to remove any synonyms you don't want to include in the text.

5. Copy and paste your spun article into your favourite Article Submission Software to post Unique Versions of your article to thousands of Article Directories and Blogs on the internet to get loads of traffic back to your website(s)!


That's it!

Enjoy!


Capt. Sekhon

6
Services Offered/Needed / Help sought for setting up a membership site.
« on: September 17, 2010, 12:53:55 PM »
Hello helpfull friends of this great forum.
I keep rummaging here and get amazed at the bon hommie of its members though, I never entered any conversation.
I require help in opening up a membership site. I have mwg script, butterfly software, memberease script and micro membership for wp.
I can't understand how to go about setting it. I tried memberease as a subfolder but then did not know how to upload my member  site into that subfolder. The other three scripts/software I find more complex.
I seek your suggestions about how to go about it. Where do I install the script (as a folder, subdomain, or main domain), how do then I upload the main site on that?
Thanks
Sekhon

Pages: [1]