strSQL = \"Select * from testt where id=\" & request.querystring(\"id\") Set rs = Conn.Execute(strSQL)
arrM = Split(rs(\"email\"),\",\")
Response.write \"Læst: \" & arrM(0) & \"<br>\" Response.write \"Emne: \" & arrM(1) & \"<br>\" Response.write \"fra: \" & arrM(2) & \"<br>\" Response.write \"Brev: \" & arrM(3) & \"<br>\" Response.write \"Pris: \" & arrM(4) & \"<br>\" Conn.Close Set Conn = Nothing %> Men nu vil jeg gerne have den ind i \"do og loop\" , så den gang fortsætte med email1,email2 osv. Håber i forstår hvad jeg mener.
På forhånd tak Hilsen rasmus 50 points pr. spørgsmål!
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
<%@ LANGUAGE = \"VBScript\" ENABLESESSIONSTATE = False %> <% \' First, we connect to the database: Set cnDZ = Server.CreateObject(\"ADODB.Connection\") cnDZ.Open \"DSN=MyCompany\" \' Then we use the name of that connection \' to select something from our db! Set rs = cnDZ.Execute(\"SELECT * FROM TABLE\") %> <html> <body> Here is something from our db:<br> <%=rs(\"FIELD2\")%><br> Boy, wasn\'t that easy?! :-) <% \' close all recordsets and connections! rs.Close Set rs = Nothing cnDZ.Close Set cnDZ = Nothing %>
-------------------
oprette ny post
Jep.. sårdan gør man Den simple:
<% Set rs = cnDZ.Execute(\"INSERT INTO TABLE (FIELD1, FIELD2) VALUES (\"&var1&\", \"&var2&\")\") %>
Mere dybtegående
<% Set Ind = CreateObject(\"ADODB.RecordSet\") DnsText = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"database.mdb\") SqlText = \"Insert InTo tabel (Tid,Dato) VALUES(\'\" & Time & \"\',\'\" & Date &\"\')\" ind.Open Sqltext, DnsText Set ind = Nothing %>
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
