VB 6 Combo box with value and text1. Add component Microsoft Forms 2.02. EngMatchFrm.CmbEngComponent.Clear EngMatchFrm.CmbEngComponent.ColumnCount = 2 EngMatchFrm.CmbEngComponent.ColumnWidths = “0 in; 2 in” Dim i As Integer i =…
SELECT ((DATEDIFF(minute, ‘2013-06-30 08:30:00.0000000’, ‘2013-06-30 10:45:00.0000000’))/60) AS TotalHour, ((DATEDIFF(minute, ‘2013-06-30 08:30:00.0000000’, ‘2013-07-30 10:45:00.0000000’))%60) AS TotalMinute The result of the above query is: TotalHour TotalMinute 2 15…
Sunday Mass Celebration at the EDSA Shrine. This Sunday Eucharistic Celebration online at EDSA Shrine is aimed at helping Filipinos living and working abroad be closer to Jesus. However, it shall not take the…
Code in getting the windows user’s fullname. Dim strComputer As StringDim strUserName As StringDim objUser As Object strComputer = “ComputerName”strUserName = “UserNameSet objUser = GetObject(“WinNT://” & strComputer & “/” & strUserName)…
When you query a multiple join in MSSQL you use this following query:SELECT a.columna, b.columnb, c.columncFROM tablea AS a LEFT JOIN tableb AS b ON a.id = b.id LEFT JOIN tablec AS c…
Subtracting Date Time in MSSQL –YEARSELECT DATEDIFF(year, ‘2012-12-31’, ‘2013-01-01’) –QuarterSELECT DATEDIFF(quarter, ‘2012-01-01 23:59:59’, ‘2013-01-01 00:00:00’) –MonthSELECT DATEDIFF(month, ‘2012-12-31 23:59:59.9999999’, ‘2013-02-01 00:00:00.0000000’) –DaySELECT DATEDIFF(day, ‘2012-12-01 23:59:59.9999999’, ‘2012-12-31 00:00:00.0000000’) –WeekSELECT DATEDIFF(week, ‘2013-06-01…
VB Send Email with a HTML Format body Private Sub Command1_Click()Dim EmailList, Mailbod As String, MyfileDim objOutlook As Outlook.ApplicationDim newapp As Outlook.MailItem, objRecip As Outlook.RecipientDim objRWhtm As Outlook.AttachmentDim StrBody As…
Copy File then rename the copied file with date and time using dos commandC:FileName.bak Z: /C /Y ren Z:FileName.bak FileName.bak%date:~4,2%-%date:~7,2%-%date:~10,4%-%time:~1,1%%time:~3,2%%time:~6,2% I discovered that when the folder name is with spaces. just put a double…
When your developing an MS Access application make sure you remove the Ribbon so that your application looks clean. Here’s how to remove the Ribbon. ‘Disable MS Access Ribbon DoCmd.ShowToolbar “Ribbon”, acToolbarNo ‘Enable MS Access…
The Yellow Bell Flower in our back yard. This photo was taken after the rain. Camera: Nikon D5100, 18-55 lens…
