rss

Sponsors

Senin, 14 Mei 2012

SQL Server 2008 R2 Operating Sytem Error 5 saat Restore dan Attach Database

SQL Server error
Okey, ini pertama kali saya dengan terpaksa harus install SQL Server 2008 R2 karena kantor saya memakai aplikasi tersebut.

Pada saat proses installasi tidak ada masalah sampai saya berusaha untuk attach database yang ada. pesan errornya adalah : "unable to open the physical file "file name". operating system error 5: ..."


cara untuk menangani error tersebut adalah:

  1. start > run > ketikan services.msc > ok
  2. Cari services SQL server pada jendela Services > Klik Kanan > Properties
  3. Pilih tab Log On > Local System Account > OK
  4. kembali lagi ke jendela services & pilih SQL Server > klik  restart
Coba ulangin restore / attach database Anda. Cara ini berhasil, setidaknya untuk saya)




Minggu, 29 April 2012

Looping pada SQL Server



1) Example of WHILE Loop
DECLARE @intFlag INT
SET @intFlag = 1
WHILE (@intFlag <=5)
BEGIN
PRINT @intFlag
SET @intFlag = @intFlag + 1
END
GO

ResultSet:
1
2
3
4
5

2) Example of WHILE Loop with BREAK keyword
DECLARE @intFlag INT
SET @intFlag = 1
WHILE (@intFlag <=5)
BEGIN
PRINT @intFlag
SET @intFlag = @intFlag + 1
IF @intFlag = 4
BREAK;
END
GO

ResultSet:
1
2
3

3) Example of WHILE Loop with CONTINUE and BREAK keywords
DECLARE @intFlag INT
SET @intFlag = 1
WHILE (@intFlag <=5)
BEGIN
PRINT @intFlag
SET @intFlag = @intFlag + 1
CONTINUE;
IF @intFlag = 4 -- This will never executed
BREAK;
END
GO

ResultSet:
1
2
3
4
5

sumber : http://blog.sqlauthority.com/2007/10/24/sql-server-simple-example-of-while-loop-with-continue-and-break-keywords/

Senin, 16 April 2012

Import Facebook Event Ke Google Calendar

Google Calendar adalah salah satu aplikasi yang menurut saya sangat berguna untuk produktifitas. Kita bisa mengatur semua jadwal & reminder agar tidak lupa. Kelebihan nya adalah google calendar ini bisa di synchronize ke berbagai macam device seprti iPhone, BlackBerry dan Android. Jadi saat Anda membuat jadwal di Google Calendar, secara otomatis jadwal tersebut akan di synchronize ke device yang Anda miliki.

Import & Synchronize Facebook Event Ke Google Calendar
seperti di google, Facebook pun memiliki fasilitas sama yang mirip seperti Google Calendar, yaitu Facebook Events (Acara). Berikut adalah cara untuk mensinkron kan events yang ada di Facebook:

  • Buka halaman facebook.
  • klik Aplikasi
  • klik Acara (Events)
  • di sebelah kanan, klik button kaca pembesar
  • Klik Expor Acara
  • setelah itu akan muncul url seperti berikut & copy url
    • webcal://www.facebook.com/ical/u.php?uid=12954*****&key=AQBrVwsRu*****Sb
  • buka calendar.google.com
  • Klik tombol Other Calendar > Add By Url > Masukan URL yang sebelumnya telah kita copy
  • Add Calendar
jika setelah add calendar muncul pesan error, reload halaman google calendar.

Penggunaan Stored Procedure dan Sql Data Adapter pada vb.net


Dim conn As New SqlConnection(strConn)
Dim cmd As New SqlCommand("MyStoredProcedure", conn)
With cmd
    .CommandType = CommandType.StoredProcedure
    .Parameters.Add("@pdata", SqlDbType.VarChar, 100)
    .Parameters("@pdata").Value = "Whatever"
End With
Dim da As New SqlDataAdapter(cmd)
Dim ds As New DataSet
da.Fill(ds)

Selasa, 03 April 2012

Registry Pada Visual Basic .NET

Module

Public Sub ___RegistrySet(ByVal _strRegSubKey As String, _
                               ByVal _strRegValue As String)

        Dim _RegistryKey As RegistryKey
        _RegistryKey = Registry.LocalMachine

        Dim _RegistrySubKey As RegistryKey
        _RegistrySubKey = _RegistryKey.OpenSubKey("SOFTWARE\SMSAdv\Setting", True)
        If _RegistrySubKey Is Nothing Then
            _RegistrySubKey.CreateSubKey("SOFTWARE\SMSAdv\Setting")
        Else
            _RegistrySubKey.SetValue(_strRegSubKey, _strRegValue)
        End If

        _RegistryKey.Close()

    End Sub

    Public Function ___RegistryGet(ByVal _strRegValue As String) As String

        Dim _RegistryKey As RegistryKey
        _RegistryKey = Registry.LocalMachine

        Dim _RegistrySubKey As RegistryKey
        _RegistrySubKey = _RegistryKey.OpenSubKey("SOFTWARE\SMSAdv\Setting", True)
        Return _RegistrySubKey.GetValue(_strRegValue)

    End Function

'GET REGISTRY VALUE
CBEModem.EditValue = ___RegistryGet("Modem")

'SET REGISTRY
___RegistrySet("Database", TEDatabase.EditValue.ToString.Trim)
 

Pengunjung

Ping your blog, website, or RSS feed for Free