violet agarap's Profile User Rating: -----

Reputation: 0 Apprentice
Group:
New Members
Active Posts:
6 (0.01 per day)
Joined:
21-May 12
Profile Views:
552
Last Active:
User is offline May 22 2012 08:12 PM
Currently:
Offline

Previous Fields

Dream Kudos:
0
Icon   violet agarap has not set their status

Posts I've Made

  1. In Topic: how to become value of 0 in database the textbox1.txt that was null?

    Posted 21 May 2012

    finally i did it. tnx. the output was correct. i inputted "ELSE". tnx for helping me. :bigsmile:
  2. In Topic: how to become value of 0 in database the textbox1.txt that was null?

    Posted 21 May 2012

    i used IF STATEMENT, i think i need "ELSE" also..what do you think should i code in "ELSE"?. I want zero value will automatically appear and record in my system when i did not inputted any value on those textboxes. tnx :bigsmile:
  3. In Topic: how to become value of 0 in database the textbox1.txt that was null?

    Posted 21 May 2012

    
    Private Sub cmdSave_Click()
    
    On Error Resume Next
    
    
    
     Adodc1.Recordset.AddNew
     Adodc1.Recordset.Fields("PID") = txtsample1.Text
     Adodc1.Recordset.Fields("Proj_Name") = txtsample2.Text
     
    
    If txtsample3 = "" Then
    Adodc1.Recordset.Fields("SOR") = 0
    End If
    
    
    If txtsample4 = "" Then
    Adodc1.Recordset.Fields("Year_ko") = 0
    End If
    
    If txtsample5 = "" Then
    Adodc1.Recordset.Fields("SBO") = 0
    End If
    
     Adodc1.Recordset.Update
      
    
    
    txtsample1.Text = ""
    txtsample2.Text = ""
    txtsample3.Text = ""
    txtsample4.Text = ""
    txtsample5.Text = ""
    
    
    
    Adodc1.Recordset.Update
    
    txtsample1.SetFocus
    End Sub 
    
    
    


    this what i did.when i did not input any value to those textboxes the output is correct , but when i inputted a value in any textbox there was no value that appear in records. as in blank. the value that i inputted did not appear or recorded.
  4. In Topic: how to become value of 0 in database the textbox1.txt that was null?

    Posted 21 May 2012

    actually the 0 or other numbers will input only for line 10-12.
  5. In Topic: how to become value of 0 in database the textbox1.txt that was null?

    Posted 21 May 2012

    
    
    Private Sub cmdSave_Click()
    
    On Error Resume Next
    
    
    
     Adodc1.Recordset.AddNew
     Adodc1.Recordset.Fields("PID") = txtsample1.Text
     Adodc1.Recordset.Fields("Proj_Name") = txtsample2.Text
     Adodc1.Recordset.Fields("SOR") = txtsample3.Text
     Adodc1.Recordset.Fields("Year_ko") = txtsample4.Text
     Adodc1.Recordset.Fields("SBO") = txtsample15.Text
     Adodc1.Recordset.Update
      
    
    
    txtSOR.Text = ""
    txtResolve.Text = ""
    txtSBO.Text = ""
    Text1.Text = ""
    Text2.Text = ""
    cmb.Text = ""
    
    
    Adodc1.Recordset.Update
    
    txtsample1.SetFocus
    End Sub
    
    
    
    


    ,.this is my code for saving the record..tnx

    
    Private Sub cmdSave_Click()
    
    On Error Resume Next
    
    
    
     Adodc1.Recordset.AddNew
     Adodc1.Recordset.Fields("PID") = txtsample1.Text
     Adodc1.Recordset.Fields("Proj_Name") = txtsample2.Text
     Adodc1.Recordset.Fields("SOR") = txtsample3.Text
     Adodc1.Recordset.Fields("Year_ko") = txtsample4.Text
     Adodc1.Recordset.Fields("SBO") = txtsample15.Text
     Adodc1.Recordset.Update
      
    
    
    txtsample1.Text = ""
    txtsample2.Text = ""
    txtsample3.Text = ""
    txtsample4.Text = ""
    txtsample5.Text = ""
    
    
    
    Adodc1.Recordset.Update
    
    txtsample1.SetFocus
    End Sub
    
    
    


    i forgot to change the name of textboxes. This is the correct code that i was did.

My Information

Member Title:
New D.I.C Head
Age:
Age Unknown
Birthday:
Birthday Unknown
Gender:

Contact Information

E-mail:
Click here to e-mail me

Friends

Comments

violet agarap has no profile comments yet. Why not say hello?