谁即会.net和java,帮我改改三个类,改成java的,有好多对不起来,

鲁虾 2006-06-05 04:35:17
Imports System.Net
Imports System.IO
Imports System.Text
Imports System.Configuration
Imports System.Web

Public MustInherit Class HttpUtility
Protected m_ServiceURI As String

Public Property ServiceURI() As String
Get
Return m_ServiceURI
End Get
Set(ByVal Value As String)
m_ServiceURI = Value
End Set
End Property

Public Sub New()
m_ServiceURI = ""
End Sub
End Class

Public Class SyncHttpUtility
Inherits HttpUtility

Public Function HttpQuery(ByVal cmd As String, ByRef ret As String) As Boolean
Dim bRet As Boolean = False
Dim sRet As String = ""

Try
Dim oUri As Uri = New Uri(Me.m_ServiceURI)
Dim oReq As HttpWebRequest
Dim oReqStream, oRespStream As Stream
Dim SendBytes() As Byte
Dim oResp As HttpWebResponse
Dim sr As StreamReader
Dim character As Integer
Dim temp(1) As Byte

oReq = CType(WebRequest.Create(oUri), HttpWebRequest)
oReq.Method = "POST"

'SendBytes = Encoding.GetEncoding(936).GetBytes(cmd)
cmd = System.Web.HttpUtility.UrlEncode(cmd)
SendBytes = Encoding.UTF8.GetBytes(cmd)

oReq.ContentLength = SendBytes.Length

oReqStream = oReq.GetRequestStream()
oReqStream.Write(SendBytes, 0, SendBytes.Length)
oReq.Timeout = 1000 * 30
oReqStream.Close()

oResp = oReq.GetResponse()
oRespStream = oResp.GetResponseStream()

'sr = New StreamReader(oRespStream, Encoding.GetEncoding(936))
sr = New StreamReader(oRespStream, Encoding.UTF8)

sRet = sr.ReadToEnd
ret = sRet
bRet = True
Catch ex As Exception
bRet = False
ret = ex.Message
End Try

Return bRet
End Function

End Class

Public Class ASyncHttpUtility
Inherits HttpUtility

Const BUFFER_SIZE As Integer = 1024

Private ResultQueue As Queue

Public IsBack As Boolean

'New
Public Sub New()
ResultQueue = New Queue
IsBack = True
End Sub

'Callback State Class
Private Class RequestState
Public ID As String
Public Request As HttpWebRequest
Public ResponseStream As Stream
Public BufferRead(BUFFER_SIZE) As Byte
Public RequestData As StringBuilder = New StringBuilder("")
'Public StreamDecode As Decoder = Encoding.GetEncoding(936).GetDecoder()
Public StreamDecode As Decoder = Encoding.UTF8.GetDecoder()

Public Sub New()
Request = Nothing
ResponseStream = Nothing
ID = Now.ToLongTimeString
End Sub
End Class

Private Sub Print(ByVal text As String)
Debug.WriteLine(text)
End Sub

Private Sub AddResult(ByVal content As String)
ResultQueue.Enqueue(content)
End Sub

Public Function GetResult() As String
Dim sRet As String = ""
Try
If ResultQueue.Count <> 0 Then
sRet = ResultQueue.Dequeue
End If
Catch ex As Exception
'How?
sRet = ""
End Try

Return sRet
End Function

'Send Request
Public Sub AnsyncSendHttpWebRequest(ByVal cid As String)
Try
IsBack = False

Dim oUri As Uri = New Uri(Me.m_ServiceURI & "?CID=" & cid)
Dim oReq As HttpWebRequest
Dim oReqState As New RequestState

oReq = CType(WebRequest.Create(oUri), HttpWebRequest)
oReqState.Request = oReq

oReq.BeginGetResponse(New AsyncCallback(AddressOf HttpWebResponseCallback), oReqState)
Print("Info : Send Request : " & oReqState.ID & " : " & Now.ToLongTimeString)
Catch ex As Exception
IsBack = True

