Jump to content

john.grisum

Members
  • Posts

    46
  • Joined

  • Last visited

Everything posted by john.grisum

  1. Just an update. I have used a VB script via excel to undergo a search for the content in A# and display the number of hits in B#. It actually works quite well. The code is below if anyone wants to use it. Example output: [A1] "PRD-12345-123" [B1] 708 Hits Public Sub ExcelGoogleSearch()Dim searchWords As StringWith Sheets("Sheet1")RowCount = 1Do While .Range("A" & RowCount) <> ""searchWords = .Range("A" & RowCount).Value' Get keywords and validate by adding + for spaces betweensearchWords = Replace$(searchWords, " ", "+")' Obtain the source code for the Google-searchterm webpagesearch_url = "http://www.google.com/search?hl=en&q=" & searchWords & "&meta="""Set search_http = CreateObject("MSXML2.XMLHTTP")search_http.Open "GET", search_url, Falsesearch_http.sendresults_var = search_http.responsetextSet search_http = Nothing' Find the number of results and post to sheetpos_1 = InStr(1, results_var, "resultStats>", vbTextCompare)pos_2 = InStr(3 + pos_1, results_var, ">", vbTextCompare)pos_3 = InStr(pos_2, results_var, "<nobr>", vbTextCompare)NumberofResults = Mid(results_var, 1 + pos_2, (-1 + pos_3 - pos_2))Range("B" & RowCount) = NumberofResultsRowCount = RowCount + 1LoopEnd WithEnd Sub
  2. Ive slimmed down to the PRD & # of hits columns. This makes it much easier for me to focus on which PRDs are good and which are not.
  3. I have a little side project that I need to complete and would like some input. I have a list of about 3,000 excel entries that i need to find their matching sibling (I currenlty have over 11,000). I have included examples below where the MEP has a sibling PRD. MEP-04103-001 PRD-49028-005MEP-04103-001 PRD-49028-006MEP-04103-001 PRD-49028-007MEP-04103-001 PRD-49028-010MEP-04103-001 PRD-49028-011 I have several thousand PRD numbers that do not have their sibling MEP numbers and would need to search the web for such a match. I have been doing this manually but I will have several hundred to do each month and it will become quite tedious. I have been doing manual web searches by using this format: "PRD-09854-019" NEAR "MEP-*****-***". What I need is to be able to create an excel or similar document to include web searches for the PRD and include perhaps the top 5 results' description section and web link. Any ideas would be greatly appreciated.
  4. Why this thread is pretty much dead! Lets start it up again!Site Name: Free My BlackberrySite Description: Offers FREE Unlock Codes for GSM Blackberry phones.Site Owner/Developer: me/ some helpersSite Address: Freemyblackberry.comExtra Comments: Good? YES/NO. Suggestions... Comments?Any suggestions on decreasing load times?
×
×
  • Create New...