Solved

Clint Data Maintenance

Posted on 2011-09-07
7
162 Views
Last Modified: 2012-05-12
Hi,
    This is My Procedure To Develop The Project,
    I have Clients ,I will make them  Call 's and Visit them. I am Doing These Two Tasks Regularly. Now i want to Generate the Application using these Two Tasks.
Call:
  if i Select the Member ID that Generate the all the list of called data , at what date i made call them  what i spoke them. If i want to enter newly called data ,that data enter in Text Area and i press post button that data will go to the database with respect to the date and add that data to the list what i am viewing like 'youtube' comments at bottom of the list .

Appointment:
 This Functionality as same as the call what i mention above.

i  maintaining this data at Database side. It is Not Necessary to Maintain data on database.Is it Possible Maintain the data using XML or Word Document? OR any Technology To maintain?
If It so Give me the suggestions Please.
Thank You.


 
0
Comment
Question by:CPSRI
  • 5
  • 2
7 Comments
 
LVL 14

Expert Comment

by:Brook Braswell
ID: 36505402
There are so many different ways to keep this data but if you already have a way of keeping the data in a good database, WTP - What's the point in "downgrading" where you store your data and read your data if what you have works fine ?
If you are attempting to make this a web type application and do not want to pay for web data fee's then you can use XML or a simple Text file that you read and write to in your own way.

How to do it?
That would depend on what your Project/Application is written in...

0
 
LVL 14

Expert Comment

by:Brook Braswell
ID: 36505416
For ASP.Net there are many tutorials on storing and reading data with XML files...

http://www.stardeveloper.com/articles/display.html?article=2000072801&page=1
0
 

Author Comment

by:CPSRI
ID: 36519556
hi Brook1966,
     is their any way other than xml and Textfile. If so please explain about it. If not could you explain about the textFile. How Read and Insert. Thank you.
0
Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
LVL 14

Expert Comment

by:Brook Braswell
ID: 36522251
There are multiple ways to write data to a text file.
A way to write to a file similar to using a registry would be
By using the kernel32 lib you can make calls to the GerProfileString and WriteProfileString.

Declare Function GetPrivateProfileStringA Lib "kernel32" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName As String) As Integer
Declare Function WritePrivateProfileStringA Lib "kernel32" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpSet$, ByVal lpFileName$) As Integer

Public Function GetIni(FileName As String, Section As String, KeyWord As String)
                 Dim iErr As Integer
                 Dim Msg, success, X As String
                 Dim Result As String * 128
10               iErr = 0
20               On Error GoTo PROC_ERR
30               success = GetPrivateProfileStringA(Section, KeyWord, "", Result, Len(Result), FileName)
40               If Left$(Result, 1) <> Chr$(0) Then
50                  X = Left$(Result, InStr(Result, Chr$(0)) - 1)
60               Else
70                  X = ""
80               End If
90               GetIni = UCase(X)
PROC_EXIT:
100              Exit Function
PROC_ERR:
110              If iErr > 3 Then
120                 ' YOUR ERROR LOGGING HERE
130                 Resume PROC_EXIT
140              Else
150                 iErr = iErr + 1
160                 Resume
170              End If

End Function

Public Function WriteINI(FileName As String, Section As String, KeyWord As String, SetWord As String)
                 Dim iErr As Integer
                 Dim Msg, success, X As String
                 Dim Result As String * 128
10               iErr = 0
20               On Error GoTo PROC_ERR
30               success = WritePrivateProfileStringA(Section, KeyWord, SetWord, FileName)
40               If Left$(Result, 1) <> Chr$(0) Then
50                  X = Left$(Result, InStr(Result, Chr$(0)) - 1)
60               Else
70                  X = ""
80               End If
90               WriteINI = UCase(X)
PROC_EXIT:
100              Exit Function
PROC_ERR:
110              If iErr > 3 Then
120                 ' YOUR ERROR LOGGING HERE
130                 Resume PROC_EXIT
140              Else
150                 iErr = iErr + 1
160                 Resume
170              End If

End Function

Open in new window

0
 
LVL 14

Accepted Solution

by:
Brook Braswell earned 500 total points
ID: 36522261
Another way would be to just open a file, write your data, and then parse the file later as you need.

        Open App.Path & "\MyData.txt" For Append As #1
        Print #1, "Your data formatted the way you prefer"
        Close #1


If you have a large amount of data to read and write then I suggest neither of these methods.
0
 
LVL 14

Expert Comment

by:Brook Braswell
ID: 36522288
Outputting an ADO RecordSet to s text file


Dim OutStr as String
        Dim i as Single
        Open App.Path & "\MyData.txt" For Append As #1
        OutStr = ""
        For i = 0 to myRS.Fields.Count - 1
            OutStr = OutStr  & iif(OutStr = "","",",") & myRS.Fields(i).Name
        Next
        Do while not myRS.EOF
           OutStr = ""
           For i = 0 to myRS.Fields.Count - 1
               OutStr = OutStr & iif(OutStr = "","",",") & myRS.Fields(i)
           Next
           Print #1, OutStr
           myRS.MoveNext
        Loop
        Close #1

Open in new window

0
 

Author Closing Comment

by:CPSRI
ID: 36573925
Thanks
0

Featured Post

Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Just a quick little trick I learned recently.  Now that I'm using jQuery with abandon in my asp.net applications, I have grown tired of the following syntax:      (CODE) I suppose it just offends my sense of decency to put inline VBScript on a…
Today is the age of broadband.  More and more people are going this route determined to experience the web and it’s multitude of services as quickly and painlessly as possible. Coupled with the move to broadband, people are experiencing the web via …
Two types of users will appreciate AOMEI Backupper Pro: 1 - Those with PCIe drives (and haven't found cloning software that works on them). 2 - Those who want a fast clone of their boot drive (no re-boots needed) and it can clone your drive wh…

856 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question