Searching occurence of a word or string from the database?

**Gauresh** · 18-02-2009

Hi,

I want to know how can i find a word (string) in a database along with its no. on times it occured in the table or database? In short i need a script for this!
Is this possible to generate from back-end database to my vb.net application?

Regards,

**Bofinn** · 18-02-2009

Simply pass the proc a value and it will search the entire database reporting every occurence of the word in tables, views, stored procedures, functions, etc...

Best of all, if you create a key stroke shortcut to execute the proc, you can highlight any text in your editor and search for it instantly. And because the proc's only parameter is of type SQL_VARIANT, there's no need to
surround the input parameter with single quotes! Hightlight, click, and find!

**JamesMK** · 18-02-2009

I found the answer to my prob (I added a question here yesterday), and maybe I can help you out. Its really quite easy (I think) just backup your database and save it to your desktop, unzip it and open with notepad. Select all, copy ...and then paste in word and then find replace all word instances (which you want with something else) ...word will count and show you how many instances there are...I dont think notepad can do it (count).

Cheers

**Santinos** · 18-02-2009

Write a text file containing the input string. For example I have created a file named test.txt containing the following string

swdfkTRUEafjknsdfTRUEasdfjkTRUEasf

goto the directory where the file "text.txt" is located.

run the following command

awk -F "TRUE" '{print NF-1}' test.txt | awk '{ c+= $1} END { print c }'

Code:

[root@mii temp]# cat test.txt 
swdfkTRUEafjknsdfTRUEasdfjkTRUEasf
[root@mii temp]# awk -F "TRUE" '{print NF-1}' test.txt | awk '{ c+= $1} END { print c }'
3
[root@mii temp]#

**Reegan** · 18-02-2009

I have this example to find the occurance of a type of word in a string I hope this will help you with the logic to develop your word search criteria.

Code:

Private Sub Command1_Click()
Dim myArr() As String, myWord As String
Dim x As Long

myWord = "hello,world,15247"

myArr = Split(myWord, ",")

For x = 0 To UBound(myArr)
    If IsNumeric(myArr(x)) Then
        List1.AddItem myArr(x) & ": Number"
    Else
        List1.AddItem myArr(x) & ": VarChar"
    End If
Next

End Sub