AddResult("Ex : Send Request : " & ex.ToString)
Print("Ex : Send Request : " & ex.ToString)
End Try
End Sub

'Process Request Callback
Private Sub HttpWebResponseCallback(ByVal ar As System.IAsyncResult)
Try
IsBack = False

Dim oReqState As RequestState = CType(ar.AsyncState, RequestState)

Dim oReq As HttpWebRequest = oReqState.Request
Dim oResp As HttpWebResponse = CType(oReq.EndGetResponse(ar), HttpWebResponse)

Dim oRespStream As Stream = oResp.GetResponseStream()
oReqState.ResponseStream = oRespStream

Dim reader As StreamReader = New StreamReader(oRespStream)
'Send Read
Dim arRead As IAsyncResult = _
oRespStream.BeginRead(oReqState.BufferRead, 0, BUFFER_SIZE, _
New AsyncCallback(AddressOf HttpWebReadCallBack), oReqState)

Print("Info : Response Callback : " & oReqState.ID & " : " & Now.ToLongTimeString)

Catch ex As Exception
IsBack = True

AddResult("Ex : Request Callback : " & Now.ToString & " : " & ex.ToString)
Print("Ex : Request Callback : " & Now.ToString & " : " & ex.ToString)
End Try
End Sub

'Process Read Callback
Private Sub HttpWebReadCallBack(ByVal asyncResult As IAsyncResult)
Try
IsBack = False

Dim oReqState As RequestState = CType(asyncResult.AsyncState, RequestState)
Dim oRespStream As Stream = oReqState.ResponseStream

Print("Info : Read Callback Start: " & oReqState.ID & " : " & Now.ToLongTimeString)

'Still has data in stream
Dim read As Integer = oRespStream.EndRead(asyncResult)
If read > 0 Then
'Keep
Dim charBuffer(BUFFER_SIZE) As Char
Dim len As Integer = _
oReqState.StreamDecode.GetChars(oReqState.BufferRead, 0, read, charBuffer, 0)
Dim str As String = New String(charBuffer, 0, len)

'oReqState.RequestData.Append(Encoding.GetEncoding(936).GetString(oReqState.BufferRead, 0, read))
oReqState.RequestData.Append(Encoding.UTF8.GetString(oReqState.BufferRead, 0, read))


' Continue reading until returns –1.0.

Dim ar As IAsyncResult = _
oRespStream.BeginRead(oReqState.BufferRead, 0, BUFFER_SIZE, _
New AsyncCallback(AddressOf HttpWebReadCallBack), oReqState)
Else
Dim strContent As String = ""

'End reading or Has no data
If oReqState.RequestData.Length > 1 Then
strContent = oReqState.RequestData.ToString()
'print("Info : Read Callback : " & strContent)
Print("Info : Read Callback End: " & oReqState.ID & " : " & Now.ToLongTimeString & " : " & strContent)
Else
Print("Info : Read Callback : " & "no data found")
End If

' Close the response stream.
oRespStream.Close()
AddResult(strContent)
End If

Catch ex As Exception
AddResult("Ex : Read Callback : " & ex.ToString)
Print("Ex : Read Callback : " & ex.ToString)
End Try

IsBack = True

End Sub



End Class

...全文
346 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
jobs002 2006-06-06
  • 打赏
  • 举报
回复
关注..
鲁虾 2006-06-06
  • 打赏
  • 举报
回复
偶正在慢慢改着
cangwu_lee 2006-06-06
  • 打赏
  • 举报
回复
路过
zblaoshu1979 2006-06-06
  • 打赏
  • 举报
回复
UnAgain 2006-06-05
  • 打赏
  • 举报
回复
mark
鲁虾 2006-06-05
  • 打赏
  • 举报
回复
上面是我转成的C#,
.net 里面好多的同步,异步,不知道在java里面怎么实现
鲁虾 2006-06-05
  • 打赏
  • 举报
