Visual FoxPro >>Show text file in a form.

Show text file in a form.

Index ‹ Visual FoxPro ‹ Visual FoxPro General

Previous
- 1
  - Visual FoxPro General Guidance Required for VFP - MSSQL upgradation...
    Hi all,
    
    I've developed a VFP application in vers. 6.0. Now that the client wants the same with MS SQL / Oracle. Please someone tell me the list of atricles and other notes i've to go through..... I'm ok with SQL querries....
    
    Please suggest me regarding the -Remote views, SPT's......
    
    The application as a whole has about 2 GB of data in VFP.....
    
    It's a multi-user application....running on VFP 6.0 ./ WIn2000 Platform.
    
    Thanks in advance...
    
    -Markish
- 2
  - Visual FoxPro General switching pages in pageframe
    I want to be able to detect when I am clicking on a page tab to switch pages, so I can control which portions of a lostfocus event on an object in the current active page will execute.
    
    I appears that I can't use mouseenter on the target page, like I do on command objects.
- 3
  - Visual FoxPro General FoxPrint font.In order for users to be able to use a font, is it enough for it to reside in the working folder of my VFP app, or do I need to install the actual font
    
    Thanks again,
    
    Aleniko
- 4
  - Visual FoxPro General Set printer to NAMEHi;
    
    I am using "Set printer to NAME getprinter()" to select a printer.
    I also have tried "Set printer to name \\somePC\someprinter"
    
    In both cases an error is produced. "Error accessing print spooler"
    
    The network is a win2003 server with both XP pro and Win98 stations.
    The printer is on a win98 station.
    
    I was wondering if I should use "set printer to \\somePc\somePrinter" without the NAME clause
    
    Thanks.
- 5
  - Visual FoxPro General VFP TIMER MEMORY PROBLEM
    Hi All,
    
    Our product is a 24/7 Hospital product and i face a critical issue in Timer control.
    
    The below code is a small example of my process, i created an exe of this code and this runs as a process in the task manager. The issue is this eats up memory consistently in time intervals.
    
    if this exe is ran for days the memory is used is like in MBs and slowing down the PC's performance.
    
    TimerCtrl()
    
    procedure TimerCtrl
    
    LOCAL poTim
    
    poTim = createobject( "iTimer")
    
    poTim.interval = 1000
    
    poTim.enabled = .t.
    
    read events
    
    endproc
    
    *=========================================================================================================================
    
    define class iTimer as timer
    
    function timer
    
    RETURN
    
    ENDFUNC
    
    enddefine
    
    I tried using the memory allocation command in the Timer Event to limit to 6800 KB but it didnt work.
    
    = sys(3050, 2, 6800 * 1024)
    
    My scenario is like this we have some files in a folder from another application which i have to access constantly in a time interval of one second and read the files separate the tokens and put in my Applications DBF.
    
    do we have any other way we can do this in VFP.
    
    i tried with DO While .t. Loop but its eating up the processor time upto 50% which is too costly for our customer.
    
    Please suggest me some solution where i can limit the memory usage.
    
    Kindly Advice me.
    
    Thanks in advance
    
    -Venkatram
- 6
  - Visual FoxPro General Wait Window "" timeout 0.01 and Sleep(10) in VFP-9 At times my VFP processing requires *rest(s)* it seems. (report processing/printing, various functions, .BeforeRowColChange events, etc.)
    
    I've *discovered*:
    
    Wait Window "" timeout 0.01 && ... helps at times
    
    while the preferred:
    
    Windows API Sleep() routines && ...I've had NO success with API Sleep() declarations
    
    Any general or specific feedback concerning *rest(s)* in VFP-9 is appreciated.
- 7
  - Visual FoxPro General Where can I get CodeMine 7.1 or later
    Hello all, I am looking for CodeMine 7.1 or later. Where Can I get it
    
    Is it free Or can I get for free
