Results 1 to 9 of 9

Thread: [RESOLVED] Which to learn, Access, Sql, etc.

Threaded View

  1. #1

    Thread Starter
    Fanatic Member
    Join Date
    Jul 2006
    Location
    Anchorage, Alaska
    Posts
    545

    Resolved [RESOLVED] Which to learn, Access, Sql, etc.

    I've made a program that opens up "Text Files" and I use them as my Database/Saved information.

    The program is a Video/DVD rental program.

    It keeps track of Customers, Accounts, Actors, DVD's, Fees, etc.

    Right now each movie saved to the text file is about 1.2k (550k total)


    I expect to have 200-700 Accounts with double to tripple the customers.
    I expect to have 700-1500 DVDs total.

    I know little about Access, little about Sql. Nothing about any other Database.

    Some of the information that is stored for Movies is following:

    VB Code:
    1. Type movieinfo
    2.    moviename As String 'example ---Main Hoon Na
    3.    Character1 As String  'example ---Shah Ruk Khan
    4.    Character2 As String  'example ---
    5.    releasedate As String  'example --- 01/01/2004 (sometimes you just know the year)
    6.    RunningTime As Integer 'example --- 180 as mins
    7.    AgeGroup As Byte  'example --- 0=All Audiances,1=adults,2=teens+,3=kids+
    8.    Subtitles As Boolean 'example --- 0 = False, if it was true. -1 = True
    9.    NewMovie As Boolean 'example --- -1 = true , 0=false
    10.    Description As String 'example --- Maj. Ramprasad Sharma(Shah Ruk Khan) is going back to school...
    11.    Type As Byte 'example  --- 0-10 (0=comedy, 1=drama, 2=action/suspence, 3=scary/horror, 4=family,5=Science Fiction)
    12.    quantity As Byte 'example --- 2 in stock
    13.    Avail As Byte 'example --- 1 avil, meaning that 1 is checked out
    14.    movienumber As Integer 'example --- 75, but -75 if it is deleted
    15.    Deleted As Boolean
    16.    RentedNew As Integer
    17.    RentedOld As Long
    18.    AccountsRentedTo As String
    19.    BarCode As String
    20.    PicPath As String 'Hard Drive Path to the Picture to display.
    21.    TotalQInfo As Long
    22.    QInfo() As QuantityInformation
    23. End Type
    24.  
    25. Type QuantityInformation
    26.     CopyLetter As String 'A,B,C,D,E....AA,BB,CC......AAA,BBB....
    27.     Rented As Boolean 'self explanitory
    28.     Account As Long '5 - know who rented it out to.
    29.     PurchaseDate As String '07/16/2006
    30.     PurchaseAmount As Currency '17.99
    31.     SoldDate As String '07/17/2006
    32.     SoldAmount As Currency ' 5.99 (Add in cost of renting it out 17, total from movie 22.99 that is $5 profit)
    33.     SoldTo As Long ' Customer Array Number
    34.     RentedNew As Integer '5   (so 3*5=15)
    35.     RentedOld As Integer '1   (so 2*1=2)
    36.     RentedNewProfit As Currency
    37.     RentedOldProfit As Currency
    38.     LateNew As Integer 'tracks how many times a movie has been returned late as new
    39.     LateOld As Integer 'tracks how many times a movie has been returned late as old
    40.     LateNewProfit As Currency
    41.     LateOldProfit As Currency
    42.     Status As Byte '0=Available/Owned still,  1=Sold, 2=LostByCustomer,3=Damaged, 4=stolen, etc.
    43.     NewWhenRented As Boolean
    44. End Type

    I just copied and pasted my current User Defined Type.

    I am going to first learn about a specific database format/system. Then Re-program my DVD Rental program with it.

    Thank you for your input.
    Last edited by rack; Dec 22nd, 2006 at 02:10 AM.
    Please RATE posts, click the RATE button to the left under the Users Name.

    Once your thread has been answered, Please use the Thread Tools and select RESOLVED so everyone knows your question has been answered.


    "As I look past the light, I see the world I wished tonight, never the less, sleep has come, and death shall soon follow..." © 1998 Jeremy J Swartwood

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width