Click here to Skip to main content
15,912,400 members
Home / Discussions / ASP.NET
   

ASP.NET

 
Questionchk t query Pin
anbusenthil9-Jun-09 23:16
anbusenthil9-Jun-09 23:16 
AnswerRe: chk t query Pin
Manas Bhardwaj9-Jun-09 23:19
professionalManas Bhardwaj9-Jun-09 23:19 
AnswerRe: chk t query Pin
Abhijit Jana9-Jun-09 23:24
professionalAbhijit Jana9-Jun-09 23:24 
AnswerRe: chk t query Pin
Paddy Boyd10-Jun-09 2:02
Paddy Boyd10-Jun-09 2:02 
Questionkeyword show in bold later Pin
prabhat kumar mokama9-Jun-09 22:54
prabhat kumar mokama9-Jun-09 22:54 
AnswerRe: keyword show in bold later Pin
Abhijit Jana9-Jun-09 23:03
professionalAbhijit Jana9-Jun-09 23:03 
AnswerRe: keyword show in bold later Pin
saanj9-Jun-09 23:06
saanj9-Jun-09 23:06 
GeneralRe: keyword show in bold later Pin
prabhat kumar mokama9-Jun-09 23:12
prabhat kumar mokama9-Jun-09 23:12 
m devloping a search engine like google in asp.net . i have a textbox when i enter a sentece in text box . it is diffrenciated in many keys . i want this key in bold letter.

my code is.


Imports System.Data
Imports Oracle.DataAccess.Client
Partial Class Search_files
Inherits System.Web.UI.Page
Dim con As New OracleConnection(ConfigurationManager.ConnectionStrings("constr1").ConnectionString)
Dim cmd As New OracleCommand
Dim da As New OracleDataAdapter
Dim ds As New DataSet
Dim dr As OracleDataReader
Dim fileNamePart(20) As String
Dim filterfilename As New ArrayList()
Dim filenameLen, i, j, index, indexarr, count As Integer
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
If txtfiledesc.Text <> "" Then
filenameLen = txtfiledesc.Text.Length
indexarr = 0
j = 0
count = 0
For i = 0 To filenameLen - 1
count = count + 1
If Asc(txtfiledesc.Text.Chars(i)) = 32 Then
For index = indexarr To indexarr
fileNamePart(indexarr) = txtfiledesc.Text.Substring(j, count - 1)
Next
indexarr = indexarr + 1
j = i + 1
count = 0
End If
Next
fileNamePart(indexarr) = txtfiledesc.Text.Substring(j, count)

' Dim jim As Integer = fileNamePart.Length
Label1.Text = ""
Dim filterarr, filterarr1 As Integer
For filterarr = 0 To indexarr
If fileNamePart(filterarr).ToString.ToLower = "the" Or fileNamePart(filterarr).ToString.ToLower = "be" Or fileNamePart(filterarr).ToString.ToLower = "is" Or fileNamePart(filterarr).ToString.ToLower = "an" Or fileNamePart(filterarr).ToString.ToLower = "a" Or fileNamePart(filterarr).ToString.ToLower = "are" Or fileNamePart(filterarr).ToString.ToLower = "of" Or fileNamePart(filterarr).ToString.ToLower = "for" Or fileNamePart(filterarr).ToString.ToLower = "in" Or fileNamePart(filterarr).ToString.ToLower = "on" Or fileNamePart(filterarr).ToString.ToLower = "at" Or fileNamePart(filterarr).ToString.ToLower = "to" Or fileNamePart(filterarr).ToString.ToLower = "shall" Or fileNamePart(filterarr).ToString.ToLower = "will" Then
' fileNamePart(filterarr) = fileNamePart(filterarr + 1)
For filterarr1 = filterarr To indexarr - 1
fileNamePart(filterarr1) = fileNamePart(filterarr1 + 1)
Next
fileNamePart(filterarr1 + 1) = Nothing
' ReDim Preserve fileNamePart(fileNamePart.Length - 1)
filterarr = filterarr - 1
End If
Next
Dim ind1 As Integer
For ind1 = 0 To 10
If (fileNamePart(ind1) <> fileNamePart(ind1 + 1)) And (fileNamePart(ind1) <> Nothing) Then
filterfilename.Add(fileNamePart(ind1))
End If
Next
'fileNamePart = DirectCast(Resize(fileNamePart, 5), String())
Dim z As Integer = 0
While z < filterfilename.Count
Label1.Text = Label1.Text & " || " & filterfilename.Item(z) ' fileNamePart(0)
z = z + 1
End While
popdata()
Else
Dim scrpt As String = "<script language='javascript'>window.alert('Plz Insert A Data To Search');</script>"
ScriptManager.RegisterClientScriptBlock(Me.Page, GetType(String), "showsuccess", scrpt, False)
End If
End Sub

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