- 8
  - Visual FoxPro General Philadelphia VFP User Group--Wednesday, August 9The Philadelphia Visual FoxPro User Group will meet on Wednesday, August 9, 2006 at 7PM at Valley Forge Pension Management, 715 Twining Road, Suite 202, Dresher, PA 19025. Anyone interested can meet for dinner at 6 PM at Rocky's in the shopping center across the street.
    
    Speaker: Kevin S. Goff
    Kevin S. Goff is the founder and Principal Consultant: Common Ground Solutions. He has 18 years experience - NET/SQL Server/Crystal Reports/Visual FoxPro and is a 2005-2006 Microsoft .NET MVP for C#. Kevin is the author of “The Baker’s Dozen” series in CoDe Magazine (Productivity Tips for .NET, Crystal Reports, and T-SQL) and one of the 2005 Personalities of the Year on the Universal Thread for .NET and SQL Server.
    
    Kevin's current activities include multiple .NET project contracts, writing regularly for CoDe magazine, a book contract with Apress on Reporting Solutions in VS2005, a contract to write exam questions for VS2005 certification exams, speaking at 2005/2006 Dev TeachOffsite link to http://devteach.com, MSDN CodeCamp, and .NET User Groups, the Common Ground Framework for .NET (free framework). He has awards and citations from the Dept. of Agriculture and large corporations.
    
    Reach him at www.commongroundsolutions.net, kgoff@commongroundsolutions.net. Read his blog at http://www.TheBakersDozen.net.
    
    Topic: Introduction to .NET (from a VFP perspective)
    This discussion will include: an overview of the VS2005 environment, and general project structure; C# or VB ; Windows Forms; Creating classes/subclassing Winform controls; Data binding and data binding interfaces; Building a data access layer; Typed datasets; Distributed architectures with web services and remoting; String and date operations; Reflection and type discovery and uses of interfaces; Delegates and events; Miscellaneous tips
- 9
  - Visual FoxPro General Guidance Required...
    Hi all,
    
    I've developed a VFP application in vers. 6.0. Now that the client wants the same with MS SQL / Oracle. Please someone tell me the list of atricles and other notes i've to go through..... I'm ok with SQL querries....
    
    Please suggest me regarding the -Remote views, SPT's......
    
    The application as a whole has about 2 GB of data in VFP.....
    
    It's a multi-user application....running on VFP 6.0 ./ WIn2000 Platform.
    
    Thanks in advance...
    
    -Markish
- 10
  - Visual FoxPro General Grid columns populated with incorrect dataI have a grid with a bunch of columns. First, I suspect that the control source for the columns in this grid 'resets' itself to 'none', but I am not sure about this.
    
    Second, When I manually fill in the control source for the columns, some of the columns get populated by the next field in the cursor regardless of what I have specified in the control source.
    
    Help...
    
    Aleniko
- 11
  - Visual FoxPro General Microsoft Access to Visual FoxPro? Hey again guys, it's been a while.
    
    I am here for a co-worker of mine. We have to do a database to database transfer from Access to FoxPro.
    
    The thing is, our DBA wants us to write a program for this; however, we just cannot find anything for answers.
    
    My question for you is: would this be possible to do a database transfer If so, what am I missing here Something must be right under my nose and I am not seeing it.
    
    Thanks in advance!
- 12
  - Visual FoxPro General Edit field in Browse do not respond
    *=====================================
    In the following module Item code entered in the "Datafile"  is checked with codes in stock master in the order of codes. The code exists in the Stock master, and the Return 1 is effective. But the cursor is not moving to enter the next Name field.
    *==========================
    SELE 1
    USE STKMAST ORDE CODE
    SELE 2
    DATAFILE
    *---------------- 50 Blanks added to Datafile
    CTR = 1
    DO WHILE CTR <= 50
           APPE BLAN
           CTR = CTR+1
    ENDDO
    *----------- Data Entry
    GO TOP
    BROW FIEL SRNO:H="Ser#", CODE:H="tem Code";
    :V=CHKITEM(CODE)>0,:E="Code Error":F,NAME:H="Customer Name"
    CLOS ALL
    RETU
    *----------------------- Code Check
    PROC CHKITEM
    *-------
    PARA CD
    SELE 1
    SEEK CD
    IF FOUND()
       SELE 2
       RETU 1
    ENDIF
    *-------
    SELE 2
    RETU 0
    *==================
