www.astatech.com Products Asta WinCE Support





Asta Technology Group
Welcome to the world of wireless enabled web services
advanced search
ASTA in 60 seconds
ASTA in action
Developer details
Free Internet tools
Demos
Business views
White papers
Tutorial center
Testimonials
Asta online help
ASTA eVC++ and eVB Support for WinCE

The Complete ASTA Handheld Architecure is explained On Line at the ASTA Wireless Site. See details for developers at http://www.microsoft.com/pocketpc/developer.asp.

Embedded Visual Basic

Files   Description Comment
CEComCLient.dll
(x86 version for the emulator)
download COM Class that implements the ASTA SkyWire Library on. Version available that compiles under Win32 also! To install it copy it to the emulator and run regsvrce.exe to register it.
eVBSQLClient download Sample eVB application Shows how to fetch server metadata information and EXEC and Select SQL
Asta ADO Wireless Server download Asta ADO Server to work with sample SkyWire clients This server uses ADO but ASTA has servers native servers for Oracle, MySQL and just about any other database you can think of.
Asta SkyWire Server download Sample non-Database debug server to see the internals of the ASTA client messages sent to the server.  

Embedded Visual C++

Files   Description Comment
AstaDLL.dll   DLL Library that contains the implementation of the ASTA SkyWire Library that must be loaded on the WinCE device or the emulator. Make sure it is in the path of any Wince Exe's.
AstaDLL.h   Header file for AstaDLL  
AstaSQL download AstaSQL demo. Simple project that shows how to get tablenames, fieldnames, and execute exec and select SQL against a remote SkyWireServer.
SignCap download Digital Ink example showing how to capture a signature and send it to a remote server and display it.  
SkyWireTestClient   Shows the built in abilities of SkyWire Servers and the client including signature capture with it being displayed at the server.
Emulator version download  
ARM version for IPAQ download  
SH3 version for HP Journada download  
MIPS version download  
SkyWire Server download  
Delphi SkyWire Test Client download Delphi Win32 client that can be run against the same server and implements the SkyWire client abilities through the AstaServerSocket.OnCodedParamList call.  

Server Side

The TAstaPDAServerSocket, which descends from the TAstaServerSocket, provides support for Palm, WinCE and Linux PDA Clients. Below is a description of the additional events available for the TAstaPDAServerSocket.

There are several additional events coded on the AstaPDAServerSocket in order to support remote PDA Clients.

OnPdaParamList

This is the most important event as all the SendParamList calls from PDA clients will flow through this event. The MsgToken comes from the remote Client call and if there is any kind of Error on the server just send a non-zero value back in PdaSendParamList.

procedure TForm1.AstaServerSocket1PDAParamList(Sender: TObject;
ClientSocket: TCustomWinSocket; PDAid, MsgID, MsgToken: Integer;
P: TAstaParamList);
var
  Error:Integer;
begin
  Error:=0;
  case MsgToken of
    1001: Error:=DoPDAServerTime(ClientSocket, P);
    1003: Error:=DoPalmSQLSelect(ClientSocket, P);
    1004: Error:=DoPDATables(ClientSocket, P);
    1005: Error:=DoPalmExecSQL(Clientsocket,p);
    1006: Error:=DoPDAFields(ClientSocket, P);
    1010: Error:=DoPalmMultiSQLSelect(ClientSocket, P);
    1011: Error:=DoPDASelect(ClientSocket, P);
    1012: Error:=DoPalmExecSQLParamList(ClientSocket,p);
    else Error:=DoPDAServerTime(ClientSocket, P);
  end;
  AstaServerSocket1.PDASendParamList(Error, ClientSocket, P);
end;

Client Side Example

See screen shot of the Skywire WinCE Test Client built with eVB

Below is a small code example of creating an AstaConnection and connecting to a remote Asta SkyWire server from the Digital Ink demo client.

AstaHandle Params = AstaParamLstCreate();

AstaParamLstSetLongInt(Params, 0, total_pixels, TEXT("Total"));
AstaParamLstSetBlob(Params, 1, tlist, total_pixels * 3, TEXT("Sequence"));

AstaHandle conn = AstaClConvCreate();

if (conn)
  {
  if (AstaClConvOpenConnection(conn, AddressBuf, Port))
    {
    bool sent = AstaClConvSendParamList(conn, MsgID, Params);
    AstaParamLstDestroy(Params);

    if (!sent)
      {
      int i = AstaClConvGetLastError(conn);
      MessageBox(0, TEXT("Failed to send data"), NULL, 0);
      }
    AstaClConvReceiveStream(conn, &tlist, &tlsize);
    AstaClConvCloseConnection(conn);
    }
  else
    {
    AstaParamLstDestroy(Params);
    MessageBox(0, TEXT("Failed to connect to server"), NULL, 0);
    }
  }
AstaClConvDestroy(conn);

 

 

Last modified: 5/5/2002 7:33:26 AM
Copyright © 2001-2002 Asta Technology Group, Inc. Terms & Conditions     Privacy Policy     Site Map