الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

هل استطيع ربط السي باتش تي ام ال

بدأه EJRAM في 23 سبتمبر 2011 · 7 رد · 619 مشاهدة · في هندسة البرمجيات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلآم عليكم ..

انا عندي خبرة ليست بالشيء الكبير باللغات ..

وابغى ابرمج سكربت بسيط ..

السكربت عباره عن تابات .. كل ما ضغط المستخدم على تاي يظهر له الكلآم الخآص بموضوع التاب ..

لكن ابغى ابرمجه بلغه السي .. ومضطره استخدم الــhtml عشان ابرمج شكل الجدول ..

فهل اقدر استخدم لغه لسي داخل الـ html ؟

واذا كان ممكن كيف اربطهم ؟

واذا مش ممكن اي لغه استخدمها بديله مع الاتش تي ام ال ؟

شكرن

#2

السؤال غريب جدا ، الرجاء محاولة طرح السؤال الاصلي هنا لتكون قادرة على المساعدة.

#3

على ما اعتقد HTML لوحدها لا تكفى

لكن ممكن لو ضفت كود PHP بسيط بس ده فى حال انك عايز تعمل Run للبرنامج within the background

لكن تشغله برنامج C على ما اعتقد ممكن عن طريق CGIو عموما كل ده ممكن بالغات البرمج المتاحة للــ Web دون الحاجة للــ C

Life is not the amount of breaths you take, it's the moments that take your breath away

#4

هذا الموقع

http://www.sehetna.com.jo/Components/HeathCaculations.aspx?tabId=6

يوجد فيه جزء يسمى حسابات صحيه

انا ابغى ابرمج نفس سكربت الحسابات الصحيه فقط ..

فياليت تفيدوني باللغه المطلوبه

#5

الحقيقة انا مش فاهمك ؟ ده ولا محتاج Server Side Script ولا طبعا C ده بسيط تقدر تعمله بالــ JavaScript

Life is not the amount of breaths you take, it's the moments that take your breath away

#6

كما قال الأخ فؤاد عبد الرزاق .. هذا الطلب بالنسبة للحسابات الشخصية لايحتاج لأي لغة Server-side هذا مبرمج عن طريق Javascript و Ajax طبعا .. لعدم اعادة تحديث الصفحة .. وتغير الأدرس بار ...

أما بالنسبة لسؤالك بربط لغة c مع html فهذا ين ActiveX بغي عليك أن تسمحي بادوات وهي تحتاج لشهادات وثوقية معينة ,. وهي تعمل فقط على سيرفر محلي فقط

يمكن ولكن يمكن عن طريق لغة php بثلاث طرق .

  1. shel_exec() : تقوم بإستدعاء أمر shell معين مخزن داخل شريك محرفي .
  2. exec() :أيضا تقوم بإستدعاء ملف برنامج خارجي أو برنامج خارجي . يكون مفوظ بتردد exe .
  3. system(): تقوم بتنفيذ برنامج خارجي

مثال ::

$file = "c:\web\test.exe"; 

	system('start /MIN $file');

أم عن طريق الـasp.net

using System.Diagnostics.Process;


	//...codes

	string fileLocation = @"filename";
	Process test = new Process();
	test.StartInfo.FileName = fileLocation;
	test.Start();

وموفق ان شاء الله في مشروعك ..

لامارتير

تم تعديل هذه المشاركة بواسطة La Martir في 24 سبتمبر 2011 في 02:44

#7

بالنسبة لاستخدام أو بمعنى آخر ربط Html بلغة أخرى فذلك ممكن

و باستخدام كائن متصفح الإنترنت WebBrowser1

و الأفضل لك استخدام لغة VB.NET 2010

و هذا مثال كامل لعملية الربط لديك على هذه المثال حقلين نص مع زر

يمكنك باستخدام الـ Html نسخ النص من الحقل الأول لثاني و أخذ النتائج

من VB.NET و العكس ممكن كذلك ملفات المثال.

الملف الأول

Form1.vb

Imports System.Windows.Forms
Public Class Form1
    Public button As HtmlElement
    Public input1 As HtmlElement
    Public input2 As HtmlElement
    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted


    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim HtmlText As String = _