- 13
  - Visual FoxPro General Views
    I am trying to write a VFP Remote View that selects data from a Microsoft Database, unfortunately some of the mssql fields are reserved word (IN FOXPRO) so the VFP will not allow me to inlude these fields in the view.
    
    For example this remote query pulling data from MSSQL by a foxpro view
    
    select table1.pers_name, table1.pers_address, table1.values from table1
    
    returns an error because of the word Values is a reserved word in foxpro.
    
    Is there a way to get around this.
- 14
  - Visual FoxPro General "When" firing after "Valid"Hi all;
    
    I am temporarily using an older SPR in VFP 9 as it is. I have had some problems with the code, and after using the debugger I have learned that in a "Get, when, valid" command, the "When" fires AFTER the "Valid".
    
    Anyone had experienced a simillar probem Any ideas why
    
    Thanks,
    Aleniko
- 15
  - Visual FoxPro General Have problem getting the correct local currency dollars in the Report Designer.
    http://sg.geocities.com/ms_visualfoxpro6/index.htm
    
    In Figure 2 diagram, this is the outcome of the report designer when running the form (figure 1).
    
    I marked brown circle on the outcome result. It shld generate S$ instead of US$. In the report designer, I type " iif(df_prcur='US$ ',df_fgst,df_gst) " in the report expression box, hoping to get the S$ if the total amount of any invoices is only printed in US$.
    
    I'm not sure whether I have to add the coding line in the form (figure 1) to show the local currency..
    
    Please guide me where I go wrong. Thank you.

Author

Message

Aleniko29139

Posted: Visual FoxPro General, Show text file in a form.

Top

Hi;

I need to show the user a text file on a form. Is there a better way of doing this than using low level file commands to fetch the textfile and then use an editBox

The size of the text file can't be very large - 10-20K or so.

Thanks.

Visual FoxPro1

Alex Feldstein

Posted: Visual FoxPro General, Show text file in a form.

Top

To show, an EditBox is probably the best suited control. You might like to make it readonly with a light gray background.

To gather data, the easiest and fastest is to load the file's contents to a memory variable, or to a property, or you could put it in a cursor or table's field, and bind it to the editbox control.

cFileContents = FileToStr(full_path_and_filename)

Aleniko

Posted: Visual FoxPro General, Show text file in a form.

Top

FiletoStr() is what I was looking for. Thx.

Index ‹ Visual FoxPro ‹ Visual FoxPro General

Next
- 1
  - Visual FoxPro General VFP Preprocessor Problem
    i have probelem with VFP9 preprocessor !
    
    i would like to define new statements syntx to the language.
    
    i want a replacement for #command statement (like in Clipper lanaguge) ,
    
    any helpful idea
    
    Greetings,
- 2
  - Visual FoxPro General Is there a way to save the Local Windows?
    I'm using Visual Foxpro 9 SP1.
    
    I want to save the Local Windows information during debugging. Is there a way to do it
    
    Thanks.
- 3
  - Visual FoxPro General System time - synchronizing, displaying
    Hi experts.
    
    Does anybody know how to get the real time from internet. I want to have the real updated time in my application. Second task is to changing the system time. How can I do that Third task is how to display time in form for example in textbox. I know the way with timer but if there is any other way I will be glad to know it. But the consequence is in the order I have written. Mainly the getting real time from internet.
    
    Thanks
- 4
  - Visual FoxPro General System resolutionHi.
    
    How can I find out what the system resolution is, and how can I change it via FoxPro
    
    Thanks
- 5
  - Visual FoxPro General VFP menu bar problem
    i have problem with VFP menu
    
    when i call my menu to work in VFP IDE and i write
    
    set sysmenu to rtljustify
    
    i have the required result
    
    but when i call the menu to work in top level form
    
    do mymenu.mpr with thisform, .t.
    
    and i write , set sysmenu to rtljustify
    
    i don't have the required result
    
    any soultion for this problem
    
    Greetings,
- 6
  - Visual FoxPro General fix corrupted dbf hello,
    
    i'm opening a table in the command window and it display a message that the table is corrupted and needs to be repaired before it can be use again. Can anyone help me fix the dbf Is there a free software to fix the corrupted dbf
    
    any help will be greatly appreciated
    
    thank you
    
    jason
