Thank you Erel ...
Try
Dim Sql As String = "SELECT PARAMETER, VALUE FROM SETTINGS WHERE PARAMETER LIKE 'WS_%'"
Dim CursorForUrl As Cursor
CursorForUrl = DbConnection.Sql1.ExecQuery(Sql)
If CursorForUrl.RowCount > 0 Then
For i =0 To CursorForUrl.RowCount -1
CursorForUrl.Position = i
If CursorForUrl.GetString("PARAMETER") = "WS_USER_NAME" Then
wsUserName =(CursorForUrl.GetString("VALUE"))
End If
If CursorForUrl.GetString("PARAMETER") = "WS_PASSWORD" Then
wsPassWord =(CursorForUrl.GetString("VALUE"))
End If
If CursorForUrl.GetString("PARAMETER") = "WS_LANGUAGE" Then
wsLanguage =(CursorForUrl.GetString("VALUE"))
End If
Next
End If
Catch
Loggercs.ErrorMessage("LoadServiceParameters Hatası :" , "Utulity.cs")
Loggercs.write_db("LoadServiceParameters Hata" ,Loggercs.Warn , "Utulity.cs")
End Try