Esempio n. 1
0
        private void tinyURLlaunchBtn_Click(object sender, System.EventArgs e)
        {
            // Get LongURL (by ID)
            string          longurl   = "";
            Topicsgutefrage tbltopics = new Topicsgutefrage();

            if (tbltopics.LoadAll())
            {
                tbltopics.Filter = Topicsgutefrage.ColumnNames.Id + " = 1";
                longurl          = tbltopics.LongURL1;
            }

            // Execute iMacros + LongURL

            // MessageBox.Show(longurl);
            TinyURL TinyClass = new TinyURL();

            string shorturl = TinyClass.ImacrosTinyurlConvert(longurl);

            // MessageBox.Show(shorturl);

            // Save ShortURL (and return Success/Error)
            if (tbltopics.LoadAll())
            {
                tbltopics.Filter    = "";
                tbltopics.Filter    = Topicsgutefrage.ColumnNames.Id + " = 1";
                tbltopics.ShortURL1 = shorturl;
                tbltopics.Save();
            }
            MessageBox.Show("Done!");
        }
Esempio n. 2
0
        public static void PostNextTopic(Object sender, DoWorkEventArgs e)
        {
            #region CommentTemplate
            // ************* TEMPLATE FOR ALL OTHER POSTERS AS WELL *************

            // Load Variables:  LastTopic, LastEmail, Proxy, Template, LinkPattern, SenderEmail, iMacrosScripts: AccCreator, Poster, etc.
            // Get last GuteFrage topic
            // Check if it has a keyword
            // Get last used email account
            // Each subsequent process is conditional on the previous one completing correctly
            // Create a GuteFrage Account (iMacros)
            // Extract confirmation link (HotmailPOP)

            // Confirm Account (iMacros)

            // Some intermediary steps:
            // Get short URL (check if it exists, if not, create it from LongURL1)
            // Replace [URL] in a template
            // Post the answer to GuteFrage (iMacros)

            // *******************************************************************

            // Get last GuteFrage topic id, email id, proxy id, answer_tmpl id
            #endregion

            #region Set ALL Main Variables

            // INITialize all DB objects
            BackgroundWorker  worker     = sender as BackgroundWorker;
            Projects          proj       = new Projects();
            Emailaccounts     tblaccts   = new Emailaccounts();
            Proxies           tblproxies = new Proxies();
            Responses         tblresp    = new Responses();
            Affiliateprograms tblaff     = new Affiliateprograms();
            int nexttmpl  = 0;
            int nextproxy = 0;

            // Project Specific Variables
            Topicsgutefrage tbltopics     = new Topicsgutefrage();
            string          ProjectName   = "GuteFrageDE";
            int             PauseBtwPosts = 30; // 30 minutes

            #endregion


            while (RunningStatus != 1)                    // while there are keywords
            {
                if ((worker.CancellationPending == true)) // if the STOP button has been clicked
                {
                    e.Cancel = true;
                    break;
                }
                else  // If not STOPed, then continue with the next keyword
                {
                    #region SLEEP IF CURRENT TIME OUT OF DAYTIME POSTING TIME

                    if ((DateTime.Now.TimeOfDay < StartTime.TimeOfDay) || (DateTime.Now.TimeOfDay > EndTime.TimeOfDay))
                    {
                        worker.ReportProgress((2 * 0 * 10), "Night time sleeping until: " + StartTime.ToShortTimeString());
                    }

                    while ((DateTime.Now.TimeOfDay < StartTime.TimeOfDay) || (DateTime.Now.TimeOfDay > EndTime.TimeOfDay))
                    {
                        //
                        System.Threading.Thread.Sleep((1000 * 60 * 10));
                    }

                    #endregion


                    worker.ReportProgress((2 * 1 * 10), "Initialized. Selecting the next topic. ");

                    #region SELECT THE PROJECT AND SELECT NEXT TOPIC

                    string kwd       = "";
                    int    nexttopic = 0;

                    proj.Where.ProjectName.Value    = ProjectName;
                    proj.Where.ProjectName.Operator = WhereParameter.Operand.Equal;
                    proj.Query.Load();

                    nexttopic = proj.LastTopicUsed + 1;

                    tbltopics.Where.Id.Value    = nexttopic;
                    tbltopics.Where.Id.Operator = WhereParameter.Operand.Equal;
                    tbltopics.Query.Load();
                    kwd = tbltopics.ProductKeyword;

                    #endregion

                    if (kwd == "")
                    {
                        #region WAIT FOR KEYWORDS OR SHUT THE PROCESS DOWN

                        worker.ReportProgress((2 * 2 * 10), "No keyword found for the next topic. Waiting for more keywords.");
                        System.Threading.Thread.Sleep((1000 * 60 * 5));

                        if ((worker.CancellationPending == true))
                        {
                            e.Cancel      = true;
                            RunningStatus = 1;
                            break;
                        }
                        #endregion
                    }
                    else
                    {
                        #region SELECT NEXT EMAIL AND NEXT PROXY

                        int nextemail = proj.LastAccountUsed + 1; // Filter the Email Account
                        tblaccts.Where.Id.Value    = nextemail;
                        tblaccts.Where.Id.Operator = WhereParameter.Operand.Equal;
                        tblaccts.Query.Load();
                        try
                        {
                            string CurrentEmail = tblaccts.Email;
                        }
                        catch
                        {
                            MessageBox.Show("There are no more emails");
                        }

                        // Filter the ProxyTable

                        nextproxy = proj.LastProxyUsed + 1;
                        tblproxies.LoadAll();
                        int proxycount = tblproxies.RowCount;
                        if (nextproxy > proxycount)
                        {
                            nextproxy = 1;
                        }

                        tblproxies.Where.Id.Value    = nextproxy;
                        tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                        tblproxies.Query.Load();
                        #endregion

                        #region CHECK IF PROXY IS WORKING, SELECT NEXT IF NOT WORKING

                        Httpcalls httpcall = new Httpcalls();

                        while (!httpcall.IsAlive(tblproxies.Proxy))
                        {
                            tblproxies.Active = 0;
                            tblproxies.Save();

                            nextproxy = nextproxy + 1;
                            if (nextproxy > proxycount)
                            {
                                nextproxy = 1;
                            }

                            tblproxies.Where.Id.Value    = nextproxy;
                            tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                            tblproxies.Query.Load();
                        }

                        tblproxies.Active = 1;
                        tblproxies.Save();

                        #endregion  CHECK IF PROXY IS WORKING, SELECT NEXT IF NOT WORKING

                        StdPosterFunctionsNonStatic stdfunc = new StdPosterFunctionsNonStatic();

                        if (stdfunc.CreateAccount(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode))
                        {
                            #region WAIT SOME TIME
                            worker.ReportProgress((2 * 3 * 10), "Account created. Pausing 1min. before confirming an account...");
                            System.Threading.Thread.Sleep((1000 * 60 * 2));
                            #endregion

                            if (true /* stdfunc.ConfirmAccount(tblaccts.Email, tblaccts.Password, proj.Linkstructure, proj.Senderemail, tblproxies.Proxy, proj.ShiftLinkstructureBy)   */)
                            {
                                worker.ReportProgress((2 * 4 * 10), "Account confirmed. Shortening URLs and Posting...");

                                #region Produce LongURLs

                                string KwdsNoSpace = kwd.Replace(" ", "%20");
                                try
                                {
                                    KwdsNoSpace = HttpUtility.UrlEncode(kwd);
                                }
                                catch
                                {
                                    worker.ReportProgress((2 * 4 * 10), "HttpUtility failed and threw and exception.");
                                    e.Cancel = true;
                                    break;
                                }

                                if (tbltopics.LongURL1 == "" || tbltopics.LongURL1 == null)
                                {
                                    // PRODUCE FIRST LongURL
                                    tblaff.Where.Id.Value    = tbltopics.AffprogramId;
                                    tblaff.Where.Id.Operator = WhereParameter.Operand.Equal;
                                    tblaff.Query.Load();
                                    tbltopics.LongURL1 = tblaff.PreKeywordLinkPart + KwdsNoSpace + tblaff.PostKeywordLinkPart;
                                    tbltopics.Save();
                                }

                                /*   if (tbltopics.LongURL2 == "" || tbltopics.LongURL2 == null)
                                 * {
                                 *     // PRODUCE 2nd LongURL
                                 *     tblaff.Where.WhereClauseReset();
                                 *     tblaff.Where.Id.Value = tbltopics.AffprogramId2;
                                 *     tblaff.Where.Id.Operator = WhereParameter.Operand.Equal;
                                 *     tblaff.Query.Load();
                                 *     tbltopics.LongURL2 = tblaff.PreKeywordLinkPart + KwdsNoSpace + tblaff.PostKeywordLinkPart;
                                 *     tbltopics.Save();
                                 * }
                                 */
                                #endregion

                                #region Produce ShortURLs

                                TinyURL TinyClass = new TinyURL();

                                for (int i = 1; i <= 4; i++)
                                {
                                    if (tbltopics.ShortURL1 == "#EANF#" || tbltopics.ShortURL1 == "" || tbltopics.ShortURL1 == "NODATA" || tbltopics.ShortURL1 == null) // Let's not do conversion if the ShortURL1 is None.
                                    {
                                        tbltopics.ShortURL1 = TinyClass.ImacrosTinyurlConvert(tbltopics.LongURL1);
                                        tbltopics.Save();
                                    }
                                }

                                /*   for (int i = 1; i <= 4; i++)
                                 * {
                                 *     if (tbltopics.ShortURL2 == "#EANF#" || tbltopics.ShortURL2 == "" || tbltopics.ShortURL2 == "NODATA" || tbltopics.ShortURL2 == null) // Let's not do conversion if the ShortURL2 is None.
                                 *     {
                                 *         tbltopics.ShortURL2 = TinyURL.ImacrosTinyurlConvert(tbltopics.LongURL2);
                                 *         tbltopics.Save();
                                 *     }
                                 * }
                                 */
                                #endregion

                                #region Filter out the next answer template AND replace [url]s

                                nexttmpl = proj.LastTemplateUsed + 1; // Filter out the next answer template

                                tblresp.Where.LanguageId.Value    = proj.Language;
                                tblresp.Where.LanguageId.Operator = WhereParameter.Operand.Equal;

                                tblresp.Where.ResponseGroup.Value    = "AmazonDE-one-link";
                                tblresp.Where.ResponseGroup.Operator = WhereParameter.Operand.Equal;

                                tblresp.Query.Load();

                                if (nexttmpl > tblresp.RowCount)
                                {
                                    nexttmpl = 1;
                                }

                                tblresp.Where.RespGrSpecSequence.Value    = nexttmpl;
                                tblresp.Where.RespGrSpecSequence.Operator = WhereParameter.Operand.Equal;
                                tblresp.Query.Load();

                                // Replace [URL] in a template

                                string GeneragedResponse = tblresp.Response;
                                GeneragedResponse = GeneragedResponse.Replace("[url]", tbltopics.ShortURL1);
                                // GeneragedResponse = GeneragedResponse.Replace("[url2]", tbltopics.ShortURL2);

                                tbltopics.Response = GeneragedResponse;
                                tbltopics.Save();

                                #endregion

                                #region Post The Answer



                                if (tbltopics.ShortURL1 != "" && tbltopics.ShortURL1 != null)
                                {
                                    if (stdfunc.LoginAndPost(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblproxies.Proxy, tbltopics.Link, GeneragedResponse, proj.ImacrosLoginPost))
                                    {
                                        //
                                        worker.ReportProgress((2 * 5 * 10), "Posted successfully. Updating database, and switching to a new topic...");

                                        proj.LastAccountUsed++;
                                        proj.LastProxyUsed    = nextproxy;
                                        proj.LastTemplateUsed = nexttmpl;
                                        proj.LastTopicUsed++;
                                        proj.Save();

                                        tbltopics.PostedStatus = 1;
                                        tbltopics.PostingTime  = DateTime.Now;
                                        tbltopics.Save();

                                        // MessageBox.Show("Everything completed well. Switching to the next topic.");
                                    }
                                }
                                #endregion
                            }
                        }
                    }

                    #region Reset all Filters

                    tbltopics.Where.WhereClauseReset();
                    proj.Where.WhereClauseReset();
                    tblaccts.Where.WhereClauseReset();
                    tblproxies.Where.WhereClauseReset();
                    tblaff.Where.WhereClauseReset();
                    tblresp.Where.WhereClauseReset();

                    tbltopics.Filter  = null;
                    proj.Filter       = null;
                    tblaccts.Filter   = null;
                    tblproxies.Filter = null;
                    tblaff.Filter     = null;
                    tblresp.Filter    = null;

                    #endregion

                    if ((worker.CancellationPending == true))  // if the STOP button has been clicked
                    {
                        e.Cancel = true;
                        break;
                    }
                    else
                    {
                        worker.ReportProgress((2 * 5 * 10), "Pausing for " + PauseBtwPosts.ToString() + " min.");

                        for (int j = 1; j <= PauseBtwPosts; j++)
                        {
                            int Remaining = (PauseBtwPosts - j + 1);
                            worker.ReportProgress((2 * 5 * 10), Remaining.ToString() + " min. remaining.");
                            System.Threading.Thread.Sleep((1000 * 60 * 1)); // WAIT BETWEEN POSTS
                            if ((worker.CancellationPending == true))       // if the STOP button has been clicked
                            {
                                e.Cancel = true;
                                break;
                            }
                        }
                    }
                } // end IF Keyword is ""
            }     // end While (RunningStatus != 1) script
        }         // end PostNextTopic();
        public static void PostNextTopic(Object sender, DoWorkEventArgs e)
        {
            #region CommentTemplate
            // ************* TEMPLATE FOR ALL OTHER POSTERS AS WELL *************

            // Load Variables:  LastTopic, LastEmail, Proxy, Template, LinkPattern, SenderEmail, iMacrosScripts: AccCreator, Poster, etc.
            // Get last GuteFrage topic 
            // Check if it has a keyword 
            // Get last used email account 
            // Each subsequent process is conditional on the previous one completing correctly         
            // Create a GuteFrage Account (iMacros)
            // Extract confirmation link (HotmailPOP)

            // Confirm Account (iMacros)

            // Some intermediary steps:
            // Get short URL (check if it exists, if not, create it from LongURL1)
            // Replace [URL] in a template
            // Post the answer to GuteFrage (iMacros)

            // *******************************************************************

            // Get last GuteFrage topic id, email id, proxy id, answer_tmpl id 
            #endregion

            #region Set ALL Main Variables

            // INITialize all DB objects
            BackgroundWorker worker = sender as BackgroundWorker;
            Projects proj = new Projects();
            Emailaccounts tblaccts = new Emailaccounts();
            Proxies tblproxies = new Proxies();
            Responses tblresp = new Responses();
            Affiliateprograms tblaff = new Affiliateprograms();
            int nexttmpl = 0;
            int nextproxy = 0;

            // Project Specific Variables
            Topicsgutefrage tbltopics = new Topicsgutefrage();
            string ProjectName = "GuteFrageDE";
            int PauseBtwPosts = 30; // 30 minutes
            
            #endregion


            while (RunningStatus != 1) // while there are keywords
            {
                if ((worker.CancellationPending == true))  // if the STOP button has been clicked
                {
                    e.Cancel = true;
                    break;
                }
                else  // If not STOPed, then continue with the next keyword
                {

                    #region SLEEP IF CURRENT TIME OUT OF DAYTIME POSTING TIME

                    if ((DateTime.Now.TimeOfDay < StartTime.TimeOfDay) || (DateTime.Now.TimeOfDay > EndTime.TimeOfDay)) worker.ReportProgress((2 * 0 * 10), "Night time sleeping until: " + StartTime.ToShortTimeString());

                    while ((DateTime.Now.TimeOfDay < StartTime.TimeOfDay) || (DateTime.Now.TimeOfDay > EndTime.TimeOfDay))
                    {
                        //
                        System.Threading.Thread.Sleep((1000 * 60 * 10));
                    }

                    #endregion


                    worker.ReportProgress((2 * 1 * 10), "Initialized. Selecting the next topic. ");

                    #region SELECT THE PROJECT AND SELECT NEXT TOPIC

                    string kwd = "";
                    int nexttopic = 0;

                    proj.Where.ProjectName.Value = ProjectName;
                    proj.Where.ProjectName.Operator = WhereParameter.Operand.Equal;
                    proj.Query.Load();

                    nexttopic = proj.LastTopicUsed + 1;

                    tbltopics.Where.Id.Value = nexttopic;
                    tbltopics.Where.Id.Operator = WhereParameter.Operand.Equal;
                    tbltopics.Query.Load();
                    kwd = tbltopics.ProductKeyword;
                    
                    #endregion

                    if (kwd == "")
                    {
                        #region WAIT FOR KEYWORDS OR SHUT THE PROCESS DOWN

                        worker.ReportProgress((2 * 2 * 10),"No keyword found for the next topic. Waiting for more keywords.");
                        System.Threading.Thread.Sleep((1000 * 60 * 5));

                        if ((worker.CancellationPending == true))
                        {
                            e.Cancel = true;
                            RunningStatus = 1;
                            break;
                        }
                        #endregion
                    }
                    else
                    {

                        #region SELECT NEXT EMAIL AND NEXT PROXY

                        int nextemail = proj.LastAccountUsed + 1; // Filter the Email Account
                        tblaccts.Where.Id.Value = nextemail;
                        tblaccts.Where.Id.Operator = WhereParameter.Operand.Equal;
                        tblaccts.Query.Load();
                        try
                        {
                            string CurrentEmail = tblaccts.Email;
                        }
                        catch
                        {
                            MessageBox.Show("There are no more emails");
                        }

                        // Filter the ProxyTable

                        nextproxy = proj.LastProxyUsed + 1;
                        tblproxies.LoadAll();
                        int proxycount = tblproxies.RowCount;
                        if (nextproxy > proxycount)
                        {
                            nextproxy = 1;
                        }

                        tblproxies.Where.Id.Value = nextproxy;
                        tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                        tblproxies.Query.Load();
                        #endregion

                        #region CHECK IF PROXY IS WORKING, SELECT NEXT IF NOT WORKING

                        Httpcalls httpcall = new Httpcalls();

                        while (!httpcall.IsAlive(tblproxies.Proxy))
                        {
                            tblproxies.Active = 0;
                            tblproxies.Save();

                            nextproxy = nextproxy + 1;
                            if (nextproxy > proxycount)
                            {
                                nextproxy = 1;
                            }

                            tblproxies.Where.Id.Value = nextproxy;
                            tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                            tblproxies.Query.Load();
                        }

                        tblproxies.Active = 1;
                        tblproxies.Save();

                        #endregion  CHECK IF PROXY IS WORKING, SELECT NEXT IF NOT WORKING

                        StdPosterFunctionsNonStatic stdfunc = new StdPosterFunctionsNonStatic();

                        if (stdfunc.CreateAccount(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode))
                        {
                            #region WAIT SOME TIME
                            worker.ReportProgress((2 * 3 * 10), "Account created. Pausing 1min. before confirming an account...");
                            System.Threading.Thread.Sleep((1000 * 60 * 2));
                            #endregion

                            if ( true  /* stdfunc.ConfirmAccount(tblaccts.Email, tblaccts.Password, proj.Linkstructure, proj.Senderemail, tblproxies.Proxy, proj.ShiftLinkstructureBy)   */  )
                            {

                                worker.ReportProgress((2 * 4 * 10), "Account confirmed. Shortening URLs and Posting...");

                                #region Produce LongURLs

                                string KwdsNoSpace = kwd.Replace(" ", "%20");
                                try
                                {
                                    KwdsNoSpace = HttpUtility.UrlEncode(kwd);
                                }
                                catch
                                {
                                    worker.ReportProgress((2 * 4 * 10), "HttpUtility failed and threw and exception.");
                                    e.Cancel = true;
                                    break;
                                }

                                if (tbltopics.LongURL1 == "" || tbltopics.LongURL1 == null)
                                {
                                    // PRODUCE FIRST LongURL
                                    tblaff.Where.Id.Value = tbltopics.AffprogramId;
                                    tblaff.Where.Id.Operator = WhereParameter.Operand.Equal;
                                    tblaff.Query.Load();
                                    tbltopics.LongURL1 = tblaff.PreKeywordLinkPart + KwdsNoSpace + tblaff.PostKeywordLinkPart;
                                    tbltopics.Save();
                                }

                             /*   if (tbltopics.LongURL2 == "" || tbltopics.LongURL2 == null)
                                {
                                    // PRODUCE 2nd LongURL
                                    tblaff.Where.WhereClauseReset();
                                    tblaff.Where.Id.Value = tbltopics.AffprogramId2;
                                    tblaff.Where.Id.Operator = WhereParameter.Operand.Equal;
                                    tblaff.Query.Load();
                                    tbltopics.LongURL2 = tblaff.PreKeywordLinkPart + KwdsNoSpace + tblaff.PostKeywordLinkPart;
                                    tbltopics.Save();
                                }
                            */
                                #endregion
                            
                                #region Produce ShortURLs

                                TinyURL TinyClass = new TinyURL();

                                for (int i = 1; i <= 4; i++)
                                {
                                    if (tbltopics.ShortURL1 == "#EANF#" || tbltopics.ShortURL1 == "" || tbltopics.ShortURL1 == "NODATA" || tbltopics.ShortURL1 == null) // Let's not do conversion if the ShortURL1 is None.
                                    {
                                        tbltopics.ShortURL1 = TinyClass.ImacrosTinyurlConvert(tbltopics.LongURL1);
                                        tbltopics.Save();
                                    }
                                }

                                /*   for (int i = 1; i <= 4; i++)
                                   {
                                       if (tbltopics.ShortURL2 == "#EANF#" || tbltopics.ShortURL2 == "" || tbltopics.ShortURL2 == "NODATA" || tbltopics.ShortURL2 == null) // Let's not do conversion if the ShortURL2 is None.
                                       {
                                           tbltopics.ShortURL2 = TinyURL.ImacrosTinyurlConvert(tbltopics.LongURL2);
                                           tbltopics.Save();
                                       }
                                   }
                               */
                                #endregion

                                #region Filter out the next answer template AND replace [url]s

                                nexttmpl = proj.LastTemplateUsed + 1; // Filter out the next answer template

                                tblresp.Where.LanguageId.Value = proj.Language;
                                tblresp.Where.LanguageId.Operator = WhereParameter.Operand.Equal;

                                tblresp.Where.ResponseGroup.Value = "AmazonDE-one-link";
                                tblresp.Where.ResponseGroup.Operator = WhereParameter.Operand.Equal;

                                tblresp.Query.Load();

                                if (nexttmpl > tblresp.RowCount)
                                {
                                    nexttmpl = 1;
                                }

                                tblresp.Where.RespGrSpecSequence.Value = nexttmpl;
                                tblresp.Where.RespGrSpecSequence.Operator = WhereParameter.Operand.Equal;
                                tblresp.Query.Load();

                                // Replace [URL] in a template

                                string GeneragedResponse = tblresp.Response;
                                GeneragedResponse = GeneragedResponse.Replace("[url]", tbltopics.ShortURL1);
                                // GeneragedResponse = GeneragedResponse.Replace("[url2]", tbltopics.ShortURL2);

                                tbltopics.Response = GeneragedResponse;
                                tbltopics.Save();

                                #endregion

                                #region Post The Answer



                                if (tbltopics.ShortURL1 != "" && tbltopics.ShortURL1 != null)
                                {

                                    if (stdfunc.LoginAndPost(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblproxies.Proxy, tbltopics.Link, GeneragedResponse, proj.ImacrosLoginPost))
                                    {
                                        //
                                        worker.ReportProgress((2 * 5 * 10), "Posted successfully. Updating database, and switching to a new topic...");

                                        proj.LastAccountUsed++;
                                        proj.LastProxyUsed = nextproxy;
                                        proj.LastTemplateUsed = nexttmpl;
                                        proj.LastTopicUsed++;
                                        proj.Save();

                                        tbltopics.PostedStatus = 1;
                                        tbltopics.PostingTime = DateTime.Now;
                                        tbltopics.Save();

                                        // MessageBox.Show("Everything completed well. Switching to the next topic.");
                                    }
                                }
                                #endregion

                            }
                        }
                    }

                    #region Reset all Filters

                    tbltopics.Where.WhereClauseReset();
                    proj.Where.WhereClauseReset();
                    tblaccts.Where.WhereClauseReset();
                    tblproxies.Where.WhereClauseReset();
                    tblaff.Where.WhereClauseReset();
                    tblresp.Where.WhereClauseReset();

                    tbltopics.Filter = null;
                    proj.Filter = null;
                    tblaccts.Filter = null;
                    tblproxies.Filter = null;
                    tblaff.Filter = null;
                    tblresp.Filter = null;

                    #endregion

                    if ((worker.CancellationPending == true))  // if the STOP button has been clicked
                    {
                        e.Cancel = true;
                        break;
                    }
                    else
                    {
                        worker.ReportProgress((2 * 5 * 10), "Pausing for " + PauseBtwPosts.ToString() + " min.");

                        for (int j = 1; j <= PauseBtwPosts; j++)
                        {
                            int Remaining = (PauseBtwPosts - j + 1);
                            worker.ReportProgress((2 * 5 * 10), Remaining.ToString() + " min. remaining.");
                            System.Threading.Thread.Sleep((1000 * 60 * 1));  // WAIT BETWEEN POSTS
                            if ((worker.CancellationPending == true))  // if the STOP button has been clicked
                            {
                                e.Cancel = true;
                                break;
                            }
                        }
                    }
                } // end IF Keyword is ""

            } // end While (RunningStatus != 1) script

        } // end PostNextTopic();
        private void tinyURLlaunchBtn_Click(object sender, System.EventArgs e)
        {
            // Get LongURL (by ID)
            string longurl = "";
            Topicsgutefrage tbltopics = new Topicsgutefrage();
            if (tbltopics.LoadAll())
            {
                tbltopics.Filter = Topicsgutefrage.ColumnNames.Id + " = 1";
                longurl = tbltopics.LongURL1;
            }

            // Execute iMacros + LongURL

            // MessageBox.Show(longurl);
            TinyURL TinyClass = new TinyURL();

            string shorturl = TinyClass.ImacrosTinyurlConvert(longurl);

            // MessageBox.Show(shorturl);

            // Save ShortURL (and return Success/Error)
            if (tbltopics.LoadAll())
            {
                tbltopics.Filter = "";
                tbltopics.Filter = Topicsgutefrage.ColumnNames.Id + " = 1";
                tbltopics.ShortURL1 = shorturl;
                tbltopics.Save();
            }
            MessageBox.Show("Done!");

        }
        private void ProduceShortURL()  /// should produce only 1 short URL - rewrite this
        {
            worker.ReportProgress((2 * progressvalue++), "Producing Short URLs.");
            TinyURL TinyClass = new TinyURL();
            string shortURLbase;

            if (property.ContainsKey("shortURLbase"))
                shortURLbase = property["shortURLbase"];
            else
                shortURLbase = "eurl.me";
            if (property.ContainsKey("shortequalslong"))
                if (Convert.ToInt64(property["shortequalslong"]) == 1)
                {
                    tbltopics.ShortURL1 = tbltopics.LongURL1.ToString();
                    tbltopics.ShortURL2 = tbltopics.LongURL2.ToString();
                    tbltopics.Save();
                    return;
                }



            if ((tbltopics.LongURL1 != "") && (tbltopics.LongURL1 != null))
            {
                int i = 1;
                
                while ((tbltopics.ShortURL1 == "#EANF#" || tbltopics.ShortURL1 == "" || tbltopics.ShortURL1 == "NODATA" || tbltopics.ShortURL1 == null) && (i <= 4)) // Let's not do conversion if the ShortURL1 is None.
                    {
                        tbltopics.ShortURL1 = TinyClass.URLShorten(tbltopics.LongURL1, shortURLbase);
                        tbltopics.Save();
                        i++;
                    }
                
            }

            if ((tbltopics.LongURL2 != "") && (tbltopics.LongURL2 != null))
            {
                int j = 1;
                while ((tbltopics.ShortURL2 == "#EANF#" || tbltopics.ShortURL2 == "" || tbltopics.ShortURL2 == "NODATA" || tbltopics.ShortURL2 == null) && (j <= 4)) // Let's not do conversion if the ShortURL2 is None.
                    {
                        tbltopics.ShortURL2 = TinyClass.URLShorten(tbltopics.LongURL2, shortURLbase);
                        tbltopics.Save();
                        j++;
                    }
                
            }

            if (tbltopics.ShortURL1 != "" && tbltopics.ShortURL1 != null)
            {
                worker.ReportProgress((2 * progressvalue++), "Short URLs done.");
                return;
            }
            else
            {
                worker.ReportProgress((2 * progressvalue++), "Short URLs not produced.");
                error.Cancel = true;
                return;
            }
        }
