P plelkes Medlem sedan mars 2002 823 inlägg Frågan 20 mars 2004 11:24 #1 Hej wf...En ändring på denna sida. (Bifogar koden som sid 1.asp)på denna sida (Bifogar sidan som 2.asp)
Jag har som ni ser i 4.asp gjort 2 förändringar( förändringarna är feta):
strSQL1 =" SELECT tblFluids.FluidID, FluidNamn, typeNamn, PatID FROM [B]tblPersonuppgifte[/B]r, tblFluidRelat, tblFluids, tblFluidTypes WHERE tblFluidRelat.FluidID = tblFluids.FluidID AND tblFluidRelat.typeID = tblFluidTypes.typeID ORDER by tblFluidTypes.typeNamn"
2
Patientens personnummer: <input name="personnr" type="text" [B]value='"<%=objRS("PatID")%>"'[/B]>
Men följande händer (titta även i textrutan)
Borde orsakas av fel i strSQL1, eller hur?
Men hur ändra?
Det är tänkt att "ikryssningen " skall fälja med på flera sidor. Går detta utan paging?
Till att börja med behöver du enbart skriva
<input name="personnr" type="text" value="<%=objRS("PatID")%>">
Du kan skippa '". Koden där är HTML, inte VBScript. ;)
Jag har inte möjlighet att kolla på din medskickade kod dock. :(
P plelkes Medlem sedan mars 2002 823 inlägg
m_soderlund skrev:
Jag har inte möjlighet att kolla på din medskickade kod dock
Tråkigt, för jag gjorde på detta sätt för att spara utrymme
P plelkes Medlem sedan mars 2002 823 inlägg Förslaget funkade inte...
Jag löste istället nästan problemet med
<input name="personnr" type="text" value="<%=Request.Form("till")%>">
Problemet är att jag får enkelfjuttar
'1212121212'
Hur får jag bort dessa?
C Calevan Medlem sedan maj 2003 1 173 inlägg du har skrivit med fnuttarna här:
<input name="personnr" type="text" value='"<%=objRS("PatID")%>"'>
om det var de nu menade, ta bort dem, dvs så här:
<input name="personnr" type="text" value="<%=objRS("PatID")%>">
P plelkes Medlem sedan mars 2002 823 inlägg Tack för ditt svar Calevan,
<input name="personnr" type="text" value="<%=Request.Form("till")%>">
och får det nästan att fungera. Det enda som blir fle är att jag får med enkelfjuttar(')
'1212121212'
Sedan skall det helst fungera med sidan där själva tillskrivningen sker
pnr= Request.Form("personnr")
d = FormatDateTime(Date, 2)
For each formObj in Request.Form
If left(formObj,9) = "leggatill" Then
lngFluidID = Replace(Request.Form(formObj), "leggatill", "")
strSQL = "INSERT INTO tblVetskebalans(Dag, FluidID, Volym, PatID) VALUES(#" & d & "#,'" & lngFluidID & "'," & Request.Form("volym" & lngFluidID) & ", '" & pnr & "')"
Response.Write strSQL
vatskeb.Execute strSQL, , 128
@nders Medlem sedan juni 2000 32 967 inlägg Du kan ju alltid göra en liten snabb replace.
<input name="personnr" type="text" value="<%=Replace(Request.Form("till"), "'", "")%>">
Mvh
P plelkes Medlem sedan mars 2002 823 inlägg som vanligt @nders - är du värd en S T O R buket blommor
