på en klientdator ska jag ha ett litet program gjort i vb där man väljer bland ett par radioboxar och sedan klickar på skicka.
värdena från boxarna ska då skickas till en server och läggas in i en sqlserver 2000.
(klient och server ligger ej på samma nätverk)
frågan är:
på vilket sätt bör värderna skickas? och hur tar jag emot dem på servern och insertar i databasen?
yohpopsMedlem sedan feb. 20011 198 inlägg Du måste komma åt det andra nätvärket på något sätt!
Kan du det?
Annars är det nog kört.
Du kan göra ett jobb som körs på sqlservern som importerar en fil eller dylikt.
Kommer åt nätverket gör jag.
Fundering:
Skulle man kunna skicka en xml-fil från klienten genom http och sedan ta emot den på servern via sqlserverns virutuella site i iis:en?
Eller krånglar jag bara till det då?
yohpopsMedlem sedan feb. 20011 198 inlägg varför inte bara en adodb connection?
yohpops skrev:
varför inte bara en adodb connection?
ja, det hade ju kanske varit enklast men jag har ingen access till sqlservern utifrån.
yohpopsMedlem sedan feb. 20011 198 inlägg Du kan använda en accessdatabas på klienten som du sedan laddar upp via http, så kan sqlservern använda den.
eller en serverapplikation som skriver in värdet?
hittat en smidig lösning (tror jag!) med xml.
koden förutsätter att man har en virutuell site på sin webserver
som är kopplad direkt till sql-servern som tar emot strängen och bearbetar den.
jag har inte hunnit snygga till koden än, men jag ville svara på hur jag gjort så fort som möjligt. :)
Dim objHTTP As New MSXML2.XMLHTTP26
Dim xmlResponse As Object
objHTTP.open "GET", "http://server?Username=" & strUsername & "&Password=" & strPassword & "", False
objHTTP.send
Set xmlResponse = objHTTP.responseXML
Set objHTTP = Nothing
Dim objXML As Object
Set objXML = CreateObject("Microsoft.XMLDOM")
objXML.loadXML (xmlResponse.xml)
Dim Root As Object
Dim NodeList As Object
Dim Elem As Variant
Set Root = objXML.documentElement
Set NodeList = objXML.getElementsByTagName("returnCode")
For Each Elem In NodeList
If Elem.firstChild.nodeValue = 1 Then
z = LockWorkStation()
'Label1.Caption = "Sparad"
Else
Label1.Caption = "Fel användarnamn eller lösenord"
End If
Next
yohpopsMedlem sedan feb. 20011 198 inlägg Att ha en sql-server kopplad till en virtuell site är inte speciellt säkert.
yohpops skrev:
Att ha en sql-server kopplad till en virtuell site är inte speciellt säkert.
kan utveckla lite?
siten tillåter bara xml-templates och det finns bara en template som ser så här:
<return xmlns:sql='urn:schemas-microsoft-com:xml-sql'>
<sql:header>
<sql:param name="Username" />
<sql:param name="Password" />
</sql:header>
<sql:query>
declare @c int
execute @c = dbo.xmlProfile @Username, @Password
select '<returnCode>' + cast(@c as varchar(4)) + '</returnCode>'
</sql:query>
</return>
varför är det osäkert? går det att hacka siten menar du, eller?
yohpopsMedlem sedan feb. 20011 198 inlägg om man inte passar sig med konton och dyl, så kan nån skicka in vilka sql-queries som helst.