thanks all
i have solve my problem with this class in vb.net
Imports System.Net
Imports System.Xml
Imports System.Data.SqlClient
Imports System.Data
Module Main
Dim sql As String
Dim connetionString As String
Dim connection As SqlConnection
Dim command As SqlCommand
Dim adpter As New SqlDataAdapter
Dim ds As New DataSet
Dim xmlFile As XmlReader
Dim doc As New XmlDocument()
Sub Main()
Try
connetionString = "Data Source=.;Initial Catalog=Newsfeed;Integrated Security=True"
connection = New SqlConnection(connetionString)
connection.Open()
deletedata()
Dim ArticleTitle As String
Dim ArticleDate As String
Dim ArticleText As String
Dim RssData As New DataSet
Dim pry As System.Net.WebProxy = New System.Net.WebProxy("x.x.x.x", 8080)
pry.Credentials = CredentialCache.DefaultCredentials
GlobalProxySelection.Select = pry
RssData.ReadXml("http://www.petra.gov.jo/library/RSS/RSS_General.xml?ID=635283116713881076")
For Each RssRow As DataRow In RssData.Tables("item").Rows
ArticleTitle = RssRow.Item("title").ToString
ArticleDate = RssRow.Item("pubDate").ToString
ArticleText = RssRow.Item("description").ToString
sql = "insert into AllNews (Title,NewDate,Content,Catalog) Values('" & ArticleTitle & "','" & ArticleDate & "','" & ArticleText & "','اخبار عالمية')"
command = New SqlCommand(sql, connection)
adpter.InsertCommand = command
adpter.InsertCommand.ExecuteNonQuery()
Next
connection.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
Application.Run()
End Sub
Sub deletedata()
connetionString = "Data Source=.;Initial Catalog=Newsfeed;Integrated Security=True"
connection = New SqlConnection(connetionString)
connection.Open()
sql = "DELETE FROM AllNews"
command = New SqlCommand(sql, connection)
adpter.InsertCommand = command
adpter.InsertCommand.ExecuteNonQuery()
End Sub
End Module