Esempio n. 6
0
        public static void PostNextTopic(Object sender, DoWorkEventArgs e)
        {
            #region CommentTemplate
            // ************* TEMPLATE FOR ALL OTHER POSTERS AS WELL *************

            // Load Variables:  LastTopic, LastEmail, Proxy, Template, LinkPattern, SenderEmail, iMacrosScripts: AccCreator, Poster, etc.
            // Get last GuteFrage topic 
            // Check if it has a keyword 
            // Get last used email account 
            // Each subsequent process is conditional on the previous one completing correctly         
            // Create a GuteFrage Account (iMacros)
            // Extract confirmation link (HotmailPOP)

            // Confirm Account (iMacros)

            // Some intermediary steps:
            // Get short URL (check if it exists, if not, create it from LongURL1)
            // Replace [URL] in a template
            // Post the answer to GuteFrage (iMacros)

            // *******************************************************************

            // Get last GuteFrage topic id, email id, proxy id, answer_tmpl id 
            #endregion

            #region Set ALL Main Variables

            // INITialize all DB objects
            BackgroundWorker worker = sender as BackgroundWorker; 
            Projects proj = new Projects();
            Emailaccounts tblaccts = new Emailaccounts(); 
            Proxies tblproxies = new Proxies(); 
            Responses tblresp = new Responses(); 
            Affiliateprograms tblaff = new Affiliateprograms();
            int nexttmpl = 0;
            int nextproxy = 0;

            // Project Specific Variables
            Topicsaskcom tbltopics = new Topicsaskcom();
            string ProjectName = "AskCom";
            int PauseBtwPosts = 30; // 60 minutes
            int PauseBtwQnA = 3; // 3 minutes

            #endregion

            while (RunningStatus != 1) // while there are keywords
            {
                if ((worker.CancellationPending == true))  // if the STOP button has been clicked
                {
                    e.Cancel = true;
                    break;
                }
                else  // If not STOPed, then continue with the next keyword
                {

                    #region SLEEP IF CURRENT TIME OUT OF DAYTIME POSTING TIME

                    if ((DateTime.Now.AddHours(-6).TimeOfDay < StartTime.TimeOfDay) || (DateTime.Now.AddHours(-6).TimeOfDay > EndTime.TimeOfDay)) worker.ReportProgress((2 * 0 * 10), "Night time sleeping until: " + StartTime.ToShortTimeString());

                    while ((DateTime.Now.AddHours(-6).TimeOfDay < StartTime.TimeOfDay) || (DateTime.Now.AddHours(-6).TimeOfDay > EndTime.TimeOfDay))
                    {
                        //
                        System.Threading.Thread.Sleep((1000 * 60 * 10));
                    }

                    #endregion

                    worker.ReportProgress((2 * 1 * 10), "Initialized. Selecting the next topic. ");

                    #region SELECT THE PROJECT AND SELECT NEXT TOPIC

                    string kwd = "";
                    int nexttopic = 0;


                    proj.Where.ProjectName.Value = ProjectName;
                    proj.Where.ProjectName.Operator = WhereParameter.Operand.Equal;
                    proj.Query.Load();

                    nexttopic = proj.LastTopicUsed + 1;

                    tbltopics.Where.Id.Value = nexttopic;
                    tbltopics.Where.Id.Operator = WhereParameter.Operand.Equal;
                    tbltopics.Query.Load();
                    kwd = tbltopics.ProductKeyword;

                    worker.ReportProgress((2 * 2 * 10));
                    #endregion

                    if (kwd == "")
                    {
                        #region WAIT FOR KEYWORDS OR SHUT THE PROCESS DOWN
                        worker.ReportProgress((2 * 2 * 10), "No keyword found for the next topic. Waiting for more keywords.");
                        System.Threading.Thread.Sleep((1000 * 60 * 5));

                        if ((worker.CancellationPending == true))
                        {
                            e.Cancel = true;
                            RunningStatus = 1;
                            break;
                        }
                        #endregion
                    }
                    else
                    {
                        worker.ReportProgress((2 * 2 * 10), "Keyword found. Creating a new account...");

                        #region SELECT NEXT EMAIL AND NEXT PROXY

                        int nextemail = proj.LastAccountUsed + 1; // Filter the Email Account
                        tblaccts.Where.Id.Value = nextemail;
                        tblaccts.Where.Id.Operator = WhereParameter.Operand.Equal;
                        tblaccts.Query.Load();
                        try
                        {
                            string CurrentEmail = tblaccts.Email;
                        }
                        catch
                        {
                            MessageBox.Show("There are no more emails");
                        }

                        // Filter the ProxyTable

                        nextproxy = proj.LastProxyUsed + 1;
                        tblproxies.LoadAll();
                        int proxycount = tblproxies.RowCount;
                        if (nextproxy > proxycount)
                        {
                            nextproxy = 1;
                        }

                        tblproxies.Where.Id.Value = nextproxy;
                        tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                        tblproxies.Query.Load();
                        #endregion

                        #region CHECK IF PROXY IS WORKING, SELECT NEXT IF NOT WORKING 

                        Httpcalls httpcall = new Httpcalls();

                        while (!httpcall.IsAlive(tblproxies.Proxy))
                        {
                            tblproxies.Active = 0;
                            tblproxies.Save();

                            nextproxy = nextproxy + 1;
                            if (nextproxy > proxycount)
                            {
                                nextproxy = 1;
                            }

                            tblproxies.Where.Id.Value = nextproxy;
                            tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                            tblproxies.Query.Load();
                        }

                        tblproxies.Active = 1;
                        tblproxies.Save();
                        
                        #endregion  CHECK IF PROXY IS WORKING, SELECT NEXT IF NOT WORKING

                        StdPosterFunctionsNonStatic stdfunc = new StdPosterFunctionsNonStatic();

                        #region CREATE ACCOUNT WITH CAPTCHA VALIDATION

                        string[] ErrorAndId = stdfunc.CreateAccountAskCom(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode, tbltopics.Topic);
                        //string[] ErrorAndId = { "", "" };
                        string ErrorMsg = "";
                        ErrorMsg = ErrorAndId[0];
                        string CaptchaId = ErrorAndId[1];
                        int br = 0;
                        while (ErrorMsg != "" && ErrorMsg != "#EANF#")
                        {
                            // Blogas CAPTCHA
                            // Report bad CAPTCHA
                            if (CaptchaId != "NODATA") stdfunc.ReportBadCaptcha(CaptchaId);
                            ErrorAndId = stdfunc.CreateAccountAskCom(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode, tbltopics.Topic);
                            ErrorMsg = ErrorAndId[0];
                            CaptchaId = ErrorAndId[1];
                            br++;
                            if (br > 5)
                            {
                                worker.ReportProgress((2 * 2 * 10), "6 captchas solved incorrectly. Stopping.");
                                //e.Cancel = true;
                                break;
                            }
                        }
                        #endregion

                        bool Success = true;
                        if (Success)
                        {
                            #region WAIT SOME TIME
                            worker.ReportProgress((2 * 3 * 10), "Account created.");
                            // System.Threading.Thread.Sleep((1000 * 60 * 2));
                            #endregion

                            #region POST A QUESTION

                            worker.ReportProgress((2 * 3 * 10), "Now posting a question...");
                            
                            string QuestionLink = "";

                            nexttopic = nexttopic - 1; // This is needed to logically fit the first time the "while" loop runs 

                            while (QuestionLink == "" || QuestionLink == null || QuestionLink == "NODATA" || QuestionLink == "#EANF#")
                            {
                                nexttopic = nexttopic + 1;
                                tbltopics.Where.Id.Value = nexttopic;
                                tbltopics.Where.Id.Operator = WhereParameter.Operand.Equal;
                                tbltopics.Query.Load();
                                kwd = tbltopics.ProductKeyword;

                                QuestionLink = stdfunc.PostQuestionAskCom(tblaccts.Email, tblaccts.Password, tbltopics.Topic, tblproxies.Proxy, proj.ImacrosCodeGeneric);
                                
                            }

                            if (QuestionLink != "" && QuestionLink != null && QuestionLink != "NODATA" && QuestionLink != "#EANF#")
                            {

                                try
                                {
                                    tbltopics.Link = QuestionLink;
                                    tbltopics.Save();
                                }
                                catch
                                {
                                    //
                                    worker.ReportProgress((2 * 4 * 10), "Failed saving the extracted question.");
                                    proj.LastAccountUsed = nextemail;
                                    proj.LastProxyUsed = nextproxy;
                                    proj.LastTemplateUsed = nexttmpl;
                                    proj.LastTopicUsed = nexttopic;
                                    proj.Save();
                                    goto NextQuestion;
                                }

                                worker.ReportProgress((2 * 4 * 10), "Question Posted and extracted.");
    
                                #endregion POST A QUESTION


                                #region Update Email and Proxy positions

                                proj.LastAccountUsed = nextemail;
                                proj.LastProxyUsed = nextproxy;
                                proj.Save();

                                tblaccts.Where.WhereClauseReset();
                                tblproxies.Where.WhereClauseReset();

                                tblaccts.Filter = null;
                                tblproxies.Filter = null;

                                #endregion END UPDATE POSITIONS

                                #region SELECT NEXT EMAIL AND NEXT PROXY

                                nextemail = proj.LastAccountUsed + 1; // Filter the Email Account
                                tblaccts.Where.Id.Value = nextemail;
                                tblaccts.Where.Id.Operator = WhereParameter.Operand.Equal;
                                tblaccts.Query.Load();
                                try
                                {
                                    string CurrentEmail = tblaccts.Email;
                                }
                                catch
                                {
                                    MessageBox.Show("There are no more emails");
                                }

                                // Filter the ProxyTable

                                nextproxy = proj.LastProxyUsed + 1;
                                tblproxies.LoadAll();
                                if (nextproxy > tblproxies.RowCount)
                                {
                                    nextproxy = 1;
                                }

                                tblproxies.Where.Id.Value = nextproxy;
                                tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                                tblproxies.Query.Load();
                                #endregion

                                #region WAIT SOME TIME BTW Question AND Answer
                                worker.ReportProgress((2 * 4 * 10), "Pausing for " + PauseBtwQnA.ToString() + " min. before creating an account for the answer.");
                                System.Threading.Thread.Sleep((1000 * 60 * PauseBtwQnA));
                                #endregion

                                #region CREATE ACCOUNT WITH CAPTCHA VALIDATION

                                worker.ReportProgress((2 * 4 * 10), "Creating an account for answering..");

                                string[] ErrorAndId2 = stdfunc.CreateAccountAskCom(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode, tbltopics.Topic);
                                string ErrorMsg2 = "error";
                                ErrorMsg2 = ErrorAndId2[0];
                                string CaptchaId2 = ErrorAndId2[1];
                                int br2 = 0;
                                while (ErrorMsg2 != "" && ErrorMsg2 != "#EANF#")
                                {
                                    // Blogas CAPTCHA
                                    // Report bad CAPTCHA
                                    if (CaptchaId2 != "NODATA") stdfunc.ReportBadCaptcha(CaptchaId2);
                                    ErrorAndId = stdfunc.CreateAccountAskCom(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode, tbltopics.Topic);
                                    ErrorMsg2 = ErrorAndId2[0];
                                    CaptchaId2 = ErrorAndId2[1];
                                    br2++;
                                    if (br2 > 5)
                                    {
                                        worker.ReportProgress((2 * 4 * 10), "6 captchas solved incorrectly. Stopping.");
                                        e.Cancel = true;
                                        break;
                                    }
                                }
                                #endregion

                                #region Produce LongURLs

                                string KwdsNoSpace = kwd.Replace(" ", "%20");
                                try
                                {
                                    KwdsNoSpace = HttpUtility.UrlEncode(kwd);
                                }
                                catch
                                {
                                    worker.ReportProgress((2 * 4 * 10), "HttpUtility failed and threw and exception.");
                                    e.Cancel = true;
                                    break;
                                }

                                
                                if (tbltopics.LongURL1 == "" || tbltopics.LongURL1 == null)
                                {
                                    // PRODUCE FIRST LongURL
                                    tblaff.Where.Id.Value = tbltopics.AffprogramId1;
                                    tblaff.Where.Id.Operator = WhereParameter.Operand.Equal;
                                    tblaff.Query.Load();
                                    tbltopics.LongURL1 = tblaff.PreKeywordLinkPart + KwdsNoSpace + tblaff.PostKeywordLinkPart;
                                    tbltopics.Save();
                                }

                                /*
                                if (tbltopics.LongURL2 == "" || tbltopics.LongURL2 == null)
                                {
                                    // PRODUCE 2nd LongURL
                                    tblaff.Where.WhereClauseReset();
                                    tblaff.Where.Id.Value = tbltopics.AffprogramId2;
                                    tblaff.Where.Id.Operator = WhereParameter.Operand.Equal;
                                    tblaff.Query.Load();
                                    tbltopics.LongURL2 = tblaff.PreKeywordLinkPart + KwdsNoSpace + tblaff.PostKeywordLinkPart;
                                    tbltopics.Save();
                                }
                                 */
                                #endregion

                                #region Produce ShortURLs

                                TinyURL TinyClass = new TinyURL();

                                worker.ReportProgress((2 * 4 * 10), "Now shortening URLs..");

                                for (int i = 1; i <= 4; i++)
                                {
                                    if (tbltopics.ShortURL1 == "#EANF#" || tbltopics.ShortURL1 == "" || tbltopics.ShortURL1 == "NODATA" || tbltopics.ShortURL1 == null) // Let's not do conversion if the ShortURL1 is None.
                                    {
                                        tbltopics.ShortURL1 = TinyClass.ImacrosTinyurlConvert(tbltopics.LongURL1);
                                        tbltopics.Save();
                                    }
                                }

                                /* for (int i = 1; i <= 4; i++)
                                {
                                    if (tbltopics.ShortURL2 == "#EANF#" || tbltopics.ShortURL2 == "" || tbltopics.ShortURL2 == "NODATA" || tbltopics.ShortURL2 == null) // Let's not do conversion if the ShortURL2 is None.
                                    {
                                        tbltopics.ShortURL2 = TinyURL.ImacrosTinyurlConvert(tbltopics.LongURL2);
                                        tbltopics.Save();
                                    }
                                } */
                                #endregion

                                #region Filter out the next answer template AND replace [url]s

                                nexttmpl = proj.LastTemplateUsed + 1; // Filter out the next answer template

                                tblresp.Where.LanguageId.Value = proj.Language;
                                tblresp.Where.LanguageId.Operator = WhereParameter.Operand.Equal;

                                tblresp.Where.ResponseGroup.Value = "AmazonUK-one-link";
                                tblresp.Where.ResponseGroup.Operator = WhereParameter.Operand.Equal;

                                tblresp.Query.Load();

                                if (nexttmpl > tblresp.RowCount)
                                {
                                    nexttmpl = 1;
                                }

                                tblresp.Where.RespGrSpecSequence.Value = nexttmpl;
                                tblresp.Where.RespGrSpecSequence.Operator = WhereParameter.Operand.Equal;
                                tblresp.Query.Load();

                                // Replace [URL] in a template

                                string GeneragedResponse = "";
                                GeneragedResponse = tblresp.Response;
                                GeneragedResponse = GeneragedResponse.Replace("[url]", tbltopics.ShortURL1);
                                // GeneragedResponse = GeneragedResponse.Replace("[url2]", tbltopics.ShortURL2);

                                tbltopics.Response = GeneragedResponse;
                                tbltopics.Save();

                                #endregion

                                #region Post The Answer

                                worker.ReportProgress((2 * 4 * 10), "Now posting an answ..");

                                if (tbltopics.ShortURL1 != "" && tbltopics.ShortURL1 != null && GeneragedResponse != "")
                                {

                                    if (stdfunc.LoginAndPost(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblproxies.Proxy, tbltopics.Link, GeneragedResponse, proj.ImacrosLoginPost))
                                    {
                                        //
                                        worker.ReportProgress((2 * 5 * 10), "Posted successfully. Updating database, and switching to a new topic...");

                                        proj.LastAccountUsed = nextemail;
                                        proj.LastProxyUsed = nextproxy;
                                        proj.LastTemplateUsed = nexttmpl;
                                        proj.LastTopicUsed = nexttopic;
                                        proj.Save();

                                        tbltopics.PostedStatus = 1;
                                        tbltopics.PostingTime = DateTime.Now;
                                        tbltopics.Save();

                                        // MessageBox.Show("Everything completed well. Switching to the next topic.");
                                    }
                                }
                                #endregion

                            } // the the QuestionLink != ""
                            else
                            {
                                //
                                worker.ReportProgress((2 * 4 * 10), "Question not extracted. Smth went wrong.");
                                proj.LastAccountUsed = nextemail;
                                proj.LastProxyUsed = nextproxy;
                                proj.LastTemplateUsed = nexttmpl;
                                proj.LastTopicUsed = nexttopic;
                                proj.Save();

                            }
                        }
                    }
                NextQuestion:
                    #region Reset all Filters

                    tbltopics.Where.WhereClauseReset();
                    proj.Where.WhereClauseReset();
                    tblaccts.Where.WhereClauseReset();
                    tblproxies.Where.WhereClauseReset();
                    tblaff.Where.WhereClauseReset();
                    tblresp.Where.WhereClauseReset();

                    tbltopics.Filter = null;
                    proj.Filter = null;
                    tblaccts.Filter = null;
                    tblproxies.Filter = null;
                    tblaff.Filter = null;
                    tblresp.Filter = null;

                    #endregion

                    #region PAUSE BETWEEN POSTINGS

                    if ((worker.CancellationPending == true))  // if the STOP button has been clicked
                    {
                        e.Cancel = true;
                        break;
                    }
                    else
                    {
                        worker.ReportProgress((2 * 5 * 10), "Pausing for " + PauseBtwPosts.ToString() + " min.");

                        for (int j = 1; j <= PauseBtwPosts; j++)
                        {
                            int Remaining = (PauseBtwPosts - j + 1);
                            worker.ReportProgress((2 * 5 * 10), Remaining.ToString() + " min. remaining.");
                            System.Threading.Thread.Sleep((1000 * 60 * 1));  // WAIT BETWEEN POSTS
                            if ((worker.CancellationPending == true))  // if the STOP button has been clicked
                            {
                                e.Cancel = true;
                                break;
                            }
                        }

                    }
                    #endregion

                } // end IF Keyword is ""

            } // end While (RunningStatus != 1) script

        } // end PostNextTopic();
