True VFP multi-threading (MTmyVFP3)

TheMSsForum.com: The Microsoft Software Forum

The MSS Forum ‹ Exchange Fox
- Archive
  - Biz
  - MCSE
  - CRM
  - Drivers
  - Framework
  - ADO
  - ASP
  - Compact
  - Forms
  - Dotnet
  - C#
  - VB
  - FontpageGen
  - Excel
  - WorkSheet
  - Exchange
  - Setup
  - Fox
  - Fontpage
  - ASP
  - IIS
  - Entourage
  - Money
  - Messanger
  - PocketPC
  - Powerpoint
  - Project
  - Publisher
  - Excel
  - VB
  - Security
  - Portal
  - Services
  - SQLServerDev
  - SVCS
  - SQLServer
  - VB
  - VC
  - MFC
  - ExcelGen

- Previous
  - 1
    - It's All Too Much Hello and thanks for the help. It has just dawned on me that I need a database of my forms, prgs, classes, projects, etc. I am a one man shop and I have this problem so I imagine that larger shops have it worse than I do and I'm sure that someone must have solved the problem. What I'm dealing with is not being able to remember the name of the form, program, report, project, class, etc. that I'm looking for even though I use fairly descriptive names. Is there a feature of VFP that I'm not using that would help me with this? Is there some other tool that some of you are using to catalog your development? I don't think I need a VCS. The ones that I've looked at are more oriented to managing versions and not cataloging software. What, if anything, are you doing if you have a large number of code files that you need to organize? Thanks, Jeff Tag: True VFP multi-threading (MTmyVFP3) Tag: 241290
  - 2
    - Modified Structure of DBF file Hello, I modified Structure of a DBF table by changing names of a few fields or changing field type from Currency to Number for a few fields, the sequence of fields was not changed. However as I browse the table the name changed fields and Type changed fields are visible on the right. Their position is right as previously if I see the structure by "Modify Structure", however visually in browse mode the modified fields are visible on right. I will look forward to your guidance for resetting the view to normal, so that the fields appear in the same sequence in browse mode as in the Modify structure mode. With Rgards S Bans Tag: True VFP multi-threading (MTmyVFP3) Tag: 241282
  - 3
    - Multiple monitor support Trying to write a custom presentation application.. In a dual or multiple monitor system, is it possible to direct a form to a specific monitor at runtime? Any help appreciated John Davy Tag: True VFP multi-threading (MTmyVFP3) Tag: 241279
  - 4
    - SQL Calling Methods I am doing some grouping in SQL with the grouping determined by a method call (because the grouping is user-defined and quite arbitrary). So far, so good. Are there any pitfalls that I need to watch for? I do not need to do this, but is it still dangerous to move a table pointer even if one restores it? Sincerely, Gene Wirchenko Computerese Irregular Verb Conjugation: I have preferences. You have biases. He/She has prejudices. Tag: True VFP multi-threading (MTmyVFP3) Tag: 241275
  - 5
    - CDO logs? I am using CDO to send mail. Does anyone know the default mail server it uses? Is there a log file associated with the messages? All of the mail I sent is HTML and upon delivery a few of the href links are getting a blank space before a character and an exclamation point after which breaks the link. I notices this occurring after a K9 and a D3 combination. I am trying to pinpoint where this is breaking. I did keep a text file of the html messages that were sent and the characters in the text file are fine. I would like to see the actual message as it went out. Tag: True VFP multi-threading (MTmyVFP3) Tag: 241269
  - 6
    - Visual Fox Pro 9 - Text is messed up. I am trying to help a friend who is a developer. She is on version 9, and has service pack 2. She is running on Vista. Any way her text on the screen looked like it was "melting" for lack of a better term. I've had her run a virus scan. It had none. The text on the left side of the screen is fine, as the text goes across the screen it droops lower on the screen. This is true of menus as well. Any help? Thanks. Lee Tag: True VFP multi-threading (MTmyVFP3) Tag: 241264
  - 7
    - progress bar Hi I have a large app with lots of pictures and pages. It takes 10 -15 seconds to be visible. To keep users from clicking and clicking, I want to display a progress bar. My problem is if I run the program for the progress bar at start, the form still doesn't show (10-15 sec) until after the progress bar is done. How can I run both at the same time? I have a start program that calls the form. Thanks Sherry Tag: True VFP multi-threading (MTmyVFP3) Tag: 241258
  - 8
    - Extracting user/password from ODBC *.ODC file? We have several programs that connect to our backend SQL Server using VFP 6.0 as the front end. In each of these programs, we created a configuration requirement to enter the ODBC data source name, the username and password for the SQL connection, all of which is used in the connection string to the SQL server. In an effort simplify the installation requirements for each program, it would be nicer if we could just specify the data source name, or perhaps select the ODBC *.odc file, then have the program itself get the username/password from the *.odc file. Has anyone ever done this? Can anyone provide code samples or links to same that would let us parse an *.odc file or extract the username/password from a configured ODBC connection in VFP 6.0 some other way? Thanks. Tag: True VFP multi-threading (MTmyVFP3) Tag: 241257
  - 9
    - Totals under 500 using SQL I have a table of donations, all random amounts but each one is under 10.00 I need to create a cursor that aggregates these into totals, each of which must be under £500. In manual terms, go through the list, adding up each donation with a calculator until the next donation would take it over £500, then put the entry into the cursor then continue through the list. The resulting cursor might have 8 records in it, each with a total of between 490 and 500. As a cherry on the cake it would be nice if the cursor also showed how many donations had made up each total. Is there any way these can be done via SQL - at the moment I am disappearing down a black hole of do while, skips and exits Sincerely Stephen Tag: True VFP multi-threading (MTmyVFP3) Tag: 241256
  - 10
    - Embed Acrobat in a Form - DoVerb problems When doing an AddObject with an olecontrol and I use the Acrobat reader so that it is embedded in my form something strange has occurred. For some reason, I cannot type in textboxes and I cannot type in combo boxes. I can select using the down arrow of a combo box but I can't seem to typed. Is as if the olecontrol as somehow locked the form. In fact, even if I place a different form over that form and it is covering the Acrobat ole object, it seems to disable the textboxes until I move the second form. Has anyone else experienced anything like this with any OLE objects? I'm still using VFP 6/sp3. Is there anything I can do or set or change so that this does not happen? Perhaps there is another way to embed an acrobat object in a form not using doverb or maybe some other way? Thanks, Mike Tag: True VFP multi-threading (MTmyVFP3) Tag: 241243
  - 11
    - VFP9: Parsing a String Is there a function for parsing a comma-delimited string into an array of substrings? I thought there was, but I can not find it in the docs. Example: "abc,,def,ghi," would return an array of elements: "abc" "" "def" "ghi" "" Sincerely, Gene Wirchenko Computerese Irregular Verb Conjugation: I have preferences. You have biases. He/She has prejudices. Tag: True VFP multi-threading (MTmyVFP3) Tag: 241242
  - 12
    - padl() gaff refresher needed I know I'm supposed to use transform(nVar, "@L 99") to turn 1 into "01" instead of padl(nVar, 2, '0') .... but I just ran into "1." and I don't remember what setting causes the padl() idea to fail. Please remind me. Tag: True VFP multi-threading (MTmyVFP3) Tag: 241239
  - 13
    - Date field update Sir, I have a table with 2 fields as data type date. I have to append the records from text file with date shown in the file as 01-JUN-2008. I tried different date settings but date fileds are not updated and kept blank only. I tried with short date settings in the control panel also. Which shows the date i want as 01-Jun-2008 but still the fields are not updated & has the value blank. This is very unusal as we may require the different date setting during the programme execution. Bankim Tag: True VFP multi-threading (MTmyVFP3) Tag: 241236
  - 14
    - Validating a DBC After opening a DBC I issue: VALIDATE DATABASE RECOVER I got the message: Tag not found (structural CDX). Do you want eliminate it or cancel validation? I realize that the father table primary key and a sister table CDX are lost. How I can by code reindex these tables and rebuild the proper relations and IR ? Thanks. Alejandro Fernandez Tag: True VFP multi-threading (MTmyVFP3) Tag: 241233
  - 15
    - DBC internal consistency error - FP crash I got this immediately after issuing VALIDATE DATABASE (which reported no problems). Now in the database designer, all the field names are shown as "??". Before validating, everything seemed fine. Some "validation"! Now I cannot get rid of the message, keeps popping up again after I click OK. Nothing to do but kill FP with the Task Manager. Too bad too, because I have unsaved changes in a prg file. If anyone has advice, that's fine, but mostly I'm venting. Dammit! VFP9SP2 Tag: True VFP multi-threading (MTmyVFP3) Tag: 241231
  - 16
    - Sub classing question (vfp 9 sp1) I have subclassed all the base classes, and customized some of them. Based on prior experience, however, it seems that I don't want to build a new project with this set of classes, but rather, but rather to sublcass them and create a new base set for the new project. How do you do this without going one by one? Thanks Tag: True VFP multi-threading (MTmyVFP3) Tag: 241223
  - 17
    - Code signing - how to digitally sign VFP apps? Anyone know how to do that? Tag: True VFP multi-threading (MTmyVFP3) Tag: 241220
  - 18
    - Local or not Local There seems to be a gap in the Local implementation in VFP. Thought it might be worth to share, at least I did not know about it until Surinder Singh wrote about it in the foxite.com forum. In VFP9 SP2 the following test indicates that content of a Local variable declared in the calling procedure is visible for a modalForm.control.ControlSource although IMO it should not. Works with an SCX form, too: * local_or_not_local.prg LOCAL testLocal testLocal = "local value" testUndeclared = "undeclared/private" LOCAL loForm as Form loForm = CREATEOBJECT('TestForm') loForm.Show(1) Return DEFINE CLASS TestForm as Form ADD OBJECT txtTest as Textbox WITH ; Left = 50, Top = 10, ControlSource = "m.testLocal" ADD OBJECT cmdTest as CommandButton WITH ; Left = 50, Top = 50, Height = 24, Caption = "Scope Test" PROCEDURE cmdTest.Click MESSAGEBOX( "VARTYPE(m.testLocal): " + VARTYPE(m.testLocal) ) MESSAGEBOX( "VARTYPE(m.testUndeclared): " + VARTYPE(m.testUndeclared) ) ENDPROC ENDDEFINE * Regards -Stefan Tag: True VFP multi-threading (MTmyVFP3) Tag: 241213
  - 19
    - textbox.nulldisplay is ignored in grid I can't get textbox.nulldisplay to work if the textbox is in a grid column. Actually, what I really want is to have column.nulldisplay, or a column format code that addresses nulls, but there don't seem to be such things. Am I out of luck? Tag: True VFP multi-threading (MTmyVFP3) Tag: 241201
  - 20
    - Container Toolbar My boss actually had our container class docked on the toolbar and dropped the appropriate container into our form. How did she do this??? PSULionRP Tag: True VFP multi-threading (MTmyVFP3) Tag: 241196
  - 21
    - Copying an Existing Project Bear with me here...Newbie on board... What is the best way to copy an existing project in order to create a new .PJX I have to do??? I want ALL the class libraries to get copied over to this new project. Is this done in FoxPro or through Windows Explorer??? Thanks. PSULionRP Tag: True VFP multi-threading (MTmyVFP3) Tag: 241191
  - 22
    - Corrupted database in vfp 9 sp1 I have a database that is really just a set of definitions for an odbc connection. That is, it has the connection and a few view definitions. If I try to open it, I get a message that it has become corrupted and must be repaired before using. Unfortunately, since I can't open it, I'm not quite sure how to go about repairing it! A quick search of the help didn't turn anything up. Is it worth worrying about, or is it better to just restore it from yesterday? Thanks Tag: True VFP multi-threading (MTmyVFP3) Tag: 241187
  - 23
    - print jpg in app Hi I have a very larg application. Looks like a book. Can I create code to print a jpg when I right click the picture. If so how? Thanks Sherry Tag: True VFP multi-threading (MTmyVFP3) Tag: 241185
  - 24
    - New VFP project at Codeplex - DynamicDNS New Visual Foxpro project at Codeplex called DynamicDNS: If you've ever been stuck with a dynamic IP and wished you could assign whatever the IP is to a static name, this may be the solution for you. Also good examples of foxpro systray, timer, web page crawling and other goodies. All source code is included. http://www.codeplex.com/ddns Tag: True VFP multi-threading (MTmyVFP3) Tag: 241182
  - 25
    - IF AND Is the IF AND structure in Visual FoxPro valid??? Tell me I don't have to stack them...please... Thanks in advance. PSULionRP Tag: True VFP multi-threading (MTmyVFP3) Tag: 241176
