Avatar of CPSRI
CPSRIFlag for United States of America

asked on 

Clint Data Maintenance

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.


 
ASP.NET

Avatar of undefined
Last Comment
CPSRI
Avatar of Brook Braswell
Brook Braswell
Flag of United States of America image

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...

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
Avatar of CPSRI
CPSRI
Flag of United States of America image

ASKER

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.
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

ASKER CERTIFIED SOLUTION
Avatar of Brook Braswell
Brook Braswell
Flag of United States of America image

Blurred text
THIS SOLUTION IS ONLY AVAILABLE TO MEMBERS.
View this solution by signing up for a free trial.
Members can start a 7-Day free trial and enjoy unlimited access to the platform.
See Pricing Options
Start Free Trial
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

Avatar of CPSRI
CPSRI
Flag of United States of America image

ASKER

Thanks
ASP.NET
ASP.NET

The successor to Active Server Pages, ASP.NET websites utilize the .NET framework to produce dynamic, data and content-driven web applications and services. ASP.NET code can be written using any .NET supported language. As of 2009, ASP.NET can also apply the Model-View-Controller (MVC) pattern to web applications

128K
Questions
--
Followers
--
Top Experts
Get a personalized solution from industry experts
Ask the experts
Read over 600 more reviews

TRUSTED BY

IBM logoIntel logoMicrosoft logoUbisoft logoSAP logo
Qualcomm logoCitrix Systems logoWorkday logoErnst & Young logo
High performer badgeUsers love us badge
LinkedIn logoFacebook logoX logoInstagram logoTikTok logoYouTube logo