Esempio n. 7
0
        public static void PostNextTopic(Object sender, DoWorkEventArgs e)
        {
            #region CommentTemplate
            // ************* TEMPLATE FOR ALL OTHER POSTERS AS WELL *************

            // Load Variables:  LastTopic, LastEmail, Proxy, Template, LinkPattern, SenderEmail, iMacrosScripts: AccCreator, Poster, etc.
            // Get last GuteFrage topic
            // Check if it has a keyword
            // Get last used email account
            // Each subsequent process is conditional on the previous one completing correctly
            // Create a GuteFrage Account (iMacros)
            // Extract confirmation link (HotmailPOP)

            // Confirm Account (iMacros)

            // Some intermediary steps:
            // Get short URL (check if it exists, if not, create it from LongURL1)
            // Replace [URL] in a template
            // Post the answer to GuteFrage (iMacros)

            // *******************************************************************

            // Get last GuteFrage topic id, email id, proxy id, answer_tmpl id
            #endregion

            #region Set ALL Main Variables

            // INITialize all DB objects
            BackgroundWorker  worker     = sender as BackgroundWorker;
            Projects          proj       = new Projects();
            Emailaccounts     tblaccts   = new Emailaccounts();
            Proxies           tblproxies = new Proxies();
            Responses         tblresp    = new Responses();
            Affiliateprograms tblaff     = new Affiliateprograms();
            int nexttmpl  = 0;
            int nextproxy = 0;

            // Project Specific Variables
            Topicsaskcom tbltopics     = new Topicsaskcom();
            string       ProjectName   = "AskCom";
            int          PauseBtwPosts = 30; // 60 minutes
            int          PauseBtwQnA   = 3;  // 3 minutes

            #endregion

            while (RunningStatus != 1)                    // while there are keywords
            {
                if ((worker.CancellationPending == true)) // if the STOP button has been clicked
                {
                    e.Cancel = true;
                    break;
                }
                else  // If not STOPed, then continue with the next keyword
                {
                    #region SLEEP IF CURRENT TIME OUT OF DAYTIME POSTING TIME

                    if ((DateTime.Now.AddHours(-6).TimeOfDay < StartTime.TimeOfDay) || (DateTime.Now.AddHours(-6).TimeOfDay > EndTime.TimeOfDay))
                    {
                        worker.ReportProgress((2 * 0 * 10), "Night time sleeping until: " + StartTime.ToShortTimeString());
                    }

                    while ((DateTime.Now.AddHours(-6).TimeOfDay < StartTime.TimeOfDay) || (DateTime.Now.AddHours(-6).TimeOfDay > EndTime.TimeOfDay))
                    {
                        //
                        System.Threading.Thread.Sleep((1000 * 60 * 10));
                    }

                    #endregion

                    worker.ReportProgress((2 * 1 * 10), "Initialized. Selecting the next topic. ");

                    #region SELECT THE PROJECT AND SELECT NEXT TOPIC

                    string kwd       = "";
                    int    nexttopic = 0;


                    proj.Where.ProjectName.Value    = ProjectName;
                    proj.Where.ProjectName.Operator = WhereParameter.Operand.Equal;
                    proj.Query.Load();

                    nexttopic = proj.LastTopicUsed + 1;

                    tbltopics.Where.Id.Value    = nexttopic;
                    tbltopics.Where.Id.Operator = WhereParameter.Operand.Equal;
                    tbltopics.Query.Load();
                    kwd = tbltopics.ProductKeyword;

                    worker.ReportProgress((2 * 2 * 10));
                    #endregion

                    if (kwd == "")
                    {
                        #region WAIT FOR KEYWORDS OR SHUT THE PROCESS DOWN
                        worker.ReportProgress((2 * 2 * 10), "No keyword found for the next topic. Waiting for more keywords.");
                        System.Threading.Thread.Sleep((1000 * 60 * 5));

                        if ((worker.CancellationPending == true))
                        {
                            e.Cancel      = true;
                            RunningStatus = 1;
                            break;
                        }
                        #endregion
                    }
                    else
                    {
                        worker.ReportProgress((2 * 2 * 10), "Keyword found. Creating a new account...");

                        #region SELECT NEXT EMAIL AND NEXT PROXY

                        int nextemail = proj.LastAccountUsed + 1; // Filter the Email Account
                        tblaccts.Where.Id.Value    = nextemail;
                        tblaccts.Where.Id.Operator = WhereParameter.Operand.Equal;
                        tblaccts.Query.Load();
                        try
                        {
                            string CurrentEmail = tblaccts.Email;
                        }
                        catch
                        {
                            MessageBox.Show("There are no more emails");
                        }

                        // Filter the ProxyTable

                        nextproxy = proj.LastProxyUsed + 1;
                        tblproxies.LoadAll();
                        int proxycount = tblproxies.RowCount;
                        if (nextproxy > proxycount)
                        {
                            nextproxy = 1;
                        }

                        tblproxies.Where.Id.Value    = nextproxy;
                        tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                        tblproxies.Query.Load();
                        #endregion

                        #region CHECK IF PROXY IS WORKING, SELECT NEXT IF NOT WORKING

                        Httpcalls httpcall = new Httpcalls();

                        while (!httpcall.IsAlive(tblproxies.Proxy))
                        {
                            tblproxies.Active = 0;
                            tblproxies.Save();

                            nextproxy = nextproxy + 1;
                            if (nextproxy > proxycount)
                            {
                                nextproxy = 1;
                            }

                            tblproxies.Where.Id.Value    = nextproxy;
                            tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                            tblproxies.Query.Load();
                        }

                        tblproxies.Active = 1;
                        tblproxies.Save();

                        #endregion  CHECK IF PROXY IS WORKING, SELECT NEXT IF NOT WORKING

                        StdPosterFunctionsNonStatic stdfunc = new StdPosterFunctionsNonStatic();

                        #region CREATE ACCOUNT WITH CAPTCHA VALIDATION

                        string[] ErrorAndId = stdfunc.CreateAccountAskCom(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode, tbltopics.Topic);
                        //string[] ErrorAndId = { "", "" };
                        string ErrorMsg = "";
                        ErrorMsg = ErrorAndId[0];
                        string CaptchaId = ErrorAndId[1];
                        int    br        = 0;
                        while (ErrorMsg != "" && ErrorMsg != "#EANF#")
                        {
                            // Blogas CAPTCHA
                            // Report bad CAPTCHA
                            if (CaptchaId != "NODATA")
                            {
                                stdfunc.ReportBadCaptcha(CaptchaId);
                            }
                            ErrorAndId = stdfunc.CreateAccountAskCom(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode, tbltopics.Topic);
                            ErrorMsg   = ErrorAndId[0];
                            CaptchaId  = ErrorAndId[1];
                            br++;
                            if (br > 5)
                            {
                                worker.ReportProgress((2 * 2 * 10), "6 captchas solved incorrectly. Stopping.");
                                //e.Cancel = true;
                                break;
                            }
                        }
                        #endregion

                        bool Success = true;
                        if (Success)
                        {
                            #region WAIT SOME TIME
                            worker.ReportProgress((2 * 3 * 10), "Account created.");
                            // System.Threading.Thread.Sleep((1000 * 60 * 2));
                            #endregion

                            #region POST A QUESTION

                            worker.ReportProgress((2 * 3 * 10), "Now posting a question...");

                            string QuestionLink = "";

                            nexttopic = nexttopic - 1; // This is needed to logically fit the first time the "while" loop runs

                            while (QuestionLink == "" || QuestionLink == null || QuestionLink == "NODATA" || QuestionLink == "#EANF#")
                            {
                                nexttopic = nexttopic + 1;
                                tbltopics.Where.Id.Value    = nexttopic;
                                tbltopics.Where.Id.Operator = WhereParameter.Operand.Equal;
                                tbltopics.Query.Load();
                                kwd = tbltopics.ProductKeyword;

                                QuestionLink = stdfunc.PostQuestionAskCom(tblaccts.Email, tblaccts.Password, tbltopics.Topic, tblproxies.Proxy, proj.ImacrosCodeGeneric);
                            }

                            if (QuestionLink != "" && QuestionLink != null && QuestionLink != "NODATA" && QuestionLink != "#EANF#")
                            {
                                try
                                {
                                    tbltopics.Link = QuestionLink;
                                    tbltopics.Save();
                                }
                                catch
                                {
                                    //
                                    worker.ReportProgress((2 * 4 * 10), "Failed saving the extracted question.");
                                    proj.LastAccountUsed  = nextemail;
                                    proj.LastProxyUsed    = nextproxy;
                                    proj.LastTemplateUsed = nexttmpl;
                                    proj.LastTopicUsed    = nexttopic;
                                    proj.Save();
                                    goto NextQuestion;
                                }

                                worker.ReportProgress((2 * 4 * 10), "Question Posted and extracted.");

                                #endregion POST A QUESTION


                                #region Update Email and Proxy positions

                                proj.LastAccountUsed = nextemail;
                                proj.LastProxyUsed   = nextproxy;
                                proj.Save();

                                tblaccts.Where.WhereClauseReset();
                                tblproxies.Where.WhereClauseReset();

                                tblaccts.Filter   = null;
                                tblproxies.Filter = null;

                                #endregion END UPDATE POSITIONS

                                #region SELECT NEXT EMAIL AND NEXT PROXY

                                nextemail = proj.LastAccountUsed + 1; // Filter the Email Account
                                tblaccts.Where.Id.Value    = nextemail;
                                tblaccts.Where.Id.Operator = WhereParameter.Operand.Equal;
                                tblaccts.Query.Load();
                                try
                                {
                                    string CurrentEmail = tblaccts.Email;
                                }
                                catch
                                {
                                    MessageBox.Show("There are no more emails");
                                }

                                // Filter the ProxyTable

                                nextproxy = proj.LastProxyUsed + 1;
                                tblproxies.LoadAll();
                                if (nextproxy > tblproxies.RowCount)
                                {
                                    nextproxy = 1;
                                }

                                tblproxies.Where.Id.Value    = nextproxy;
                                tblproxies.Where.Id.Operator = WhereParameter.Operand.Equal;
                                tblproxies.Query.Load();
                                #endregion

                                #region WAIT SOME TIME BTW Question AND Answer
                                worker.ReportProgress((2 * 4 * 10), "Pausing for " + PauseBtwQnA.ToString() + " min. before creating an account for the answer.");
                                System.Threading.Thread.Sleep((1000 * 60 * PauseBtwQnA));
                                #endregion

                                #region CREATE ACCOUNT WITH CAPTCHA VALIDATION

                                worker.ReportProgress((2 * 4 * 10), "Creating an account for answering..");

                                string[] ErrorAndId2 = stdfunc.CreateAccountAskCom(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode, tbltopics.Topic);
                                string   ErrorMsg2   = "error";
                                ErrorMsg2 = ErrorAndId2[0];
                                string CaptchaId2 = ErrorAndId2[1];
                                int    br2        = 0;
                                while (ErrorMsg2 != "" && ErrorMsg2 != "#EANF#")
                                {
                                    // Blogas CAPTCHA
                                    // Report bad CAPTCHA
                                    if (CaptchaId2 != "NODATA")
                                    {
                                        stdfunc.ReportBadCaptcha(CaptchaId2);
                                    }
                                    ErrorAndId = stdfunc.CreateAccountAskCom(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblaccts.FirstName, tblproxies.Proxy, proj.ImacrosCreateAccCode, tbltopics.Topic);
                                    ErrorMsg2  = ErrorAndId2[0];
                                    CaptchaId2 = ErrorAndId2[1];
                                    br2++;
                                    if (br2 > 5)
                                    {
                                        worker.ReportProgress((2 * 4 * 10), "6 captchas solved incorrectly. Stopping.");
                                        e.Cancel = true;
                                        break;
                                    }
                                }
                                #endregion

                                #region Produce LongURLs

                                string KwdsNoSpace = kwd.Replace(" ", "%20");
                                try
                                {
                                    KwdsNoSpace = HttpUtility.UrlEncode(kwd);
                                }
                                catch
                                {
                                    worker.ReportProgress((2 * 4 * 10), "HttpUtility failed and threw and exception.");
                                    e.Cancel = true;
                                    break;
                                }


                                if (tbltopics.LongURL1 == "" || tbltopics.LongURL1 == null)
                                {
                                    // PRODUCE FIRST LongURL
                                    tblaff.Where.Id.Value    = tbltopics.AffprogramId1;
                                    tblaff.Where.Id.Operator = WhereParameter.Operand.Equal;
                                    tblaff.Query.Load();
                                    tbltopics.LongURL1 = tblaff.PreKeywordLinkPart + KwdsNoSpace + tblaff.PostKeywordLinkPart;
                                    tbltopics.Save();
                                }

                                /*
                                 * if (tbltopics.LongURL2 == "" || tbltopics.LongURL2 == null)
                                 * {
                                 *  // PRODUCE 2nd LongURL
                                 *  tblaff.Where.WhereClauseReset();
                                 *  tblaff.Where.Id.Value = tbltopics.AffprogramId2;
                                 *  tblaff.Where.Id.Operator = WhereParameter.Operand.Equal;
                                 *  tblaff.Query.Load();
                                 *  tbltopics.LongURL2 = tblaff.PreKeywordLinkPart + KwdsNoSpace + tblaff.PostKeywordLinkPart;
                                 *  tbltopics.Save();
                                 * }
                                 */
                                #endregion

                                #region Produce ShortURLs

                                TinyURL TinyClass = new TinyURL();

                                worker.ReportProgress((2 * 4 * 10), "Now shortening URLs..");

                                for (int i = 1; i <= 4; i++)
                                {
                                    if (tbltopics.ShortURL1 == "#EANF#" || tbltopics.ShortURL1 == "" || tbltopics.ShortURL1 == "NODATA" || tbltopics.ShortURL1 == null) // Let's not do conversion if the ShortURL1 is None.
                                    {
                                        tbltopics.ShortURL1 = TinyClass.ImacrosTinyurlConvert(tbltopics.LongURL1);
                                        tbltopics.Save();
                                    }
                                }

                                /* for (int i = 1; i <= 4; i++)
                                 * {
                                 *  if (tbltopics.ShortURL2 == "#EANF#" || tbltopics.ShortURL2 == "" || tbltopics.ShortURL2 == "NODATA" || tbltopics.ShortURL2 == null) // Let's not do conversion if the ShortURL2 is None.
                                 *  {
                                 *      tbltopics.ShortURL2 = TinyURL.ImacrosTinyurlConvert(tbltopics.LongURL2);
                                 *      tbltopics.Save();
                                 *  }
                                 * } */
                                #endregion

                                #region Filter out the next answer template AND replace [url]s

                                nexttmpl = proj.LastTemplateUsed + 1; // Filter out the next answer template

                                tblresp.Where.LanguageId.Value    = proj.Language;
                                tblresp.Where.LanguageId.Operator = WhereParameter.Operand.Equal;

                                tblresp.Where.ResponseGroup.Value    = "AmazonUK-one-link";
                                tblresp.Where.ResponseGroup.Operator = WhereParameter.Operand.Equal;

                                tblresp.Query.Load();

                                if (nexttmpl > tblresp.RowCount)
                                {
                                    nexttmpl = 1;
                                }

                                tblresp.Where.RespGrSpecSequence.Value    = nexttmpl;
                                tblresp.Where.RespGrSpecSequence.Operator = WhereParameter.Operand.Equal;
                                tblresp.Query.Load();

                                // Replace [URL] in a template

                                string GeneragedResponse = "";
                                GeneragedResponse = tblresp.Response;
                                GeneragedResponse = GeneragedResponse.Replace("[url]", tbltopics.ShortURL1);
                                // GeneragedResponse = GeneragedResponse.Replace("[url2]", tbltopics.ShortURL2);

                                tbltopics.Response = GeneragedResponse;
                                tbltopics.Save();

                                #endregion

                                #region Post The Answer

                                worker.ReportProgress((2 * 4 * 10), "Now posting an answ..");

                                if (tbltopics.ShortURL1 != "" && tbltopics.ShortURL1 != null && GeneragedResponse != "")
                                {
                                    if (stdfunc.LoginAndPost(tblaccts.Username, tblaccts.Email, tblaccts.Password, tblproxies.Proxy, tbltopics.Link, GeneragedResponse, proj.ImacrosLoginPost))
                                    {
                                        //
                                        worker.ReportProgress((2 * 5 * 10), "Posted successfully. Updating database, and switching to a new topic...");

                                        proj.LastAccountUsed  = nextemail;
                                        proj.LastProxyUsed    = nextproxy;
                                        proj.LastTemplateUsed = nexttmpl;
                                        proj.LastTopicUsed    = nexttopic;
                                        proj.Save();

                                        tbltopics.PostedStatus = 1;
                                        tbltopics.PostingTime  = DateTime.Now;
                                        tbltopics.Save();

                                        // MessageBox.Show("Everything completed well. Switching to the next topic.");
                                    }
                                }
                                #endregion
                            } // the the QuestionLink != ""
                            else
                            {
                                //
                                worker.ReportProgress((2 * 4 * 10), "Question not extracted. Smth went wrong.");
                                proj.LastAccountUsed  = nextemail;
                                proj.LastProxyUsed    = nextproxy;
                                proj.LastTemplateUsed = nexttmpl;
                                proj.LastTopicUsed    = nexttopic;
                                proj.Save();
                            }
                        }
                    }
NextQuestion:
                    #region Reset all Filters

                    tbltopics.Where.WhereClauseReset();
                    proj.Where.WhereClauseReset();
                    tblaccts.Where.WhereClauseReset();
                    tblproxies.Where.WhereClauseReset();
                    tblaff.Where.WhereClauseReset();
                    tblresp.Where.WhereClauseReset();

                    tbltopics.Filter  = null;
                    proj.Filter       = null;
                    tblaccts.Filter   = null;
                    tblproxies.Filter = null;
                    tblaff.Filter     = null;
                    tblresp.Filter    = null;

                    #endregion

                    #region PAUSE BETWEEN POSTINGS

                    if ((worker.CancellationPending == true))  // if the STOP button has been clicked
                    {
                        e.Cancel = true;
                        break;
                    }
                    else
                    {
                        worker.ReportProgress((2 * 5 * 10), "Pausing for " + PauseBtwPosts.ToString() + " min.");

                        for (int j = 1; j <= PauseBtwPosts; j++)
                        {
                            int Remaining = (PauseBtwPosts - j + 1);
                            worker.ReportProgress((2 * 5 * 10), Remaining.ToString() + " min. remaining.");
                            System.Threading.Thread.Sleep((1000 * 60 * 1)); // WAIT BETWEEN POSTS
                            if ((worker.CancellationPending == true))       // if the STOP button has been clicked
                            {
                                e.Cancel = true;
                                break;
                            }
                        }
                    }
                    #endregion
                } // end IF Keyword is ""
            }     // end While (RunningStatus != 1) script
        }         // end PostNextTopic();