- Next
  - 1
    - convert text file to unix Sir, I have created a text file in upload format with the help of VFP 5.00. I have used set alternate command for file name. File contents are generated with ? & ??. Is the file generated is windows output file or dos output file. & real need is how can i convert the file in Unix as in one of the third party application it requires the file to be in unix mode instead of dos. Bankim Tag: True VFP multi-threading (MTmyVFP3) Tag: 241169
  - 2
    - Report Writer - Need a Summary at bottom of last page (VFP9.0 sp2) Hi, I am producing an invoice form that may run into several pages and must have a single remittance slip at the end of the last page Is there a way to either make the summary band print at the end of the page, or to only print the page footer on the last page? - Or is there a better way? As usual, any help would be appreciated... Cheers, John Davy Tag: True VFP multi-threading (MTmyVFP3) Tag: 241166
  - 3
    - Add Tab to existing Form Learning by the seat of my pants here. I have to add a tab to a form that already has a lot of tabs on it. How do I add a new Tab??? I tried Form ==> New Property but when I added the Property Name it didn't show up on the Properties. Can anyone help me and if anyone has a crash course in Microsoft Visual FoxPro, that would be awesome. Thanks in advance. PSULionRP Tag: True VFP multi-threading (MTmyVFP3) Tag: 241163
  - 4
    - copy to .... type and ms Access Why wouldn't ms access be able to open xls's or dbf's that I create in VFP via copy to ...type xls or type fox2x ? -- -Lew The workers took the robot for Maria. Tag: True VFP multi-threading (MTmyVFP3) Tag: 241157
  - 5
    - Retrieving header and body on server from VFP XMLHTTP post I want to send data from VFP on the client to VFP on the server using XMLHTTP. I have found plenty of samples for handling the server side with PHP, but have not found any asp samples. Could someone please let me know how I need to change the code in the asp document to retrieve the header and body received from VFP. Thanks in advance John Pugh Adelaide, South Australia * VFP prg to test sending to a server and a response LOCAL lc_body,lc_received,lc_response,lc_status, lc_target_href LOCAL oHttp AS MSXML2.ServerXMLHTTP oHttp = CREATEOBJECT('MSXML2.ServerXMLHTTP') WITH oHttp lc_target_href="http://localhost/ab5_com.asp" .OPEN('POST', lc_target_href, 0) .setRequestHeader('VfpRequest', TRANSFORM(DATETIME())) * Load data into the body to be transferred lc_body='this is a dummy XML file' .SEND(lc_body) lc_status= .StatusText lc_response= .GetAllResponseHeaders() lc_received= .ResponseText MESSAGEBOX( lc_status,64,'status ') MESSAGEBOX( lc_response,64,'response ') MESSAGEBOX( lc_received,64,'received ') ENDWITH <% @ Language=VBScript %> <% ' Title: ab5_com.asp ' Subtitle: Test receiving from and sending back to VFP %> <% lc_test = Request.Form( "txtTest" ) lc_header="Retrieve header" lc_body="Retrieve body" lc_return="From asp: "&lc_header&lc_body Response.Write( lc_return ) %> Tag: True VFP multi-threading (MTmyVFP3) Tag: 241155
  - 6
    - PLEASE! EXE automation: Fox or IIS problem ? hi i wrote these few lines: define class MyTest as Custom OlePublic hello= "hello" function getHello() return hello endfunc enddefine i build the project (MyTest) as an EXE Com Server and register it with : MyTest.exe /regserver i can instantiate the com-server within VFP, with no problems but when i try to do the same in ASP (with Server.CreateObject) : the page seems hung on the client and, on the server, the TaskManager shows that the .Exe is still loaded that is, i have to kill "MyTest.exe" this is One year ago, this was easy... what happened ? is this a Fox or IIS problem ?? thanks ks Tag: True VFP multi-threading (MTmyVFP3) Tag: 241151
  - 7
    - Building with a project class I have a project class in my project to make use of project hooks when I do builds. I always check the "recompile all files" option, so I receive a "File proj_lib.vcx is in use and cannot be recomiled" message whenever I build. This is not a real big deal, I just hit the ignore button. But I was wondering if there was an easy way to avoid this and still do a "recompile all files". I've tried variations on use of the CLEAR command, but can't find anything that yields an error-free build. I suspect it's all in the timing of things since I have a good chunk of code that runs whenever a build is done (forms run to collect build details, tables are updated, printer info cleared from reports, etc). Any insights? -- TRW _______________________________________ t i m . w i t o r t _______________________________________ Tag: True VFP multi-threading (MTmyVFP3) Tag: 241148
  - 8
    - ProjectHook Creating a ProjectHook and puting it in your project. I added some code that runs each time I build the project. This works great as I often forgot to run some code to set up some data tables before I compiled. The one hangup is that the program runs when I run the Rebuild The Project and also when I make up the Win32 Executable. Is there any code like an IF that I can put in front of the program so that it only runs when I Rebuild The Project. I do not need it to run when I build the exe file. It is not harming anything but a time consumer to see the program run twice. Still using VFP8. Thanks TonySper Tag: True VFP multi-threading (MTmyVFP3) Tag: 241142
  - 9
    - Modify report in VFP 7, save, but it reverts I'm modifying a report, making the simplest of changes, being changing the font of a field expression from bold to regular, I save the report, but when I reopen it or run it, the field is still bold. What could be at play here? Dan Tag: True VFP multi-threading (MTmyVFP3) Tag: 241140
  - 10
    - SQL Comments at last! An annoyance I find in long sql statements is what I thought was the inability to break long statements into sections for commenting. Having &&'d comments off to the right of the code is annoying when there are many windows open, etc... I have finally discovered that the following works: select; afield,; anotherfield,; ; && Here is the second section of my code. ; && I think I can write as many comments ; && as I like! evenathird field,; ; && etc -- -Lew The workers took the robot for Maria. Tag: True VFP multi-threading (MTmyVFP3) Tag: 241135
  - 11
    - Dynamic call to Excel for exploded pie chart Does anyone know the paramaters for a dynamic call to Excel to create an 3D exploded pie chart? Currently I have the 3D pie chart working, but I'd rather have the 3D exploded pie chart, but can't find the code anywhere. Perhaps it can't be done dynamically? i.e. The parameter call for the 3D pie is -4102,7,2,1,0,1 in the following statement: objxlsheet.chartobjects(1).chart.; chartwizard(objxlsheet.range(objxlsheet.cells(1,1),objxlsheet.cells(pni, 2)),; -4102,7,2,1,0,1,"","","","") Tag: True VFP multi-threading (MTmyVFP3) Tag: 241131
  - 12
    - Inputbox function suddenly not working on VFP9 I have VF9 and was using the inputbox function successfully till yesterday. Now, it suddenly shows a message 'Program inputbox.prg does not exist' I haven't made any programming changes. Any ideas? Thanks Zoom Tag: True VFP multi-threading (MTmyVFP3) Tag: 241128
  - 13
    - foxpro 9.0 problem when SET REPORTBEHAVIOR 90 the report cannot show chinese at preveiw or printing how can i solve this problem ? -- Tag: True VFP multi-threading (MTmyVFP3) Tag: 241126
  - 14
    - VFPUG NYC meets 6/5 The Visual Foxpro Users Group of New York City meets Thursday, June 5, at 7 pm. in NYU's Silver building, NE corner of Washington Square, room #803. The topic is "Using MS SQL from VFP". The speaker is Jay Berardinelli. Tell guard you are going to the "computer club". Tag: True VFP multi-threading (MTmyVFP3) Tag: 241123
  - 15
    - Is VFP able to deal with fully qualified domain names? Hi All, Thanks for the help. Can VFP understand fully qualified domain names to locate files? Is there anything specific that I would need to do to use them? Thanks, Jeff Tag: True VFP multi-threading (MTmyVFP3) Tag: 241116
  - 16
    - Conditional shading of a cell using Excel Automation & VFP Need to set the background color of a cell to red if the result of the cell's formula is negative. Not sure how to do this conditionally. I know the color is set as: oSheet.Range("A1").Interior.Color = RGB(255,0,0) &&- Red Tag: True VFP multi-threading (MTmyVFP3) Tag: 241115
  - 17
    - When include tables in a project In an app I have several tables which never are updated. They have only information to be consulted. The biggest has 98 Mb, other 42 Mb and others some Kb. When can I include these non updatable tables as readonly in the project? What are the real advantages of including them? Or perhaps build a DLL with them? Thanks. Alejandro Fernandez Tag: True VFP multi-threading (MTmyVFP3) Tag: 241112
  - 18
    - Problem Creating View I'd like to create a Remote View that links four common SQL tables as shown below. ORDER HEADER | | | ------------> ORDER_ITEMS | | | | | | | | SUPPLIERS DEL_POINTS i.e. Any order can have multiple items and each item can have a list of possible suppliers AND delivery points I've tried all different sorts of concoctions of joins when trying to setup the view but none of them seem to work. I can link the tables on the appropriate fields but as soon as I try and save the view I get an error message. Could anyone point me in the right direction...either on how to create the view or what the SQL statement should be? Tag: True VFP multi-threading (MTmyVFP3) Tag: 241108
  - 19
    - Update SQL table - VFP9 Can anyone tell me - step by step - how can I update an SQL table using remote view? Or where can I find examples? Many thanks in advance. -- Sandor Tag: True VFP multi-threading (MTmyVFP3) Tag: 241091
  - 20
    - Add/Remove job into Task Scheduler Is the XP and Vi$ta Task Scheduler programmable? Anyone done work on it? -- @~@ Might, Courage, Vision, SINCERITY. / v \ Simplicity is Beauty! May the Force and Farce be with you! /( _ )\ (Xubuntu 8.04) Linux 2.6.25.4 ^ ^ 16:48:01 up 1 day 2:29 1 user load average: 3.00 3.15 3.19 ? ? (CSSA): http://www.swd.gov.hk/tc/index/site_pubsvc/page_socsecu/sub_addressesa/ Tag: True VFP multi-threading (MTmyVFP3) Tag: 241089
  - 21
    - Mixed Language reports - English & Chinese Is it possible within Foxpro to produce a report containing both English and Chinese representations of the report content? thanks pete Tag: True VFP multi-threading (MTmyVFP3) Tag: 241088
  - 22
    - How can I list all the users logged on to a server in my domain at any time? Tag: True VFP multi-threading (MTmyVFP3) Tag: 241082
  - 23
    - Troubles with an utility for DB validation (GENDBC) Un an app I have a DB with 3 tables. One with a primary key for a field CODIGO is linked to the others. I got the code generated by GENDBC (VFP7),and I´d recreated the following utility to fix and validate this DB. It worked sometimes well but now always crash. I use VFP 7 in WinXP but I must write a version for Vista too. the BD is named pacientes.dbc The tables are ingreso.dbf && primary key diagnos.dbf sintoma.dbf This is the procedure PROCEDURE reconstructorData &&& recreate a DB ** Recreate indexes and validate BD CLOSE DATAbase ALL OPEN DATABASE pacientes EXCLUSIVE remove table diagnos remove table sintoma remove table ingreso ADD TABLE ingreso =USE2("ingreso") SET COLLATE TO 'MACHINE' *INDEX ON CODIGO TAG HAV FOR TIENETABLA=.T. ALTER TABLE 'INGRESO' ADD PRIMARY KEY CODIGO TAG CODIGO ***** Change properties for INGRESO ***** CREATE TRIGGER ON 'INGRESO' FOR DELETE AS __ri_delete_ingreso() CREATE TRIGGER ON 'INGRESO' FOR UPDATE AS __ri_update_ingreso() ***** Create each index for DIAGNOS ***** ADD TABLE diagnos =USE2("diagnos") SET COLLATE TO 'MACHINE' INDEX ON CODIGO TAG CODIGO ***** Change properties for DIAGNOS ***** CREATE TRIGGER ON 'DIAGNOS' FOR INSERT AS __ri_insert_diagnos() CREATE TRIGGER ON 'DIAGNOS' FOR UPDATE AS __ri_update_diagnos() ***** Create each index for SINTOMA ***** ADD TABLE sintoma =USE2("SINTOMA") SET COLLATE TO 'MACHINE' INDEX ON CODIGO TAG CODIGO ***** Change properties for SINTOMA ***** CREATE TRIGGER ON 'SINTOMA' FOR INSERT AS __ri_insert_sintoma() CREATE TRIGGER ON 'SINTOMA' FOR UPDATE AS __ri_update_sintoma() *************** Begin Relations Setup ************** *FUNCTION MakeRelation_1 ALTER TABLE 'DIAGNOS' ADD FOREIGN KEY TAG CODIGO REFERENCES INGRESO TAG CODIGO *ENDFUNC *FUNCTION MakeRelation_2 ALTER TABLE 'SINTOMA' ADD FOREIGN KEY TAG CODIGO REFERENCES INGRESO TAG CODIGO *ENDFUNC *FUNCTION MakeRI ***** Referential Integrity Setup ***** && Now open BD as a table to add it stored procedures with RI CLOSE DATABASES all && It don´t close this BD USE IN 'PACIENTES.DBC' IF NOT USED('PACIENTES.DBC') USE 'PACIENTES.DBC' && Trouble. Don´t open the DB as a table ENDIF SELECT pacientes g_SetSafety = SET('SAFETY') SET SAFETY OFF LOCATE FOR Objectname = 'StoredProceduresSource' IF FOUND() APPEND MEMO Code FROM [PACIENTES.krt] OVERWRITE REPLACE Code WITH SUBSTR(Code, 70, 21726) ENDIF LOCATE FOR Objectname = 'StoredProceduresObject' IF FOUND() * APPEND MEMO Code FROM [PACIENTES.krt] OVERWRITE REPLACE Code WITH SUBSTR(Code, 21796) ENDIF SET SAFETY &g_SetSafety * USE LOCATE FOR ObjectType = 'Table' AND ObjectName = 'diagnos' IF FOUND() nObjectID = ObjectID LOCATE FOR ObjectType = 'Relation' AND 'codigo'$Property AND 'ingreso'$Property AND 'codigo'$Property AND ParentID = nObjectID IF FOUND() REPLACE RiInfo WITH 'CCR ' ELSE ? "Could not set RI Information." ENDIF ENDIF LOCATE FOR ObjectType = 'Table' AND ObjectName = 'sintoma' IF FOUND() nObjectID = ObjectID LOCATE FOR ObjectType = 'Relation' AND 'codigo'$Property AND 'ingreso'$Property AND 'codigo'$Property AND ParentID = nObjectID IF FOUND() REPLACE RiInfo WITH 'CCR ' ELSE ? "Could not set RI Information." ENDIF ENDIF USE OPEN DATABASE pacientes EXCLUSIVE VALIDATE DATABASE noco PACK DATABASE ********************************* Thanks for your help. Alejandro Fernandez Tag: True VFP multi-threading (MTmyVFP3) Tag: 241081
  - 24
    - Fieldtypes in ADOdb Hello, Group. I use ADODB from VFP 9 to retrieve values from excel spreadsheets. The spreadsheets are unknown in advance. Everything goes fine, but there is one problem. I can retrieve the data type for a column using: sType = oRs.Fields(ii-1).type However, even if this type is 5, which is a numeric type, the column can include text mixed with numbers. In such cases I want to get the values as text. How can I do this? I inclulde the code I use (in summary) to go through the spreadsheet. TIA Krister *!* (sample code) cFil = '<my xls file>' strConnection = "Driver={Microsoft Excel Driver (*.xls)};DriverId=790;Dbq=" + cFil + ";" oConn = Createobject('ADODB.Connection') oConn.Open(strConnection) oRs = Createobject('ADODB.recordset') cOpensheet='Sheet1' strSQL = 'SELECT * FROM [Sheet1$]' oRs.Open(strsql, oConn) nFlt = oRs.fields.count oRs.MoveFirst Do While Not oRs.Eof For ii=1 To nFlt sTyp = oRs.Fields(ii-1).type eValue = oRs.Fields(ii-1).value next oRs.movenext() Enddo oRs.Close() oConn.Close() Tag: True VFP multi-threading (MTmyVFP3) Tag: 241072
  - 25
    - gotfocus Firing Twice I have one form in my app which is used to control invoicing. It has a number of functions that are internal and some that are external. These functions are started by the operator clicking a button. The form also has some data about the current client. Some of this data can be changed. It should be saved before doing something. With most buttons -- the exceptions are unimportant -- the gotfocus of the button contains code to save the client data. The valid contains the code to run. In the case of the external functions, other forms are created. The problem that I have is that when these functions return, the focus goes back to the first form. gotfocus fires a second time. I do not want it to, or I want to avoid the save. I think I have a solution. I can set a status flag in the valid's code which the save routine will check to determine whether it should save. At the end, the save routine would reset this flag. This seems somewhat convoluted. Is there something I am missing, or is this the way to go? Sincerely, Gene Wirchenko Computerese Irregular Verb Conjugation: I have preferences. You have biases. He/She has prejudices. Tag: True VFP multi-threading (MTmyVFP3) Tag: 241062

A new version of MTmyVFP (True VFP multi-threading) using Calvin Hsia's
latest MT class including a few tweaks:
http://www.codeplex.com/mtmyvfp
There's still room for improvement, though. Instead of a count-down while
the thread(s) is going, a nice Progress bar like the one in VFPX could
probably be used. Also, it probably wouldn't take much to make this backward
compatible to VFP7. However I'll leave these improvements to others.

Calvin Hsia's original source and background info:
http://blogs.msdn.com/calvin_hsia/archive/2006/05/23/605465.aspx

Top