error message "Use of undefined constant" and " Function session_is_registered() is deprecated "

if you got error message when run PHP applications below
"Use of undefined constant " .....

please set as below at php.ini

error_reporting = E_ALL & ~E_NOTICE

then if you got error as below

"Deprecated: Function session_is_registered() is deprecated "

the issue due to you use different version of PHP
please set as below at php.ini

error_reporting = E_ALL & ~E_NOTICE & ~E_DEPRECATED

don't forget to restart Apache after changes php.ini !

Avast Antivirus Gratis License Key Sampai 2038

cari cari antivirus untuk Windows 7, ketemu ini:

http://www.netmild.com/avast-antivirus-gratis-license-key-sampai-2038.html

Jika anda menginginkan antivirus gratis terbaik anda bisa gunakan salah satu antivirus berikut dimana dalam versi terbarunya Avast menambahkan fitur terbaru yang telah saya posting sedikit referensinya pada artikel komputer tips disini : Download Avast Antivirus 6.0 Free Terbaru.

Untuk mengaktifkan license and bisa gunakan license berikut yang valid hingga 2038 waw.

CatatanLicense hanya dapat digunakan pada Avast AV free dan gunakan Avast free untuk keperluan non komersial. Dan tidak ada jaminan license key berikut sampai 2038

Avast License Key: W6754380R9978A0910-4TZ59467

Sumber :
http://tricks-collections.com/avast-license-key-activate-avast-free-antivirus-until-2038/

Create Calendar use SQL Script

kadang kita pingin bikin periode kalender dari tanggal berapa s/d berapa.
berikut scriptnya. Tapi hanya berlaku mulai SQL 2005 Server.
di sql server 2000 tidak bisa (harus dengan cara lain).

1.) bikin tabel kalender dulu,
berikut scriptnya

create table kalender
(
no int identity(1,1) not null,
[date] datetime not null,

)

2.) bikin funcion yang namanya 'tabeltanggal' yang akan generate periode kalendernya
berikut scriptnya


CREATE FUNCTION [dbo].[tabeltanggal]
(
@FirstDate datetime,
@LastDate datetime
)
RETURNS @datetable TABLE (
[date] datetime
)
AS
BEGIN

SELECT @FirstDate = DATEADD(dd, 0, DATEDIFF(dd, 0, @FirstDate)); SELECT @LastDate = DATEADD(dd, 0, DATEDIFF(dd, 0, @LastDate));
WITH CTE_DatesTable
AS
(
SELECT @FirstDate AS [date]
UNION ALL
SELECT DATEADD(dd, 1, [date])
FROM CTE_DatesTable
WHERE DATEADD(dd, 1, [date]) <= @LastDate
)
INSERT INTO @datetable ([date])
SELECT [date] FROM CTE_DatesTable
OPTION (MAXRECURSION 0)

RETURN
END

3.) bikin script untuk generate periode kalender yang diinginkan
misal akan bikin kalender periode 01 desember 2010 s/d 10 desember 2010
yaitu sbb:

insert into kalender ([date])
select [date] from tabeltanggal('20101201', '20101210')

4.) silakan liat hasilnya di tabel kalender;

select * from kalender

VB6: exception dari database

contoh. biar tidak lupa terus:
di gunakan misal bila hasil count > 0 akan ada message box dan
bila count <= 0 akan ada message box

---------------------------------------------------
Private Sub Command11_Click()
Dim sql As String
Dim yyn As String


sql = "select count(id)y from tabel where kolom > '2011-01-12' "
Set rs = db.Execute(sql)
yy = rs!y
If ap > "0" Then
MsgBox "lebih dari nol!"

Else
MsgBox "nol ATAU kurang !"
End If

End Sub

---------------------------------

untuk koneksi, buat di form modul:


Option Explicit
Public db As New Connection
Public rs As New Recordset
Public sql As String


Public Function Koneksi_Database() As Boolean
'On Error GoTo pesan
If db.State = adStateOpen Then
db.Close
End If

db.Open "Provider=SQLOLEDB.1;" & _
"Persist Security Info=False;" & _
"User ID=sa;" & _
"Password=passku;" & _
"Initial Catalog=databaseku;" & _
"Data Source=serverku"
db.CursorLocation = adUseClient
Koneksi_Database = True

Exit Function
'pesan:
' Koneksi_Database = False
' MsgBox "Koneksi ke server tidak berhasil !!!", 16, "ERROR"
End
End Function

@Restoran Japan

liat sunami di TV yang melanda Japan sore tadi, jadi ingat humor berikut. Tapi sebelumnya: turut berduka cita untuk tsunami di Japan, moga cepat pulih dan di beri kesabaran dan ketabahan.

negara yang high technology dan tertib. mengalami bencanapun, penduduknya tertib untuk di evakuasi.

dari milis ITS

-----------------------------------
*sifat humor : umum ..

**Pak de mlaku mlaku karo bekas pacare neng Ginza Jepang. Wis jam 2 awan durung mangan, mesti ngelih tenan.

“Buk ngelih rak ?”, jare pak de

“I yo to yo, wetengku wis keroncongan”

“Wah nak ono restoran padang mesti uenak iki”

“Iyo mesti cepet, rak perlu kudu pesen barang”

“Wah, kae ono restoran sing nyugohke robot”

“Ho o yo, nak robot mesti nyugohkene cepet”



@restoran...Pak de lungguh adep adepan karo bekas pacarre..


Robot teko nyedakki pak de, trus ngomong :

“What is your nationality?”, robot takon.

“Indonesia” jare pak de.

“Selamat datang”, jare robot nganggo bahasa Indonesia.


“Apa bahasa suku Anda?”, robot takon meneh.


“Jawa”, jare pak de

“Sugeng siang. Badé pesen nopo?” Jare robot nganggo boso jowo.

"Canggih ya buk", pak de ngomong karo bekas pacare.


“Ono lotek?”, ibune takon karo robot.

“Ono”

“Pesen rong porsi”


“Porsi gede opo cilik?

“Porsi gede”


“Lombok e piro ?”

“Sing siji loro, sing siji sepuluh”


“Nganggo kangkung?”

“Yo”


“Nganggo timun?”

“Yo”


“Nganggo kol?”

“Yo”


“Nganggo kol cino opo kol asli jepang ?”

“Sing endi wae lah manut ”, pak de wis rodo nesu.


“Kacange meh di uleg opo di blender ?”

“Kuarepmu !”



“Kacange setengah mateng opo mateng?”

“Goréng sing gareeeeng..!!”


“Nganggo bawang goreng rak ?”

“Nganggo.. asu !” Pak de misuh banter banget.


“Meh dipiring opo dipincuk ?”

“Dipiring !”



“Lengone nganggo margarin opo minyak kelapa ?”

“Jelantah..wedus!! !”

Nesu banget soale wis sepuluh menit dewe..



Robot meneng, lampune byar pet ketap ketip koyone baru di proses.

Kiro-kiro telung menitan robot té ngomong meneh :

“Maturnuwun. Pesenan tak tompo. Mung rak iso di sugohke”


“Nopo ? Aku wis ngenteni suwe banget, tanya-jawab karo koe , kok rak iso nopo to ndes?”


“Soale durung ono asu ne ..karo jelantah weduse……….. ”

:) “Iso edian aku ! Yo Mah lungo, rak usah nguntal nang kene !!!”

:)
:)
:)