us-ascii skal selvfølgelig være "us-ascii".
Winsocket blev på et tidspunkt udvidet med unicode support, i C++ kom der
flere metoder (ala. metoder der klarer char og metoder der klarer wchar), så
du skal måske bare bruge nogle andre metoder i vb.
Lars
"Lars Rosenberg" <latex_rules@hotmail.com> wrote in message
news:3b0f58cf$0$9994$ba624c82@nntp01.dk.telia.net...
> Din outputstreamwriter kan du init med
>
> OutputStreamWriter(clientSocket.getOutputStream(),US-ASCII)
> Det skulle gøre at der skrives med ascii kodning
>
> Lars
>
>
> "Anders Lybecker" <anders@lautrupklubben.dk> wrote in message
> news:s9tP6.422$7i2.241823815@news.mobilixnet.dk...
> > > Ud over at der kan være en million fejl i din vb kode som vi ikke kan
> se,
> >
> > Ja, det er en mulighed.
> >
> > > kan det være et problem at Java tekst er unicode og din vb koden
maaske
> > > forventer ascii kode.
> >
> > Det kan godt ske?
> > Jeg kan bare godt sende den anden vej, altså fra vb klienten til java
> > serveren med en InputStreamReader, men ikke den anden vej med en
> > PrintWriter.
> >
> > Her er min java kode:
> >
> > import java.net.*;
> > import java.io.*;
> >
> > public class test {
> > public static void main(String[] args) throws IOException {
> > ServerSocket serverSocket = null;
> >
> > try {
> > serverSocket = new ServerSocket(7);
> > } catch (IOException e) {
> > System.err.println("Could not listen on port: 7.");
> > System.exit(1);
> > }
> >
> > Socket clientSocket = null;
> >
> > try {
> > clientSocket = serverSocket.accept();
> > } catch (IOException e) {
> > System.err.println("Accept failed.");
> > System.exit(1);
> > }
> >
> > PrintWriter out = new PrintWriter(new
> > OutputStreamWriter(clientSocket.getOutputStream()), true);
> > BufferedReader in = new BufferedReader(
> > new InputStreamReader(clientSocket.getInputStream()));
> >
> > String inputLine, outputLine;
> >
> > while ((inputLine = in.readLine()) != null) {
> > System.out.println(inputLine);
> > outputLine = inputLine;
> > out.println(outputLine);
> > }
> > out.close();
> > in.close();
> > clientSocket.close();
> > serverSocket.close();
> > }
> > }
> >
> > Hvordan fortæller jeg så streamen at jeg sender ascii?
> >
> > Og min vb-kode hvis du vil tjekke den: :)
> >
> > Private Sub Connect_Click()
> > Winsock1.RemoteHost = "10.0.0.2"
> > Winsock1.RemotePort = 7
> >
> > Winsock1.Connect
> >
> > Do Until Winsock1.State = sckConnected
> > DoEvents: DoEvents: DoEvents: DoEvents
> > Loop
> > MsgBox ("Connected")
> > End Sub
> >
> > Private Sub Close_Click()
> > Winsock1.Close
> > End Sub
> >
> > Private Sub Send_Click()
> > Winsock1.SendData (txtSend)
> > End Sub
> >
> > Private Sub winsock1_dataarrival(ByVal bytestotal As Long)
> > Dim incomming
> > Winsock1.GetData incomming
> > txtRecive = CStr(incomming) & vbCrLf
> > End Sub
> >
> > Det kan jo ikke blive mere simpelt. Men der er alligevel en fejl et
eller
> > andet sted.
> >
> > Hilsen
> > Anders
> >
> >
>
>