回复
using System.Net;
using System.IO;
using System.Text;
using System.Configuration;
using System.Web;
public abstract class HttpUtility
{
protected string m_ServiceURI;

public string ServiceURI {
get {
return m_ServiceURI;
}
set {
m_ServiceURI = Value;
}
}

public HttpUtility()
{
m_ServiceURI = "";
}
}
public class SyncHttpUtility : HttpUtility
{

public bool HttpQuery(string cmd, ref string ret)
{
bool bRet = false;
string sRet = "";
try {
Uri oUri = new Uri(this.m_ServiceURI);
HttpWebRequest oReq;
Stream oReqStream;
Stream oRespStream;
byte[] SendBytes;
HttpWebResponse oResp;
StreamReader sr;
int character;
byte[] temp = new byte[1];
oReq = ((HttpWebRequest)(WebRequest.Create(oUri)));
oReq.Method = "POST";
cmd = System.Web.HttpUtility.UrlEncode(cmd);
SendBytes = Encoding.UTF8.GetBytes(cmd);
oReq.ContentLength = SendBytes.Length;
oReqStream = oReq.GetRequestStream();
oReqStream.Write(SendBytes, 0, SendBytes.Length);
oReq.Timeout = 1000 * 30;
oReqStream.Close();
oResp = oReq.GetResponse();
oRespStream = oResp.GetResponseStream();
sr = new StreamReader(oRespStream, Encoding.UTF8);
sRet = sr.ReadToEnd;
ret = sRet;
bRet = true;
} catch (Exception ex) {
bRet = false;
ret = ex.Message;
}
return bRet;
}
}
public class ASyncHttpUtility : HttpUtility
{
const int BUFFER_SIZE = 1024;
private Queue ResultQueue;
public bool IsBack;

public ASyncHttpUtility()
{
ResultQueue = new Queue();
IsBack = true;
}
private class RequestState
{
public string ID;
public HttpWebRequest Request;
public Stream ResponseStream;
public byte[] BufferRead = new byte[BUFFER_SIZE];
public StringBuilder RequestData = new StringBuilder("");
public Decoder StreamDecode = Encoding.UTF8.GetDecoder();

public RequestState()
{
Request = null;
ResponseStream = null;
ID = Now.ToLongTimeString;
}
}

private void Print(string text)
{
Debug.WriteLine(text);
}

private void AddResult(string content)
{
ResultQueue.Enqueue(content);
}

public string GetResult()
{
string sRet = "";
try {
if (ResultQueue.Count != 0) {
sRet = ResultQueue.Dequeue;
}
} catch (Exception ex) {
sRet = "";
}
return sRet;
}

public void AnsyncSendHttpWebRequest(string cid)
{
try {
IsBack = false;
Uri oUri = new Uri(this.m_ServiceURI + "?CID=" + cid);
HttpWebRequest oReq;
RequestState oReqState = new RequestState();
oReq = ((HttpWebRequest)(WebRequest.Create(oUri)));
oReqState.Request = oReq;
oReq.BeginGetResponse(new AsyncCallback(/* might be wrong, please check */ new EventHandler(HttpWebResponseCallback)), oReqState);
Print("Info : Send Request : " + oReqState.ID + " : " + Now.ToLongTimeString);
} catch (Exception ex) {
IsBack = true;
AddResult("Ex : Send Request : " + ex.ToString);
Print("Ex : Send Request : " + ex.ToString);
}
}

private void HttpWebResponseCallback(System.IAsyncResult ar)
{
try {
IsBack = false;
RequestState oReqState = ((RequestState)(ar.AsyncState));
HttpWebRequest oReq = oReqState.Request;
HttpWebResponse oResp = ((HttpWebResponse)(oReq.EndGetResponse(ar)));
Stream oRespStream = oResp.GetResponseStream();
oReqState.ResponseStream = oRespStream;
StreamReader reader = new StreamReader(oRespStream);
IAsyncResult arRead = oRespStream.BeginRead(oReqState.BufferRead, 0, BUFFER_SIZE, new AsyncCallback(/* might be wrong, please check */ new EventHandler(HttpWebReadCallBack)), oReqState);
Print("Info : Response Callback : " + oReqState.ID + " : " + Now.ToLongTimeString);
} catch (Exception ex) {
IsBack = true;
AddResult("Ex : Request Callback : " + Now.ToString + " : " + ex.ToString);
Print("Ex : Request Callback : " + Now.ToString + " : " + ex.ToString);
}
}

private void HttpWebReadCallBack(IAsyncResult asyncResult)
{
try {
IsBack = false;
RequestState oReqState = ((RequestState)(asyncResult.AsyncState));
Stream oRespStream = oReqState.ResponseStream;
Print("Info : Read Callback Start: " + oReqState.ID + " : " + Now.ToLongTimeString);
int read = oRespStream.EndRead(asyncResult);
if (read > 0) {
char[] charBuffer = new char[BUFFER_SIZE];
int len = oReqState.StreamDecode.GetChars(oReqState.BufferRead, 0, read, charBuffer, 0);
string str = new string(charBuffer, 0, len);
oReqState.RequestData.Append(Encoding.UTF8.GetString(oReqState.BufferRead, 0, read));
IAsyncResult ar = oRespStream.BeginRead(oReqState.BufferRead, 0, BUFFER_SIZE, new AsyncCallback(/* might be wrong, please check */ new EventHandler(HttpWebReadCallBack)), oReqState);
} else {
string strContent = "";
if (oReqState.RequestData.Length > 1) {
strContent = oReqState.RequestData.ToString();
Print("Info : Read Callback End: " + oReqState.ID + " : " + Now.ToLongTimeString + " : " + strContent);
} else {
Print("Info : Read Callback : " + "no data found");
}
oRespStream.Close();
AddResult(strContent);
}
} catch (Exception ex) {
AddResult("Ex : Read Callback : " + ex.ToString);
Print("Ex : Read Callback : " + ex.ToString);
}
IsBack = true;
}
}
jc15271149 2006-06-05
  • 打赏
  • 举报
