Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Server-Klijent komunikacija

[es] :: .NET :: Server-Klijent komunikacija

[ Pregleda: 2973 | Odgovora: 13 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

SuDar407

Član broj: 162091
Poruke: 57
*.static.isp.telekom.rs.



Profil

icon Server-Klijent komunikacija05.12.2011. u 12:52 - pre 149 meseci
Pozdrav svima!
Pokusavam da napravim server/klijent aplikaciju, ali sam naisao na sledeci problem: nikako ne uspevam da posaljem poruku
sa servera klijentu.
Na primer: Korisnik salje serveru ime i lozinku, na serveru se proverava verifikacija, a zatim vraca rezultat verifikacije (prosao ili nije prosao verifikaciju).
Na internetu sam citao, gledao ali nisam nasao kako da posaljem poruku klijentu sa servera.

Hvala unapred, jako mi je bitno da u skorije vreme resim problem!
 
Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12846



+4783 Profil

icon Re: Server-Klijent komunikacija05.12.2011. u 13:00 - pre 149 meseci
Posto ima prilicno razlicitih nacina da se u .net-u ostvari client-server komunikacija, bilo bi dobro da postavis deo koda tako da se vidi sta imas do sada uradjeno pa da se u vezi toga da neki predlog. Ovako neko moze da ti pise o WCF-u a da ti koristis socket-e :)
 
Odgovor na temu

SuDar407

Član broj: 162091
Poruke: 57
*.static.isp.telekom.rs.



Profil

icon Re: Server-Klijent komunikacija05.12.2011. u 13:36 - pre 149 meseci
Code:

