Visual Basic

Network/Winsock Programming

Submitted by rommelroldan on
Hello to all sourcecodester member, i'm Rommel Ewayan, a beginner programmer. This is my first upload here, i called this project "Messenger". This is our project in network principles subject. We made this project as a group, and i'm the one who give task to my member. Hope it would help for those students with project like this.

Insert Null Value into Date/Time Field

Submitted by admin on
This simple project will simply insert a null value to a date/time field if the checkbox within DateTimePicker is False. In order to determine if the Checkbox is true/false you need to use the isNull function. Private Sub CmdInsert_Click() Dim cn As New Connection Dim strSQL As String cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Data.mdb;" strSQL = "INSERT INTO NOSOld

Populating Elements

Submitted by kevern010101 on
  1. Option Explicit
  2.     Dim conn As ADODB.Connection
  3.     Dim rs As ADODB.Recordset
  4.    
  5.    
  6.    
  7.    
  8. ' pupulate element
  9. ' @author: Kevern
  10. ' @date: checkDate 07/28/2009
  11. Public Sub init()
  12.     Set conn = New ADODB.Connection
  13.     Set rs = New ADODB.Recordset
  14.         conn.connectionString = ConnectionStringModule.connectionString
  15.             With conn

Write.ini

Submitted by kevern010101 on
Public Function ReadIniValue(INIpath As String, KEY As String, Variable As String) As String Dim NF As Integer Dim temp As String Dim LcaseTemp As String Dim ReadyToRead As Boolean AssignVariables: NF = FreeFile ReadIniValue = "" KEY = "[" & LCase$(KEY) & "]" Variable = LCase$(Variable) EnsureFileExists:
Subscribe to Visual Basic