回复
晕,VB的,不爱看
treeroot 2006-06-05
  • 打赏
  • 举报
回复
什么对不起来?
huangdeji 2006-06-05
  • 打赏
  • 举报
回复
好像不复杂么,不过我不会嘿嘿
源码链接: https://pan.quark.cn/s/0f7c75cb3aad ### MIPI Video Mode 与 Command Mode 的差异 #### 一、引言 MIPI (Mobile Industry Processor Interface) 是一种用于连接移动设备中处理器及其外围设备的标准化接口。MIPI 接口支持多种协议,其中包含 DSI (Display Serial Interface) 和 DCS (Display Control Interface) 等协议。在 MIPI 接口的应用中,主要涉及两种工作模式:Video Mode(视频模式)和 Command Mode(命令模式)。本文旨在系统性地阐述这两种模式的工作机制、特性以及实际应用环境。 #### 二、LCD RAM 概念说明 在进一步探讨 MIPI 的两种模式之前,有必要对文中提及的“LCD RAM”概念进行明确。实际上,“LCD RAM”并非一个通用术语,而是本文作者用来描述 LCD 控制器中用于存储显示数据的内存区域。LCD(Liquid Crystal Display,液晶显示屏)通常配备一个控制 IC(Integrated Circuit,集成电路),该控制 IC 可能内置 RAM 以缓存显示数据。 #### 三、MIPI Video Mode(视频模式) **定义:** - 视频模式是一种似于传统 RGB 接口的工作模式,它要求主机持续不断地向显示器传输刷新数据。 - 在这种模式下,数据和控制信号以报文的形式通过 MIPI 总线进行传输。 - 显示器本身无需配备帧缓冲器,因为主机会周期性地刷新屏幕。 **特点:** 1. **实时性高:** 主机需要不...
源码下载地址: https://pan.quark.cn/s/a4b39357ea24 在电磁模拟技术中,CST(Computer Simulation Technology)是一种被广泛采纳的软件工具,它主要用于电磁场、微波、天线以及射频系统的设计工作。本资料将详细分析CST软件中离散端口的具体配置方法,这些方法对于提升仿真结果的精确度和专业水准具有决定性作用。离散端口在CST软件中扮演着模拟信号输入或输出的重要角色,它们构成了仿真模型不可或缺的部分。在配置离散端口时,一个核心的原则是保证端口的方向与网格线保持一致,这是因为这样做能够有效降低计算过程中产生的误差,并确保仿真数据的有效性。如果未能遵循这一指导原则,可能会引发未知的计算问题,进而导致仿真结果失去可靠性。 在CST软件中配置离散端口,通常需要借助“Pick Points”这一功能。通过选择“Pick Edge Center”选项,端口将被设定在模型边缘的中心位置上。然而,这种做法并不总是能够确保端口与网格线保持平行。在某些特定情形下,模型的几何构造可能不允许直接选取一个与网格线平行的边作为端口的安装位置。 为了克服这一挑战,可以采用多种不同的策略。如果模型本身已经包含一条与馈电口平行的边,那么可以直接利用这条边来建立端口,此时CST软件会自动调整端口使其与网格线对齐。另一种可选的方法是,当模型不具备现成的平行边时,用户可以手动构建一个几何结构,比如一个立方体,并使其边缘与馈电口平行。通过这种方式,新建立的几何结构的边缘就可以作为端口的位置,从而确保端口与网格线的平行关系。 在实施上述操作时,必须关注端口尺寸的合理性和物理意义的一致性。端口的尺寸应当依据实际天线馈电部分的尺寸进行适当调整,过大的端口或...
代码下载链接: https://pan.quark.cn/s/a4b39357ea24 【使用TensorFlow进行图像识别】 图像识别作为计算机视觉领域的关键任务之一,其核心在于通过算法解析和理解图像所包含的信息。在此资源中,我们将集中探讨如何借助功能强大的深度学习框架TensorFlow来执行手写数字识别。手写数字识别构成了众多实际应用的基础,例如自动支票处理、光学字符识别(OCR)等场景。 TensorFlow是由Google创建的一个开源库,它主要用于数值运算和机器学习,尤其在深度学习方面表现卓越。其核心优势在于可以构建并训练复杂的神经网络架构,并且在多种硬件环境中实现高效执行,涵盖CPU和GPU平台。 在此实践项目中,我们将运用TensorFlow来构建一个卷积神经网络(CNN)模型,这种架构是处理图像数据的理想选择。CNNs通过模仿人脑视觉皮层的运作机制,能够自主地提取图像中的关键特征,进而达成识别目标。在手写数字识别的特定情境下,这些特征可能涉及笔画的几何形态、走向以及相互间的连接模式。 对于CNN的基础结构,我们需要具备相应的认知,其通常由卷积层、池化层、全连接层以及激活函数等部分组成。卷积层借助滤波器(亦称卷积核)对图像进行扫描,以捕捉局部特征;池化层则用于降低数据维度,同时保留核心信息;全连接层将特征向量映射至各别的概率分布;而激活函数如ReLU则通过引入非线性元素,使模型能够学习更为复杂的模式。 在此案例中,建议采用MNIST数据集,这是一个广泛用于手写数字识别的标准测试集。该数据集包含60,000个训练样本和10,000个测试样本,每个样本均为28x28像素的灰度图像,代表0到9这十个数字中的某一个。为了训练模型,必须首先加载数据,并...

62,622

社区成员

发帖
与我相关
我的任务
社区描述
Java 2 Standard Edition
社区管理员
  • Java SE
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