Jag håller på med ett COM object som ska arbeta mot ASP sidor. Jag vill spara info från ett formulär(till MySQL) och har sett att man kan använda på ASP-sidan följande:

<code>
objektet.namn = Request.Form("Namn")
objektet.adress = Request.Form("Adress")
objektet.Save
</code>

Men hur gör man på VB-sidan? Jag vet hur man sparar info i databas mm, men hur tar man emot datan från exemplet ovanför?

Skapa ett ActiveX Dll project

döp projektet till EttNamn
Döp klassen till vad EnClass

i klassen lägg till:

Option Explicit
Dim m_sNamn As String
Dim m_sAdress As String

Public Property Let Namn(data As String)
m_sNamn = data
End Property

Public Property Let Adress(data As String)
m_sAdress = data
End Property

Public Sub Save()
Dim con As ADODB.Connection

Set con = New ADODB.Connection
con.open "MinDsn"
con.execute "INSERT INTO mintabell (namn,adress) values('" & m_sNamn & "','" & m_sAdress & "')"
con.Close
End Sub

kompilera projektet.
Start -> Kör -> regsv32 <sökväg>ettnamn.dll

i asp:

set objekt = Server.CreateObject("EttNamn.EnClass")
objekt.namn = Request.Form("namn")
objekt.adress = Request.Form("adress")
objekt.Save

svårare än så är det inte.