تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيفية كتابة السكريبت برمجيا
#1
السلام عليكم
سكريبت سكول
كيف يكتب برمجيا

USE [AmnDb004]
GO
/****** Object: StoredProcedure [dbo].[prcDisableTriggers] Script Date: 05/16/2014 08:46:53 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[prcDisableTriggers]
@Tbl [VARCHAR](256),
@bExcludeReplicTriggers [BIT] = 1
AS
DECLARE @Sql [VARCHAR](8000)
IF @bExcludeReplicTriggers = 1
BEGIN
DECLARE
@c CURSOR,
@Tr [VARCHAR](300),
@Id [INT],
@TrRep [VARCHAR](300)
SET @TrRep = 'trg_' + @Tbl + '_replic'
SELECT @Id = [Id] FROM [dbo].[sysobjects] WHERE [Name] = @Tbl

SET @c = CURSOR FAST_FORWARD FOR
SELECT [Name] FROM [dbo].[sysobjects]
WHERE xtype = 'TR' AND [Name] NOT LIKE @TrRep + '%' AND [parent_obj] = @Id
OPEN @c FETCH FROM @c INTO @Tr
WHILE @@FETCH_STATUS = 0
BEGIN
SET @Sql = 'ALTER TABLE [' + @Tbl + '] DISABLE TRIGGER [' + @Tr + ']'
EXEC (@Sql)
FETCH FROM @c INTO @Tr
END
END ELSE BEGIN
SET @Sql = 'ALTER TABLE [' + @Tbl + '] DISABLE TRIGGER ALL'
EXEC (@Sql)
END
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

انظر الى هذه المواضيع:

http://www.vb4arb.com/vb/thread-2271.html

http://www.vb4arb.com/vb/thread-2273.html

تحياتي
الرد }}}}
تم الشكر بواسطة:
#3
شكرا اخي للرد ولكن هل ممكن مساعدتي بكود يكتب هذا سكريبت وشكرا
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم

ضع الكود في ملف .sql ثم استخدم البرنامج في مرفقات الموضوع الثاني لتحويلها الى قاعدة بيانات

تحياتي
الرد }}}}
تم الشكر بواسطة:
#5
مثلا اخي الكريم انا انشات سكريبت بالداتا بيز اسمه script1
اريد كود تنفيذه
مع العلم انه بدون بارمترات
لانه مربوط ب viwe
الرد }}}}
تم الشكر بواسطة:
#6
انا استخدم فيجوال بيسك دوت نت2008 ولا اعرف سي شارب وشكرا
الرد }}}}
تم الشكر بواسطة:
#7
اخي العزيز انت لما تعمل Script من داخل SQL ستنتج ملف فيه هذه الاكواد

واذا اردت تحويلها الى قاعدة بيانات استخدم مرفقات الموضوع الثاني وسيتم عمل المطلوب

تحياتي
الرد }}}}
تم الشكر بواسطة:
#8
السلام عليكم هل يمكن تحويل الكود الى فيجوال بيسك 2008 وشكرا
الرد }}}}
تم الشكر بواسطة:
#9
Dim sqlConnectionString As String = ""
'Dim file As New FileInfo("C:\myscript.sql")
Dim file As New FileInfo("e:\CHECKALLPLANS.txt")

Dim script As String = file.OpenText().ReadToEnd()
Dim conn As New SqlConnection(sqlConnectionString)
Dim server As New Server(New ServerConnection(conn))
server.ConnectionContext.ExecuteNonQuery(script)
iهل كتابة الكود صحيح
الرد }}}}
تم الشكر بواسطة:
#10
كود :
Dim sqlConnectionString As String = ""
'Dim file As New FileInfo("C:\myscript.sql")
Dim file As New FileInfo("e:\CHECKALLPLANS.txt")

Dim script As String = file.OpenText().ReadToEnd()
Dim conn As New SqlConnection(sqlConnectionString)
Dim server As New Server(New ServerConnection(conn))
server.ConnectionContext.ExecuteNonQuery(script)
اكتب الكود بوسم كود افضل بعد تعيين المحاذاة لليسار.
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية عرض السطر اللي واقفين عليه في الداتا جريد فيو في التكست بوكس khaled12345 19 469 16-07-17, 07:23 PM
آخر رد: حريف برمجة
  [سؤال] كيفية حفظ ملف pdf في قاعدة بيانات sql abid 5 5,742 10-05-17, 03:13 PM
آخر رد: safalo
  كيفية تعديل صورة في قاعدة بيانات اكسس oz7z 6 224 29-03-17, 09:01 AM
آخر رد: oz7z
  كيفية الاتصال بقاعدة بيانات Access على الشبكة المحلية warda saeed 9 9,909 28-02-17, 10:21 AM
آخر رد: وائل القطاوي
  كيفية عمل أتاش لقاعدة بيانات djelloul 0 227 24-01-17, 04:35 PM
آخر رد: djelloul
  [سؤال] كيفية اضافة عناصر عمود فى جدول من قاعدة بيانات فى جدول اخر hidn 1 600 04-11-16, 09:25 AM
آخر رد: thevirus
  [سؤال] شباب كيفية انقاص او طرح الكمية الموضوعة فى الداتا جريد من الجدول احمد عبد الحكيم 2 848 04-10-16, 11:37 PM
آخر رد: benomar
  [سؤال] المساعده فى شرح كيفية انشاء هذه العلاقة بين هذه الجداول وادراجها بــ TextBox hamadaalmasry 1 432 26-06-16, 03:06 AM
آخر رد: سعود
  كيفية التأكد من تعبئة الحقول في جدول بقاعدة البيانات aftfm 6 674 06-04-16, 08:38 PM
آخر رد: aftfm
  تخفيض مستوي الامان برمجيا atefkhalf2004 1 297 20-12-15, 12:59 PM
آخر رد: atefkhalf2004

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم