[RESOLVED] Send File To Server?

[ThEiMp]

I am writing a chat program and wish to get the username details sent to the server app, which is my computer. There will be several different folders, one for the many parts of the globe. Eg: Australia, has one and then so does Asia has one for themselves.

Depending on where the Combo2.Text reads, the file is placed into that folder. Eg: If Combo2.Text = "Africa" Then the file is sent into the Africa folder on the computer.

Is wish to have one file, per username idenity on this computer of mine. Also they can be deleted only on the machine that was able to make the username id file with. Also they can be used on any machine around the world, with the access codes. Which are the username and the password of the account. And then the other details, don't worry about. They are placed in when the two access codes are correct and have been authenticated by the Server. Which is only my machine.

[Quiver318]

Sounds like a fine project.

Is there a question for us?

[jmsrickland]

I think it's how to change a light bulb but he appearantly already answerd it.

[ThEiMp]

Actually the question is. How do I send a file to the server, from the details that were made when the user signed on and place it in a folder, which is called Africa or Asia etc.

eg: If the file was created using Asia, details then it will be placed in the Asia folder etc.

[jmsrickland]

OK, I'm going to take it like this:

Client signs in by selecting his country from a Combo Box and adds his username and password. He clicks the Sign In button and when the server gets the connection the server then creates a folder for that country and within that country folder creates a username folder.

First, you could already have the country folders already made on the Server machine but is not imperative.

Client sends the following data:

CLientSocket.SendData Combo1.List(Combo1.ListIndex) & "," & txtUsername & "," & txtPassword

Server get the data like this:

Dim s As String
ServerSocket.GetData s 's = "Asia,John,rqwx123876" for example

Server now must make a sub-directory called "John" within the parent directory called "Asia" (which may already exists on the server machine)

Dim LoginData() As String

LoginData = Split(k, ",")

On Error Resume Next
MkDir App.Path & "\" & LoginData(0)
MkDir App.Path & "\" & LoginData(0) & "\" & LoginData(1)

[ThEiMp]

Could you please send me a fully working demo source code that is uncomplied. One that is demostrating what you are talking about, because when I try it on my computer the program crashes and then nothing in the program works right, after that.

[ThEiMp]

I just want to have the one folder inside this project. Which is "Usernames" and then the sub folder, of the country that my Server exists inside. eg: "Asia".

[jmsrickland]

What do you mean when you try it on your computer it crashes? I didn't give you a coded program to run; I only gave you the steps to making one. If it crashes then it is your code, not mine.

The MkDir steps shows you how to make a folder path like this:

   |
   |
   +- United States
   |        |
   |        +-John
   |        |
   |        +-Mary
   |
   +- Russia
            |
            +-Ivan

If that isn't the path you want then just change the index-value until you get what you want.

MkDir App.Path & "\" & LoginData(index-value)