"<html>" & _
"<body>" & _
"Field1: <input type='text' id='field1' name='input1' value='Hello World!'>" & _
"<br />" & _
"Field2: <input type='text' id='field2' name='input2' >" & _
"<br /><br />" & _
"Click the button below to copy the content of Field1 to Field2." & _
"<br />" & _
"<input type='button' onclick=" & Chr(34) & "document.getElementById(" & Chr(39) & "field2" & Chr(39) & ").value=" & _
"document.getElementById(" & Chr(39) & "field1" & Chr(39) & ").value" & Chr(34) & _
"id='button1' name='button1' value='Copy Text' />" & _
"</body>" & _
"</html>"
        Me.WebBrowser1.Navigate("about:blank")
        Me.WebBrowser1.Document.Write(HtmlText)
        Dim document As Object = Me.WebBrowser1.Document
        button = Me.WebBrowser1.Document.GetElementById("button1")
        input1 = Me.WebBrowser1.Document.GetElementById("field1")
        input2 = Me.WebBrowser1.Document.GetElementById("field2")
        Me.WebBrowser1.Document.GetElementById("field1").AttachEventHandler("onpropertychange", AddressOf input1_onpropertychange)
        Me.WebBrowser1.Document.GetElementById("field2").AttachEventHandler("onpropertychange", AddressOf input2_onpropertychange)

    End Sub

    Public Sub input1_onpropertychange(ByVal sender As HtmlElement, ByVal e As System.EventArgs)
        Me.TextBox1.Text = input1.GetAttribute("value")
    End Sub

    Public Sub input2_onpropertychange(ByVal sender As HtmlElement, ByVal e As System.EventArgs)
        Me.TextBox2.Text = input2.GetAttribute("value")
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        input1.SetAttribute("value", Me.TextBox1.Text)
        button.InvokeMember("click")
    End Sub
End Class

الملف الثاني

Form1.Designer

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form1
    Inherits System.Windows.Forms.Form

    'Form overrides dispose to clean up the component list.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        Try
            If disposing AndAlso components IsNot Nothing Then
                components.Dispose()
            End If
        Finally
            MyBase.Dispose(disposing)
        End Try
    End Sub

    'Required by the Windows Form Designer
    Private components As System.ComponentModel.IContainer

    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer.  
    'Do not modify it using the code editor.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Me.WebBrowser1 = New System.Windows.Forms.WebBrowser()
        Me.TextBox1 = New System.Windows.Forms.TextBox()
        Me.TextBox2 = New System.Windows.Forms.TextBox()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.Label2 = New System.Windows.Forms.Label()
        Me.Button1 = New System.Windows.Forms.Button()
        Me.SuspendLayout()
        '
        'WebBrowser1
        '
        Me.WebBrowser1.AccessibleRole = System.Windows.Forms.AccessibleRole.None
        Me.WebBrowser1.Dock = System.Windows.Forms.DockStyle.Top
        Me.WebBrowser1.Location = New System.Drawing.Point(0, 0)
        Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20)
        Me.WebBrowser1.Name = "WebBrowser1"
        Me.WebBrowser1.Size = New System.Drawing.Size(483, 175)
        Me.WebBrowser1.TabIndex = 0
        '
        'TextBox1
        '
        Me.TextBox1.Location = New System.Drawing.Point(230, 191)
        Me.TextBox1.Name = "TextBox1"
        Me.TextBox1.Size = New System.Drawing.Size(129, 20)
        Me.TextBox1.TabIndex = 1
        Me.TextBox1.Text = "Hello World"
        '
        'TextBox2
        '
        Me.TextBox2.Location = New System.Drawing.Point(228, 228)
        Me.TextBox2.Name = "TextBox2"
        Me.TextBox2.Size = New System.Drawing.Size(127, 20)
        Me.TextBox2.TabIndex = 2
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Font = New System.Drawing.Font("Tahoma", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label1.Location = New System.Drawing.Point(149, 191)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(66, 23)
        Me.Label1.TabIndex = 3
        Me.Label1.Text = "Field1:"
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.Font = New System.Drawing.Font("Tahoma", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label2.Location = New System.Drawing.Point(145, 226)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(66, 23)
        Me.Label2.TabIndex = 4
        Me.Label2.Text = "Field2:"
        '
        'Button1
        '
        Me.Button1.Location = New System.Drawing.Point(15, 192)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(98, 56)
        Me.Button1.TabIndex = 5
        Me.Button1.Text = "Copy Text"
        Me.Button1.UseVisualStyleBackColor = True
        '
        'Form1
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(483, 266)
        Me.Controls.Add(Me.Button1)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.Label1)
        Me.Controls.Add(Me.TextBox2)
        Me.Controls.Add(Me.TextBox1)
        Me.Controls.Add(Me.WebBrowser1)
        Me.Name = "Form1"
        Me.Text = "Form1"
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents WebBrowser1 As System.Windows.Forms.WebBrowser
    Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
    Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents Label2 As System.Windows.Forms.Label
    Friend WithEvents Button1 As System.Windows.Forms.Button
End Class

في رعاية الله .

1

Wolf_Oman

صرح السماء

wolf9228

ناقوس الخطر

#8

الله يسعدكم ..

صرآحه اجابات قمه ..

من جد منتدى على مستوى عالي :blush:

مواضيع مشابهة