---

.

---

---

Metode dan Algoritma | Kalender dan Agenda dengan ASP.NET (Pemrograman ASP .NET) . Anda bisa melakukan konsultasi tentang Kalender dan Agenda dengan ASP.NET (Pemrograman ASP .NET) melalui form di samping kanan !!!

---

Penulis pernah membahas tentang Membuat Aplikasi Web Calendar Menggunakan PHP. Anehnya beberapa bulan setelah program itu dibuat ada permintaan lain untuk membuat hal serupa tapi di web berbasis pemrograman ASP.NET.
Setelah browsing bagaimana cara memanggil (include) file di ASP dan berbagai penyesuaian ketika memporting aplikasi tersebut dari bahasa PHP ke ASP.NET, maka jadilah Aplikasi Web Calendar menggunakan ASP .NET berikut :

Langkah pertama buatlah file bernama calendar.aspx, kemudian tuliskan kode program berikut ini :



<% '@ Page Language="VB"%>
<%
Dim d = Now.Day
Dim m = Now.Month
Dim y = Now.Year
Dim nm = Now.ToString("MMMM")
Dim bln = System.Convert.ToString(Request.Params("bln"))
Dim thn = System.Convert.ToString(Request.Params("thn"))
If ((bln <> "") And (thn <> "")) Then
m = (New Date(thn, bln, 1)).Month
y = (New Date(thn, bln, 1)).Year
nm = (New Date(thn, bln, 1)).ToString("MMMM")
Else
bln = Now.Month
thn = Now.Year
End If
Dim mbef = m - 1
Dim maft = m + 1
Dim ybef = y
Dim yaft = y
If (mbef < 1) Then
mbef = 12
ybef = y - 1
End If
If (maft > 12) Then
maft = 1
yaft = y + 1
End If
Dim jmlkosong = (New Date(thn, bln, 1)).DayOfWeek
%>
<table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td colspan="2"><div align="center" class="stylecal"><a href="?bln=<% Response.Write(m) %>&thn=<% Response.Write(y-1) %>">&lt;&lt;</a> <a href="?bln=<% Response.Write(mbef) %>&thn=<% Response.Write(ybef) %>">&lt;</a> </div></td>
<td colspan="3"><div align="center" class="stylecal"><% Response.Write(nm) %> <% Response.Write(y)%> </div></td>
<td colspan="2"><div align="center" class="stylecal"><a href="<% %>?bln=<% Response.Write(maft) %>&thn=<% Response.Write(yaft) %>">&gt;</a> <a href="?bln=<% Response.Write(m) %>&thn=<% Response.Write(y+1) %>">&gt;&gt;</a></div></td>
</tr>
<tr>
<td width="21"><div align="center" class="stylecal">Ming</div></td>
<td width="20"><div align="center" class="stylecal">Sen</div></td>
<td width="27"><div align="center" class="stylecal">Sel</div></td>
<td width="27"><div align="center" class="stylecal">Rab</div></td>
<td width="25"><div align="center" class="stylecal">Kam</div></td>
<td width="33"><div align="center" class="stylecal">Jum</div></td>
<td width="32"><div align="center" class="stylecal">Sab</div></td>
</tr>
<tr>
<%
Dim jmlhari = (New Date(thn, bln, 1)).DaysInMonth(thn, bln)
Dim ii As Integer
For ii = 1 To jmlkosong
Response.Write("<td>&nbsp;</td>")
Next
Dim kolom = jmlkosong
For ii = 1 To jmlhari
kolom = kolom + 1
Dim warna = "#000000"
If kolom = "1" Then warna = "#FF0000"
If ((ii = Now.Day) And (m = Now.Month) And (y = Now.Year)) Then
warna = "#0000FF"
End If
%>
<td onClick="" style=""><font color="<% Response.Write(warna) %>"><div align="center" class="stylecal"><% Response.Write(ii)%></div></font></td>
<%
if kolom="7" then
Response.Write("</tr><tr>")
kolom=0
end if
next
%>
</tr>
<tr>
<td colspan="7"><div align="center" class="stylecal"><a href="?bln=<% Response.Write(Now.Month) %>&thn=<% Response.Write(Now.Year) %>">Hari Ini</a> </div></td>
</tr>
</table>

Setelah itu pada halaman web utama yang akan menggunakan potongan program tersebut, panggillah filenya dengan cara :

<!--#include file="calendar.aspx"-->

Dengan sedikit modifikasi program ini siap disisipi aplikasi Agenda jika anda inginkan.

File selengkapnya dapat didownload disini. Setelah masuk Google Docs, klik File - Download

Semoga bisa bermanfaat

---

ActionScript AS3 ASP.NET AJAX C / C++ C# Clipper COBOL ColdFusion DataFlex Delphi Emacs Lisp Fortran FoxPro Java J2ME JavaScript JScript Lingo MATLAB Perl PHP PostScript Python SQL VBScript Visual Basic 6.0 Visual Basic .NET Flash MySQL Oracle Android

---

Related Post :

---

Judul: Kalender dan Agenda dengan ASP.NET (Pemrograman ASP .NET)
Rating: 100% based on 99998 ratings. 5 user reviews.
Ditulis Oleh hank2

Anda sedang membaca artikel tentang Kalender dan Agenda dengan ASP.NET (Pemrograman ASP .NET), Semoga artikel tentang Kalender dan Agenda dengan ASP.NET (Pemrograman ASP .NET) ini sangat bermanfaat bagi teman-teman semua, jangan lupa untuk mengunjungi lagi melalui link Kalender dan Agenda dengan ASP.NET (Pemrograman ASP .NET).

---