Changeset 1103 for BMXNET_RPMS_dotNET_UTILITIES-BMX/trunk/cs/bmx_0200scr/BMX2/BMXCmdTester/bmxTesterForVista_0200.cs
- Timestamp:
- Mar 5, 2011, 6:32:01 AM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
BMXNET_RPMS_dotNET_UTILITIES-BMX/trunk/cs/bmx_0200scr/BMX2/BMXCmdTester/bmxTesterForVista_0200.cs
r936 r1103 6 6 class MyFirstApp 7 7 { 8 static void Main( )8 static void Main(string[] args) 9 9 { 10 if (args.Length < 4) 11 { 12 Console.WriteLine("Enter parameters as server port ac vc"); 13 return; 14 } 15 10 16 BMXNetLib ConnectionManager = new BMXNetLib(); 11 Console.Write("Enter IP Address of Server: "); 12 string ip = Console.ReadLine(); 13 Console.Write("Enter the listener port: "); 14 string port = Console.ReadLine(); 15 int portno = int.Parse(port); 16 Console.Write("Enter your Access Code: "); 17 string accessCode = Console.ReadLine(); 18 Console.Write("Enter your Verify Code: "); 19 string verifyCode = Console.ReadLine(); 17 string ip = args[0]; 18 int portno = int.Parse(args[1]); 19 string accessCode = args[2]; 20 string verifyCode = args[3]; 20 21 ConnectionManager.MServerPort = portno; 21 22 bool success = ConnectionManager.OpenConnection(ip, accessCode, verifyCode); … … 24 25 string result = ConnectionManager.TransmitRPC("BMX USER", ConnectionManager.DUZ); 25 26 Console.WriteLine("Simple RPC: User Name: " + result); 26 result = ConnectionManager.TransmitRPC("BMX UTF-8", "");27 Console.WriteLine("UTF-8 stuff: " + result);28 27 29 28 //string result = … … 60 59 System.Data.DataTable dt = new System.Data.DataTable(); 61 60 dt = ds.Tables["BMXNetTable1"]; 62 61 System.Text.StringBuilder sb = new System.Text.StringBuilder(); 63 62 for (int i = 0; i < dt.Rows.Count; i++) 64 63 { … … 75 74 Console.WriteLine("More complicated SQL\n"); 76 75 BMXNetCommand cmd3 = (BMXNetCommand)conn.CreateCommand(); 76 cmd3.CommandText = String.Empty; // Default 77 #if VISTA 77 78 cmd3.CommandText = @"SELECT PATIENT.NAME 'NAME', PATIENT.STATE 'STATE', 78 79 STATE.ABBREVIATION 'ABBR', PATIENT.AGE 'AGE' FROM PATIENT, STATE 79 80 WHERE INTERNAL[PATIENT.STATE] = STATE.BMXIEN MAXRECORDS:5"; 80 da.SelectCommand = cmd3; 81 #elif RPMS 82 cmd3.CommandText = @"SELECT VA_PATIENT.NAME 'NAME', VA_PATIENT.STATE 'STATE', 83 STATE.ABBREVIATION 'ABBR', VA_PATIENT.AGE 'AGE' FROM VA_PATIENT, STATE 84 WHERE INTERNAL[VA_PATIENT.STATE] = STATE.BMXIEN MAXRECORDS:5"; 85 #endif 86 da.SelectCommand = cmd3; 81 87 da.Fill(ds, "BMXNetTable2"); 82 88 System.Data.DataTable dt2 = new System.Data.DataTable();
Note:
See TracChangeset
for help on using the changeset viewer.