End Sub
Public Sub popdata()
If con.State <> ConnectionState.Open Then
con.Open()
End If
cmd.Connection = con
If filterfilename.Count = 1 Then
cmd.CommandText = "select KM_SRL,KM_SRL_DESC,KM_ATTACHMENT_REF,KM_AUTHOR,KMLVL,LVLDESC from hrm.KM_REPOSITORY_VIEW where STATUS='LIV' and KM_SRL_DESC LIKE '%" & filterfilename.Item(0).ToString() & "%'"
ElseIf filterfilename.Count = 2 Then
cmd.CommandText = "select KM_SRL,KM_SRL_DESC,KM_ATTACHMENT_REF,KM_AUTHOR,KMLVL,LVLDESC from hrm.KM_REPOSITORY_VIEW where STATUS='LIV' and KM_SRL_DESC LIKE '%" & filterfilename.Item(0).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(1).ToString() & "%'"
ElseIf filterfilename.Count = 3 Then
cmd.CommandText = "select KM_SRL,KM_SRL_DESC,KM_ATTACHMENT_REF,KM_AUTHOR,KMLVL,LVLDESC from hrm.KM_REPOSITORY_VIEW where STATUS='LIV' and KM_SRL_DESC LIKE '%" & filterfilename.Item(0).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(1).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(2).ToString() & "%'"
ElseIf filterfilename.Count = 4 Then
cmd.CommandText = "select KM_SRL,KM_SRL_DESC,KM_ATTACHMENT_REF,KM_AUTHOR,KMLVL,LVLDESC from hrm.KM_REPOSITORY_VIEW where STATUS='LIV' and KM_SRL_DESC LIKE '%" & filterfilename.Item(0).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(1).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(2).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(3).ToString() & "%'"
ElseIf filterfilename.Count = 5 Then
cmd.CommandText = "select KM_SRL,KM_SRL_DESC,KM_ATTACHMENT_REF,KM_AUTHOR,KMLVL,LVLDESC from hrm.KM_REPOSITORY_VIEW where STATUS='LIV' and KM_SRL_DESC LIKE '%" & filterfilename.Item(0).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(1).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(2).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(3).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(4).ToString() & "%'"
ElseIf filterfilename.Count = 6 Then
cmd.CommandText = "select KM_SRL,KM_SRL_DESC,KM_ATTACHMENT_REF,KM_AUTHOR,KMLVL,LVLDESC from hrm.KM_REPOSITORY_VIEW where STATUS='LIV' and KM_SRL_DESC LIKE '%" & filterfilename.Item(0).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(1).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(2).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(3).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(4).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(5).ToString() & "%'"
ElseIf filterfilename.Count = 7 Then
cmd.CommandText = "select KM_SRL,KM_SRL_DESC,KM_ATTACHMENT_REF,KM_AUTHOR,KMLVL,LVLDESC from hrm.KM_REPOSITORY_VIEW where STATUS='LIV' and KM_SRL_DESC LIKE '%" & filterfilename.Item(0).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(1).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(2).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(3).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(4).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(5).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(6).ToString() & "%'"
ElseIf filterfilename.Count = 8 Then
cmd.CommandText = "select KM_SRL,KM_SRL_DESC,KM_ATTACHMENT_REF,KM_AUTHOR,KMLVL,LVLDESC from hrm.KM_REPOSITORY_VIEW where STATUS='LIV' and KM_SRL_DESC LIKE '%" & filterfilename.Item(0).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(1).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(2).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(3).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(4).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(5).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(6).ToString() & "%' or KM_SRL_DESC LIKE '%" & filterfilename.Item(7).ToString() & "%'"
Else
Dim scrpt As String = "<script language='javascript'>window.alert('Plz give more appropriate sentencse or word');</script>"
ScriptManager.RegisterClientScriptBlock(Me.Page, GetType(String), "showsuccess", scrpt, False)
Exit Sub
End If
da.SelectCommand = cmd
da.Fill(ds, "tab1")
GridView1.DataSource = ds.Tables("tab1")
GridView1.DataBind()
If con.State <> ConnectionState.Closed Then
con.Close()
End If
End Sub
End Class
AnswerRe: keyword show in bold later Pin
prabhat kumar mokama9-Jun-09 23:09
prabhat kumar mokama9-Jun-09 23:09 
Questionneed urgent help how to synchronize web & windows database. Please help Pin
Yajjoj9-Jun-09 22:31
Yajjoj9-Jun-09 22:31 
AnswerRe: need urgent help how to synchronize web & windows database. Please help Pin
N a v a n e e t h9-Jun-09 22:41
N a v a n e e t h9-Jun-09 22:41 
AnswerRe: need urgent help how to synchronize web & windows database. Please help Pin
Manas Bhardwaj9-Jun-09 22:42
professionalManas Bhardwaj9-Jun-09 22:42 
GeneralRe: need urgent help how to synchronize web & windows database. Please help Pin
Abhijit Jana9-Jun-09 22:48
professionalAbhijit Jana9-Jun-09 22:48 
GeneralRe: need urgent help how to synchronize web & windows database. Please help Pin
Baran M9-Jun-09 22:54
Baran M9-Jun-09 22:54 
AnswerRe: need urgent help how to synchronize web & windows database. Please help Pin
samMaster10-Jun-09 1:03
samMaster10-Jun-09 1:03 
Questionnested gridview [modified] Pin
vikas shukla9-Jun-09 22:24
vikas shukla9-Jun-09 22:24 
AnswerRe: nested gridview Pin
N a v a n e e t h9-Jun-09 22:33
N a v a n e e t h9-Jun-09 22:33 
Questionhow to retrieve data from a website. Pin
jainiraj9-Jun-09 21:54
jainiraj9-Jun-09 21:54 
AnswerRe: how to retrieve data from a website. Pin
Christian Graus9-Jun-09 22:13
protectorChristian Graus9-Jun-09 22:13 
AnswerRe: how to retrieve data from a website. Pin
Abhijit Jana9-Jun-09 22:30
professionalAbhijit Jana9-Jun-09 22:30 
AnswerRe: how to retrieve data from a website. Pin
David Mujica11-Jun-09 4:44
David Mujica11-Jun-09 4:44 
GeneralRe: how to retrieve data from a website. Pin
AftabR7-Jul-09 21:48
AftabR7-Jul-09 21:48 
GeneralRe: how to retrieve data from a website. Pin
David Mujica8-Jul-09 3:25
David Mujica8-Jul-09 3:25 
GeneralRe: how to retrieve data from a website. Pin
AftabR8-Jul-09 4:49
AftabR8-Jul-09 4:49 
GeneralRe: how to retrieve data from a website. Pin
David Mujica8-Jul-09 6:25
David Mujica8-Jul-09 6:25 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.