Imports System.Net
Imports System.Net.Sockets
Imports System.Text
Imports System
Public Class Form1
    Private Sub ServerStartBTN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ServerStartBTN.Click
        Try
            AxWinsock1.LocalPort = My.Settings.Port
            AxWinsock1.Listen()
            infotablaTXT.Text = ">> SERVER JE SPREMAN ZA UPITE KORISNIKA!" & vbCr & vbCr
        Catch ex As Exception
            infotablaTXT.Text = ">> GRESKA!!! SERVER NIJE SPREMAN ZA UPITE KORISNIKA!" & vbCr & vbCr
        End Try
    End Sub

    Private Sub AxWinsock1_ConnectionRequest(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_ConnectionRequestEvent) Handles AxWinsock1.ConnectionRequest
        AxWinsock1.Close()
        AxWinsock1.Accept(e.requestID)
    End Sub

    Private Sub AxWinsock1_DataArrival(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles AxWinsock1.DataArrival
        Dim klijent_podaci As String = ""
        Dim niz_od_poruke() As String
        AxWinsock1.GetData(klijent_podaci)
        niz_od_poruke = Split(klijent_podaci, "||")

        Select Case niz_od_poruke(0)
            Case "Logovanje"
                infotablaTXT.Text = infotablaTXT.Text & ">> Korisnik <" & niz_od_poruke(1) & "> pristupa serveru. Verifikacija je u toku..." & vbCr
                'kod za proveru korisnickog imena i sifre
                infotablaTXT.Text = infotablaTXT.Text & "Verifikacija je uspesna!" & vbCr & vbCr
        End Select
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class


 
Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12846



+4783 Profil

icon Re: Server-Klijent komunikacija05.12.2011. u 14:00 - pre 149 meseci
Uh, ti koristis neki ActiveX koji je bio aktuelan u vreme VB6
Imas ovde primer za .net varijantu - http://msdn.microsoft.com/en-u...m.net.sockets.tcplistener.aspx
To je za server a imas tamo link i za klijent.

Naravno, ti prilagodi kod svojoj potrebi. Ako bude trebalo objasnjenje u vezi nekog dela koda sa linka, pitaj
 
Odgovor na temu

SuDar407

Član broj: 162091
Poruke: 57
*.static.isp.telekom.rs.



Profil

icon Re: Server-Klijent komunikacija05.12.2011. u 14:03 - pre 149 meseci
Hvala Shadowed na brzim odgovorima! Odmah cu pogledati i javljam sta sam uradio! :)
Ovo su mi prvi koraci u ovoj oblasti, nisam upoznat sa client/server aplikacijama... :(
Pozdrav!
 
Odgovor na temu

SuDar407

Član broj: 162091
Poruke: 57
*.static.isp.telekom.rs.



Profil

icon Re: Server-Klijent komunikacija05.12.2011. u 15:02 - pre 149 meseci
Ljudi, moze li kod koji sam poslao da se doradi i posalje korisniku poruku? To bi trebalo u ovom delu koda da stoji:
Code:

Case "Logovanje"
                infotablaTXT.Text = infotablaTXT.Text & ">> Korisnik <" & niz_od_poruke(1) & "> pristupa serveru. Verifikacija je u toku..." & vbCr
               if  ('kod za proveru korisnickog imena i sifre)=ok then
                SALJI KORISNIKU PORUKU
                infotablaTXT.Text = infotablaTXT.Text & "Verifikacija je uspesna!" & vbCr & vbCr
                else
                SALJI KORISNIKU PORUKU
                end if
        End Select

HELP!!!
 
Odgovor na temu

mkaras
Marko Karas
Beograd

Član broj: 66087
Poruke: 427



+19 Profil

icon Re: Server-Klijent komunikacija06.12.2011. u 10:32 - pre 149 meseci
On 5.12.2011 13:52, "SuDar407" wrote:
Citat:

Pozdrav svima!
Pokusavam da napravim server/klijent aplikaciju, ali sam naisao na
sledeci problem: nikako ne uspevam da posaljem poruku
sa servera klijentu.


Da pokušam da objasnim. Dva sistema , sistem AA i sistem BB, su u vezi.
Da bi sistem AA mogao da se poveže sa sistemom BB i da šalje podatke ka
njemu sistem BB mora da osluškuje saobraćaj (da bude server). Znači
primi zahtev, obradi i rezultat sačuva u privremenom skladištu dok ga
klijent opet ne poseti i upita ga šta je uradio, pa ako ima rezultata
pokupi ga i objavi.
Ako ne želiš tu vrstu ponašanja onda i sistem AA mora da osluškuje i da
prima informacije od sistema BB ( odnosno i sistem AA mora da bude
server). tek onda će oni moći da sarađuju na način na koji si to zamislio.
Sve to je slično replikaciji servera baze podataka. Nema replikacije
između klijenta i servera već samo između servera i servera.
Znači da bi sistem koji si zamislio mogao da funkcioniše i sistem AA i
sistem BB moraju istovremeno da budu i serveri i klijenti.
 
Odgovor na temu

igor tomic

Član broj: 133445
Poruke: 192
*.team.ba.

Sajt: www.igortomic.from.hr


+15 Profil

icon Re: Server-Klijent komunikacija02.02.2012. u 16:53 - pre 147 meseci
Evo jedan, nadam se lagan problem a da neotvaram novu temu. Slicno nesto, klijent -> server

Unosom txt1,txt2,txt3, dobijem link i on mi ispise u polje txt4, i onda ja rucno copy->paste link u brovser. Znaci aplikacija bi po svojoj namjeni trebala da posalje url zahtjev. evo dio koda :

Dim linkod As String
linkod = ...

txt4.Text = linkod

Definiro sam taj linkkod . Kako sada da taj dobiveni linkkod ili txt4 posalje url zahtjev, mora li otvarat moj default web brovser, volio bi da ne otvara , a ako mora otvorit nema veze

Radim u Visual Basicu 2008

L.P
 
Odgovor na temu

igor tomic

Član broj: 133445
Poruke: 192
*.team.ba.

Sajt: www.igortomic.from.hr


+15 Profil

icon Re: Server-Klijent komunikacija02.02.2012. u 19:05 - pre 147 meseci
probao

linkod=.......
txt4.Text = linkod
Dim request As WebRequest = WebRequest.Create("http://" & linkod)


ovo mi djeluje logicno, al nece :)

 
Odgovor na temu

aca andrijevic
aka LoGaN
Nis

Član broj: 35450
Poruke: 347
217.16.143.*

ICQ: 325309560


+2 Profil

icon Re: Server-Klijent komunikacija02.02.2012. u 19:23 - pre 147 meseci
Mozda nesto ovako:

Code (vbnet):

Imports System.Net

Dim urlReq As HttpWebRequest
Dim urlResp As HttpWebResponse
Try
   urlReq = WebRequest.Create(TextBox1.Text)
   urlResp = urlReq.GetResponse
   MessageBox.Show(urlResp.StatusDescription)
Catch ex As Exception
   MessageBox.Show("Neuspesno povezivanje.Detaljnije:" + ex.Message)
End Try
 

"Ne menjaj nesto sto te sasvim dobro sluzi, ne trazi leba preko pogace" - Aleksandar Andrijevic
 
Odgovor na temu

igor tomic

Član broj: 133445
Poruke: 192
*.team.ba.

Sajt: www.igortomic.from.hr


+15 Profil

icon Re: Server-Klijent komunikacija02.02.2012. u 20:07 - pre 147 meseci
Hvala radi !
 
Odgovor na temu

igor tomic

Član broj: 133445
Poruke: 192
*.team.ba.

Sajt: www.igortomic.from.hr


+15 Profil

icon Re: Server-Klijent komunikacija02.02.2012. u 22:02 - pre 147 meseci
aca moze li kako da mi taj "url" koji definiram tj polje "txt3"- tako sam ga definisao, salje na mailadresu(gmail)

Pozdrav!
 
Odgovor na temu

aca andrijevic
aka LoGaN
Nis

Član broj: 35450
Poruke: 347
93.184.90.*

ICQ: 325309560


+2 Profil

icon Re: Server-Klijent komunikacija03.02.2012. u 17:26 - pre 147 meseci
Imas dosta stvari na webu za to, izguglaj malo

Sending mail VB.NET
"Ne menjaj nesto sto te sasvim dobro sluzi, ne trazi leba preko pogace" - Aleksandar Andrijevic
 
Odgovor na temu

igor tomic

Član broj: 133445
Poruke: 192
*.team.ba.

Sajt: www.igortomic.from.hr


+15 Profil

icon Re: Server-Klijent komunikacija03.02.2012. u 19:15 - pre 147 meseci
Hvala, aca, nauci se ja dosta stvari. Zivio !
 
Odgovor na temu

[es] :: .NET :: Server-Klijent komunikacija

[ Pregleda: 2973 | Odgovora: 13 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.