ÀûÓÃVB½øÐÐSQL2000µÄÊý¾Ý±¸·ÝºÍ»Ö¸´
Ò»¡¢Êý¾Ý±¸·Ý
¡¡¡¡±¸·ÝÓÐÁ½ÖÐÐÎʽÍêÈ«±¸·ÝºÍ²îÒ챸·Ý
¡¡¡¡ÍêÈ«±¸·Ý£ºÊǶÔÊý¾Ý¿â½øÐÐÍêÕû±¸·Ý£¬ÖÜÆÚ±È½Ï³¤£¬Èç1ÖܵÈ
¡¡¡¡²îÒ챸·Ý£ºÊǶԸüб¸·ÝµÄÊý¾Ý½øÐб¸·Ý£¬ÖÜÆÚ±È½Ï¶Ì£¬Èç1Сʱ
¡¡¡¡ÃüÁî½éÉÜ£º Backup Database [Êý¾Ý¿âÃû] To Disk=[±£´æÂ·¾¶ºÍÃû³Æ] With [ÆäËûÊôÐÔ]
¡¡¡¡´úÂë×¢ÊÍ£ºServerIP :SQLServerËùÔÚ»úÆ÷µÄ IP
¡¡¡¡¡¡¡¡¡¡¡¡¡¡jtsg:SQLServerÖÐÊý¾ÝµÄÃû³Æ
Public Cn As ADODB.Connection
Set Cn = New ADODB.Connection
strcon = "Provider=SQLOLEDB.1;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=jtsg;Data Source=" + ServerIp + ";" + _
"use procedure for prepare=1;auto translate=true;" + _
"use encryption for data=false;tag with column collation when possible=false"
Cn.ConnectionString = strcon
On Error Resume Next
Cn.Open
If Cn.Errors.Count > 0 Then
For i = 0 To Cn.Errors.Count - 1
If Cn.Errors(i).Number = -2147467259 Then
MsgBox "ÍøÂ粻ͨ»ò·þÎñÆ÷먦£¬ÇëÈ·ÈϺóÔÙÊÔ", vbOKOnly + vbInformation, "ÌáÐÑ"
Unload Me
Exit Sub
Exit For
End If
Next i
End If
¶þ¡¢ÍêÈ«±¸·Ý
Private Sub BackupAll()
Cn.Execute "backup database jtsg to disk='" + App.Path + "\backup\myjtsgall.bak' with name='jtsg backup all',description='Full Backup Of jtsg'"
MsgBox "Êý¾ÝÍêÈ«±¸·ÝÒѾÍê³É", vbOKOnly + vbInformation, "ÌáÐÑ"
End Sub
Èý¡¢²îÒ챸·Ý
Private Sub BackupDif()
Cn.Execute "backup database jtsg to disk='" + App.Path + "\backup\myjtsgdif.bak' with&nbs
Ïà¹ØÎĵµ£º
ÓÃADO¹ÜÀíSQL SERVER
http://blog.csdn.net/cncco/archive/2009/11/09/4789123.aspx
ÔÚÈí¼þ¿ª·¢ÖУ¬³£³£ÐèҪΪ³ÌÐò½¨Á¢Sql ServerÊý¾Ý¿âµÄÔËÐл·¾³¡£Íê³ÉÈçÔÚSQL ServerÊý¾Ý¿âÖн¨Á¢É豸£¬½¨Á¢Êý¾Ý¿â£¬½¨Á¢±í¸ñ£¬·ÖÅäȨÏ޵ȹ¦ÄÜ£¬ÈçºÎ·½±ãµÄ½¨Á¢Ó¦ÓóÌÐòËùÐèSql Server»·¾³µÄÊý¾Ý¿â»·¾³£¬¶ø²»ÓÃÆô¶¯SQL Enterprise Manage ......
±£»¤SQL ServerÊý¾Ý¿âµÄÊ®´ó¾øÕÐ
http://blog.csdn.net/cncco/archive/2007/09/15/1785880.aspx
1. °²×°×îеķþÎñ°ü
ΪÁËÌá¸ß·þÎñÆ÷°²È«ÐÔ£¬×îÓÐЧµÄÒ»¸ö·½·¨¾ÍÊÇÉý¼¶µ½SQL Server 2000 Service Pack 3a (SP3a)¡£ÁíÍ⣬Äú»¹Ó¦¸Ã°²×°ËùÓÐÒÑ·¢²¼µÄ°²È«¸üС£
2. ʹÓÃMicrosoft»ùÏß°²È«ÐÔ·ÖÎöÆ÷£¨MBSA£©À´ÆÀ¹À·þÎñÆ÷µÄ°² ......
·ÀSQL×¢È뺯Êý
³ÌÐò´úÂ룺
º¯Êý²¿·Ö========================================================================
'------------------------------------------------
'ÓÃ;:¼ì²éÊÇ·ñΪÊý×Ö,ÒÔ¼°Êý×ÖÊÇ·ñ³¬³ö·¶Î§
'ÊäÈë:¼ì²é×Ö·û,´«Öµ·½Ê½(0Ö±½Ó´«,1È¡Form,2È¡QueryString,3È¡cookies,4Ö±½ÓReqeust),¿ªÊ¼Êý×Ö(ĬÈÏÊý× ......
v$sqltext
´æ´¢µÄÊÇÍêÕûµÄSQL
v$sqlarea
´æ´¢µÄSQL ºÍһЩÏà¹ØµÄÐÅÏ¢£¬±ÈÈçÀۼƵÄÖ´ÐдÎÊý£¬Âß¼¶Á£¬ÎïÀí¶ÁµÈͳ¼ÆÐÅÏ¢
v$sql
´æ´¢µÄÊǾßÌåµÄSQL ºÍÖ´Ðмƻ®Ïà¹ØÐÅÏ¢£¬Êµ¼ÊÉÏ£¬v$sqlarea ¿ÉÒÔ¿´×ö v$sql ¸ù¾Ý sqltext µÈ ×öÁË group by Ö®ºóµÄÐÅÏ¢ ......
½ñÌìÐÞ¸ÄÁËÊý¾Ý¿â£¬ÓÚÊǽøÐÐÖØÐ·¢²¼ºÍ¶©ÔÄ£¬Í»È»³öÏÖÁËÒÔÏÂÒì³£
½ø³ÌδÄÜ´óÈÝÁ¿¸´ÖƵ½±í"XS_DDML"ÖÐ
´íÎóÏêϸÐÅÏ¢£º
ÔÚ BCP Êý¾ÝÎļþÖÐÓöµ½µÄÒâÍâµÄ EOF
(Ô´: ODBC SQL Server Driver (ODBC); ´íÎó´úÂë: S1000)
ÓÚÊDzé°ïÖú£¬²éGoogle,ºÇºÇ£¬Google»¹ÕæÊǸöºÃµØ·½£¬ÕÒµ½ÁËÒÔÏÂSQL£¬¾Ý˵¿ÉÒÔ½â¾ö¸ÃÎÊÌâ
sp_configure&n ......