1. Shin Jungi
  2. PowerServer Mobile
  3. Wednesday, 25 March 2020

Hi,

We are developing APPEON mobile.

we try to code below code.

I want to know how can login server.

ll_retVal = lappeonfileservice.of_logonfileserver( "logisbill.cad.co.kr", 21, "username=taxuser11;password=xxxx" ) 

Now  appeonfileservice argment

ll_retVal  is  -1 :  retrund

 -1 - Failed to connect to the file server.

How can modify ?

Now our server status :

1. 21 port any open

2. 80 port any open

3. IIS server runing

 

As soon as possible want to solve this problums.

Jungi


//================= Function Strat ===================
String ls_servername, ls_ipaddress, ls_userid, ls_password, ls_versionpath
Long ll_open, ll_connect

// Get FTP server info
Select n_server_name, t_ipaddress, t_userid, t_password, t_version_path
Into :ls_servername, :ls_ipaddress, :ls_userid, :ls_password, :ls_versionpath
From pmtb_x_version_server001
WHERE N_SERVER_NAME = 'ecs';

ls_servername = Trim(ls_servername)
ls_ipaddress = Trim(ls_ipaddress)
ls_userid = Trim(ls_userid)
ls_password = Trim(ls_password)
ls_versionpath = Trim(ls_versionpath)


IF ISNULL(ls_ipaddress) OR ls_ipaddress = '' THEN
Return True
END IF

// File uplaod
String ls_localfile, ls_remotefile
Boolean lb_putfile

// Server file Transfer setting
ls_localfile = arg_source
ls_remotefile = ls_versionpath + "CHECK\" + arg_target

 

//For example:
//
appeonfileservice lappeonfileservice
Long ll_retVal,ll_port
String ls_url,ls_ip,ls_username //ls_password
string ls_import_file_name, ls_filename
int li_last_pos
//


ls_import_file_name = ls_localfile

if ls_import_file_name = '' then
Messagebox("file service", "Please select a file to upload.")
return False
end if

// upload file to server -start
lappeonfileservice = CREATE appeonfileservice

IF ( IsValid( lappeonfileservice ) ) THEN

ll_retVal = lappeonfileservice.of_logonfileserver( "logisbill.cad.co.kr", 21, "username=taxuser11;password=xxxx" ) //172.25.28.39 - mykul420


IF ( ll_retVal <> 0 ) THEN
MessageBox( 'File server error', 'Could not connect to file server !!!~r~nOperation aborted !', StopSign!, OK! )
ELSE

lappeonfileservice.of_appeonupload( ls_import_file_name, ls_remotefile, false, ll_retVal)

IF ( ll_retVal <> 0 ) THEN
MessageBox( 'File server error', 'Could not upload the attached document to file server !!!~r~nOperation Aborted !', StopSign!, OK! )
ELSE
ll_retVal = lappeonfileservice.of_logofffileserver()
IF ( ll_retVal <> 0 ) THEN
MessageBox( 'File server error', 'There was an error while disconnecting from the file server !!!~r~nOperation Aborted !', StopSign!, OK! )
END IF
END IF
END IF
END IF

DESTROY lappeonfileservice


// retrun normal
Return True

//================= Function End ===================

Who is viewing this page
Chris Pollach @Appeon Accepted Answer Pending Moderation
0
Votes
Undo

Hi Shin;

   Did you complete the Appeon File Server configuration?

FYI:  https://docs.appeon.com/appeon_online_help/pb2019/workarounds_and_api_guide/ch01s03s04.html

Regards ... Chris

Comment
Hi Chris

Not yet find setup.exe.

Please link download setup.exe

  1. Shin Jungi
  2. Saturday, 28 March 2020
It should be there if PS was fully installed. I would suggest that you open a support ticket for this issue.
  1. Chris Pollach @Appeon
  2. Saturday, 28 March 2020
Thanks

Korea distribute this problums not support part.

We are free support time.

I don't understand.

Korea distribute all installed our server.

Why not full install our server.



How can solve this problum.

I can't find setup.exe file.

PS : Power Server?

We bought PB, PS universal version 150 users.

  1. Shin Jungi
  2. Saturday, 28 March 2020
There are no comments made yet.
  1. Wednesday, 25 March 2020
  2. PowerServer Mobile
  3. # 1
  • Page :
  • 1


There are no replies made for this question yet.
However, you are not allowed to reply to this question.