Search results for query: *

Olaf, NET TIME <Server Name> help you get time on any server and resolve problem when you not have right to create file on server ThuVan

Try put SET DELETED ON in form.load Perhaps where is SET DELETED OFF befor form.load You need check that with ?SET("DELETED") ThuVan

Oh! Mike, that maybe your VFP run quickly, please add line: RUN NET TIME \\GJS >C:\TEMP\CURRTIME.TXT =INKEY(1, "H") &&Slow VFP down so windows can make the file first MODIFY FILE C:\TEMP\CURRTIME.TXT Thuvan

In all most DOS-version, the symbol ">" on dos-command line send result to text-file. My computer with Windows-XP, VFP7; and this function (command line) is working normaly. May be you explain your code that give wrong result? Thanks ThuVan

I just have checked this function in EXE file. 1) The empty file Result.TXT might occur when wrong server name (wrong computer name). 2) Need a little corect: ServerTime= CTOT(STRTRAN(SUBSTR(cServerTime,AT("is",cServerTime)+3,18),CHR(13),"")) to delete chr(13) on line 1 from Result.TXT ThuVan

this function to help you: Time1= Get_Server_Time("192.168.1.33") ?Time1 ************************************************** * Get server time: * Server name may be Name of any computer on LAN * or IP of any computer on LAN ... ************************************************** FUNCTION...

My problem consist in that: I cann't read 16-bit data text from access table (in MDB file). This text automatical converted to UTF8 (when I do command: select * from Mytable or Open-recordset ) and I cann't modify text in unicode format (16bit), after that update new-value revert to table! Can...

Tamar ! I am read this article, but this code do not work on VFP-7.0 and ADO, this code for VFP 9.0 and SQL-Serve: LOCAL oCA as CursorAdapter oCA = CREATEOBJECT("CursorAdapter") oCA.ADOCodePage = 65000 oCA.Alias = "TSqlQUery" oCA.DataSourceType = "ADO" oCA.DataSource = oRS ... TEXT TO lcSQL...

? strtran(o_value, chr(0), "") dosn't help, because o_value - 8-bit format, C_name - 16 bit-format. I need read 16-bit format from C_name (text is in a 16-bit format vietnamese language) Can you help me, Mike ? That realy very difficult!!! Thanks Thu Van

I have table customer in access file MyDATA.MDB , that have column C_Name in unicode form (2byte-font). I need read original data from this column. Any one have me? Thanks PS: The folow-code dosn't help: strConn = "DRIVER=Microsoft Access Driver (*.mdb);" ; +"ADOCodePage=65001;" ...

(Assume the relation expr. is Code) In the Parent alias: SET SKIP TO (chindren alias) GO RECN() m.Code= Code COUNT TO NumberOfRec WHILE chindren.Code = m.Code (that ~ move to next record in Parent alias)

Thanks craigsboyd, that really help me, I don't thing standard toolbars is window!!! ThuVan

My stand along EXE file on VFP6.0 run on custumer computer (not from VFP6.EXE) and standard tool bar is displayed on screen. How to hide it programatically? Please have me. Thanks

Try: push key clear Select ... Into Cursor Creport select creport report form rptForm to printer Prompt preview pop key to disable ON KEY LABEL RIGHTMOUSE ThuVan

Where are GERT ??? the program of Ramani is very good !!!

I'm sorry, You are all right: The table STAFF need have field GRP: SELECT DISTINCT Client.sysref, Client.Surname, Client.FirstName, Client.GRP ; INTO TABLE STAFF ; FROM CLIENT ; WHERE CLIENT.GRP = 1 ; ORDER BY 1 then program work right ThuVan

You need only change command APPEND FROM CLIENT FOR CLIENT.GRP = 1 to APPEND FROM CLIENT FOR GRP = 1 then program work right ThuVan

wadesnj, if You SET TALK OFF then the program runs more quickly ! SET TALK ON take 8 secconds of 10 secconds in total ! You may write: WAIT WINDOWS &quot;Please wait for ...&quot; nowait &_COMM WAIT CLEAR ... Good luck ThuVan

I don't thing that, my code is fastest way ! (faster >N/2 times (N= number of numeric and character fields)) !!! ThuVan

Wadesnj, You can also use the following construct: _COMM = &quot;REPLACE FIELDS &quot; FOR x=32 to 242 IF x <> 33 AND x <> 193 && Do not clear field 33 or 193 If Type(FIELD(x))=&quot;C&quot; _COMM= _COMM + FIELD(x)+&quot; WITH [],­&quot; Endif If...