- 7
  - Visual FoxPro General Command contains unrecognized phrase/keyword VB.Net
    Hi
    
    I am facing the above problem when I am trying to insert a MEMO data in to the VFP table. I am using a OLEDB connection string in VB.Net
    
    My data present in the file is
    
    //------------------------------
    
    Pen
    
    Pencil
    
    Erasier
    
    Sharpener
    
    //----------------------------
    
    Each an every line has a (Vbcrlf) that is a line feed in it I need the File as in the above format to be stored in the memo file without any change
    
    I get the data from the file by the following procedure
    
    ----------
    
    Dim lstrData As New String(" ", 500)
    
    FileOpen(1, "C:\soc.txt", OpenMode.Binary)
    
    FileGet(1, lstrData)
    
    FileClose(1)
    
    --------
    
    I get the data in the lstrdata Now I use sql statment to insert into the vfp table
    
    sql = "Insert into edifile (theirref,qtnord ) Values (' " & lstrdata & "', 'RRTo')
    
    Public gconnMDB_I As OleDb.OleDbConnection
    
    gconnMDB_I = New OleDb.OleDbConnection
    
    gconnMDB_I.ConnectionString = lstrConnString
    
    Call gconnMDB_I.Open()
    
    Dim cmd As New OleDb.OleDbCommand
    
    cmd = New OleDb.OleDbCommand(sql, gconnMDB_I)
    
    cmd.ExecuteNonQuery()
    
    Once cmd.ExecuteNonQuery is excuted the following error occurs
    
    Command contains unrecognized phrase/keyword VB.Net
- 8
  - Visual FoxPro General Shellexecute on win98 / XP / 2003 server.does Shellexec behave differently on win98 than on XP
    
    I have a shellexecute command to unzip a zip file. The 'pfiles' folder the zip file resides in is under the folder the application runs in:
    
    =ShellExecute(0,"OPEN","unzip.exe","pfiles\01.zip","",1)
    
    On XP machines it works fine.
    
    On win98 machines it fails because it won't find the pfiles folder.
    
    Thanks.
- 9
  - Visual FoxPro General Problem after upgrading to VFP9 from VFP7
    The following procedure works fine VFP7. When a second user tries to lock the IDFILE before the first one unlocks it he receives the message and the PROCEDURE returns.
    
    After upgrading to VFP9 the second user instead of the previous message he gets a message from VFP "An error has occurred: File is in use by another user. etc". He gets a similar message if he even tries to open for read the IDFILE while in VFP7 there was no such problem.
    
    PROCEDURE PR_EYRET
    open database data1
    SET DATABASE TO data1
    USE IDFILE IN 0
    SELECT IDFILE
    IF !FLOCK()
    MESSAGEBOX("The file is not available. Try later",16)
    RETURN
    ENDIF
    .
    .
    * Do something.
    .
    UNLOCK
    RETURN
    
    Can somebody help me
- 10
  - Visual FoxPro General Same Report...Different Printers? Hi all,
    What may be causing the same report file to print differently on different printers We are developing the reports in VFP9 and we make sure that tag and tag2 fields are emptied before compiling the exe.
    The differences are various like:
    1. Difference in left/top margin.
    2. Extra blank spaces left out in the middle of the report on certain printers.
    3. Shift in borders printed along the edge of the report.
    
    The printers in question are HP LaserJet 4000, Brother MFC 3900, ADOBE PDF, Microsoft Fax/Document Image Writer. The latter 2 always leave a very small left margin.
    All thoughts are appreciated.
    Bini
