[الطالب]

سلام


جرب هذا - ا للي فهمته ان الترميز يخص ال response
لكن الافضل استخدام UTF8

كود :

Dim un As String = "", cpid As String = "", dt As String = ""
un = txtid.Text
cpid = CpuId()
dt = gd()
Dim forcheck As String = "?un=" & un & "&cpid=" & cpid & "&dt=" & dt
Dim url As String = "http://localhost:54832/Default.aspx" & forcheck
Dim req As WebRequest = WebRequest.Create(url)
Dim res As WebResponse = req.GetResponse

Dim receiveStream As Stream = res.GetResponseStream()
Dim readStream As New StreamReader(receiveStream, System.Text.Encoding.UTF8)

MsgBox(readStream.ReadToEnd())

lblstate.Text = res.Headers("ok").ToString

موفقين