- 11
  - Visual FoxPro General Speeding up SQL Statements As per Tamar Granor's interest, I'm curious if I can speed this up a bit; it takes almost 3 seconds of user-time on an IBM X41 tablet (SANS networking). Behold:
    
    Select Allt(patient.first_name)+' '+ patient.last_name As PatientName,Record From patient;
    UNION (Select Allt(patient.last_name)+', '+ patient.first_name As PatientName,Record From patient);
    UNION (Select Distinct Alltrim(Proper(patient.Record))+' '+Alltrim(patient.last_name)+', '+Left(patient.first_name,1) As PatientName,Record From patient Where patient.Record <> (' '));
    UNION (Select Distinct Alltrim(Proper(visit.insur_no))+' '+Alltrim(visit.last_name)+', '+Left(visit.first_name,1) As PatientName,Record From visit Where visit.insur_no <> (' '));
    UNION (Select Distinct Alltrim(Proper(visit.sec_ins_no))+' '+Alltrim(visit.last_name)+', '+Left(visit.first_name,1) As PatientName,Record From visit Where visit.insur_no <> (' '));
    ORDER By PatientName Into Cursor cPatient
    Index On PatientName Tag 'PtName' &&test only
    
    The visit table is 30,000 records and contains a bloated visit.fpt file (about 125Mb).
    The patient table contains only about 5000 records with about 1/10th the .fpt bloat.
    Both tables are routinely packed and/or reindexed and remain uncorrupted.
    
    Note: These tables have about 50 indexed fields and 15 indexed fields respectively.
    
    Delete() is indexed (with reserve) as is Recno().
    
    Any thoughts are much appreciated in advance.
- 12
  - Visual FoxPro General vfp command to eject a cash drawer hello,
    
    i would like all you experts to help me out in figuring out how eject a cash drawer after finalizing the transaction. I need it to be done in vfp.
    
    my second question is, what is the command to write the code to print the transactioin in the receipt printer.
    
    thank you in advance
    
    Jason
- 13
  - Visual FoxPro General Database name in subreport with Visual Foxpro 9 with Crystal reports 9
    Hi,
    I am using Visual Foxpro 9 with Crystal reports 9
    any one could help me to change the data source of my subreport.
    
    I am using a native Xls data type in my crystal report.
    I have subreport having another datasource with native Xls data type also and attched to the main report.
    
    I could change the data source of the my main report but
    the problem is how to change the data source for the subreport.
    
    I am using this code to create the report from Vfoxpro:
    *--------------------
    Public CRApplication
    Public CRReport
    Public CRParm
    CRApplication = createobject ("CrystalRuntime.Application")
    CRReport = createobject ("CrystalRuntime.Report")
    CRReport2 = createobject ("CrystalRuntime.Report")
    REPNAME=REPSPATH+'SURVEY.rpt' && report file name for the main report
    REPNAME2=REPSPATH+'ssurvey.rpt' && report file name for the subreport
    
    CRReport = CRApplication.OpenReport(REPNAME) &&*!* Open up the report
    **-- determin the DATA SOURCE FILE
    myLocalDataFile=(DataPATH+'XLFile.xls')
    
    *-- to change the database source for the main report
    CRReport.Database.Tables(1).ConnectionProperties.Item("Database Name") = myLocalDataFile
    *---
    *-- I need the exact code here to change the data source of the subreport
    *---
    DO FORM PrevForm
    
    WITH PrevForm.OleControl1
    .reportsource = CRReport && *!* Attach the report to the viewer
    .ViewReport && Start the Crystal Viewer
    ENDWITH
    
    *--------------------
    any one could help me !!.
    Thank you.
- 14
  - Visual FoxPro General Uppercase in Edit Box Somebody how can I force to Uppercase in a Edit Box . This control doesnt have a Input Mask property, and dont know if the Format property can make it.
    Thank you in advance.
- 15
  - Visual FoxPro General VFP9 CursorAdapter ADO does not respect WhereType setting
    After months of working with Cursor Adapters and having a whereType set to (1 – DB_Key only), I noticed when issuing TableUpdate() and the DataSourceType is set to ADO; regardless of the WhereType setting, the update command is always build with (3 - DB_KeyAndModified). I have noticed this after getting “Update Conflicts” which I did not anticipate because I had the whereType set to 1.
    
    I also used SQL server Profiler to confirm this, additionally, this does not occur when the DataSourceType is set to ODBC.
    
    Does anyone else have this problem, any insight would be appreciated.
    
    VFP 9 SP1
    SQL 2005 Standard
    
    Thank you.